Changeset 2577

Timestamp:

10/30/09 11:58:54 (15 years ago)

Author:

ala

Message:

minor bugfix

Location:

issm/trunk/src/m/utils/Interp

Files:

• FieldFindVarNames.m (modified) (2 diffs)
• InterpFromFile.m (modified) (1 diff)

issm/trunk/src/m/utils/Interp/FieldFindVarNames.m

@@ -30 +30 @@
 if length(A)==3,
         isgrid=1;
-        for i=1:4
+        for i=1:3
                 if strcmpi(A(i).name(1),'x');
                         xenum=i;
@@ -43 +43 @@
 elseif length(A)==4,
         isgrid=0;
-        for i=1:5
+        for i=1:4
                 if strcmpi(A(i).name(1),'x');
                         xenum=i;

issm/trunk/src/m/utils/Interp/InterpFromFile.m

@@ -39 +39 @@
 Data=load(filename);
 if strcmpi(Names.interp,'grid'),
-        data_out=InterpFromGridToMesh(Data.(Names.xname),Data.(Names.yname),Data.(Names.dataname),md.x,md.y,default_value);
+        data_out=InterpFromGridToMesh(Data.(Names.xname),Data.(Names.yname),Data.(Names.dataname),x,y,default_value);
 else
-        data_out=InterpFromMeshToMesh2d(Data.(Names.indexname),Data.(Names.xname),Data.(Names.yname),Data.(Names.dataname),md.x,md.y,default_value);
+        data_out=InterpFromMeshToMesh2d(Data.(Names.indexname),Data.(Names.xname),Data.(Names.yname),Data.(Names.dataname),x,y,default_value);
 end