Index: /issm/trunk/src/m/classes/diagnostic.m
===================================================================
--- /issm/trunk/src/m/classes/diagnostic.m	(revision 10554)
+++ /issm/trunk/src/m/classes/diagnostic.m	(revision 10555)
@@ -117,4 +117,11 @@
 				end
 			end
+			%CHECK THAT NO rotation specified for FS Grounded ice at base
+			if md.mesh.dimension==3 & md.flowequation.isstokes,
+				pos=find(md.mask.vertexongroundedice & md.mesh.vertexonbed);
+				if any(~isnan(md.diagnostic.referential(pos,:))),
+					checkmessage(['model ' md.miscellaneous.name ' not consistent. No referential should be specified for basal vertices of grounded ice']);
+				end
+			end
 		end % }}}
 		function disp(obj) % {{{