Index: /issm/trunk/src/m/model/ismodelselfconsistent.m
===================================================================
--- /issm/trunk/src/m/model/ismodelselfconsistent.m	(revision 9182)
+++ /issm/trunk/src/m/model/ismodelselfconsistent.m	(revision 9183)
@@ -730,20 +730,22 @@
 %}}}
 %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
