Index: /issm/trunk/src/m/classes/public/ismodelselfconsistent.m
===================================================================
--- /issm/trunk/src/m/classes/public/ismodelselfconsistent.m	(revision 5701)
+++ /issm/trunk/src/m/classes/public/ismodelselfconsistent.m	(revision 5702)
@@ -165,4 +165,9 @@
 if ~ismember(md.lowmem,[0 1]),
 	error(['model not consistent: model ' md.name ' lowmem field should be 0 or 1']);
+end
+%}}}
+%SCALAR
+if ~isscalar(md.control_type),
+	error('model not consistent: md.control_type should be a scalar');
 end
 %}}}