Changeset 1085

Timestamp:

06/24/09 14:51:23 (16 years ago)

Author:

Mathieu Morlighem

Message:

better like that

File:

• issm/trunk/src/m/utils/Exp/expcoarsen.m (modified) (3 diffs)

issm/trunk/src/m/utils/Exp/expcoarsen.m

@@ -18 +18 @@
 A=expread(oldfile,1);
 numprofiles=size(A,2);
+A(1).x(end)
 
 %Go through the profiles
@@ -26 +27 @@
         j=1;
 
-        while 1,
-
-                %stop if we have reached end of profile (always keep the last point)
-                if j>numpoints-1,
-                        break
-                end
+        %stop if we have reached end of profile (always keep the last point)
+        while j<numpoints-1,,
 
                 %See whether we keep this point or not
@@ -43 +40 @@
                 end
         end
+
 end
+A(1).x(end)
 
 expwrite(A,newfile);