Changeset 9183

Timestamp:

08/04/11 14:35:30 (14 years ago)

Author:

seroussi

Message:

minor ismodelselfconsistent

File:

• issm/trunk/src/m/model/ismodelselfconsistent.m (modified) (1 diff)

issm/trunk/src/m/model/ismodelselfconsistent.m ¶

@@ -730 +730 @@
 %}}}
 %checkforcing {{{1
-function checkforcing(md,fieldname)
-
-        eval(['field=md.' fieldname ';']);
-        if size(field,1)==md.numberofnodes,
-                if ~size(field,2)==1,
-                         message(['model not consistent: model ' md.name ': ' fieldname ' should have only one column as there are md.numberofnodes lines']);
-                end
-        elseif size(field,1)==md.numberofnodes+1
-                if any(field(end,:)~=sort(field(end,:))),
-                        message(['model not consistent: model ' md.name ': ' fieldname ' columns should be chronological']);
-                end
-                if any(field(end,1:end-1)==field(end,2:end)),
-                        message(['model not consistent: model ' md.name ': ' fieldname ' columns must not contain duplicate timesteps']);
-                end
-        else
-                 message(['model not consistent: model ' md.name ': ' fieldname ' should have md.numberofnodes or md.numberofnodes+1 lines']);
+function checkforcing(md,fields)
+
+        for i=1:length(fields),
+                eval(['field=md.' fields{i} ';']);
+                if size(field,1)==md.numberofnodes,
+                        if ~size(field,2)==1,
+                                message(['model not consistent: model ' md.name ': ' fieldname ' should have only one column as there are md.numberofnodes lines']);
+                        end
+                elseif size(field,1)==md.numberofnodes+1
+                        if any(field(end,:)~=sort(field(end,:))),
+                                message(['model not consistent: model ' md.name ': ' fieldname ' columns should be chronological']);
+                        end
+                        if any(field(end,1:end-1)==field(end,2:end)),
+                                message(['model not consistent: model ' md.name ': ' fieldname ' columns must not contain duplicate timesteps']);
+                        end
+                else
+                        message(['model not consistent: model ' md.name ': ' fieldname ' should have md.numberofnodes or md.numberofnodes+1 lines']);
+                end
         end
 end