Index: /issm/trunk/src/m/model/ismodelselfconsistent.m
===================================================================
--- /issm/trunk/src/m/model/ismodelselfconsistent.m	(revision 8420)
+++ /issm/trunk/src/m/model/ismodelselfconsistent.m	(revision 8421)
@@ -295,5 +295,5 @@
 		forcingfields{end+1}=['forcings.' forcingnames{i}];
 	end
-	checklength(md,forcingfields,md.numberofnodes+1)
+	checksize(md,forcingfields,[md.numberofnodes+1 NaN])
 
 	%Check that forcing columns are properly ordered
@@ -567,5 +567,5 @@
 	for i=1:length(fields),
 		eval(['field=md.' fields{i} ';']);
-		if size(field,1)~=fieldlength,
+		if length(field)~=fieldlength,
 			error(['model not consistent: field ' fields{i} ' length should be ' num2str(fieldlength)]);
 		end