Changeset 1226

Timestamp:

07/02/09 16:58:06 (16 years ago)

Author:

Mathieu Morlighem

Message:

minor

File:

• issm/trunk/src/m/classes/public/ThicknessCorrection.m (modified) (3 diffs)

issm/trunk/src/m/classes/public/ThicknessCorrection.m

@@ -24 +24 @@
 pos_shelf=find(~md.gridonicesheet);
 pos_GL=intersect(unique(md.elements(find(md.elementonicesheet),:)),unique(md.elements(find(md.elementoniceshelf),:)));
+debug=(length(pos_shelf)>50000);
 
 %get distance
@@ -33 +34 @@
 
 %modify thickness
-fprintf('%s','      correction progress:   0.00 %');
+if (debug), fprintf('%s','      correction progress:   0.00 %');
 for i=1:length(pos_shelf)
 
-        if mod(i,100)==0,
+        if (debug & mod(i,100)==0),
                 fprintf('\b\b\b\b\b\b\b%5.2f%s',i/length(pos_shelf)*100,' %');
         end
@@ -56 +57 @@
         end
 end
-fprintf('\b\b\b\b\b\b\b%5.2f%s\n',100,' %');
+if (debug), fprintf('\b\b\b\b\b\b\b%5.2f%s\n',100,' %');
 
 %check the computed thickness