Index: /issm/trunk/src/m/model/display/fielddisplay.m
===================================================================
--- /issm/trunk/src/m/model/display/fielddisplay.m	(revision 9277)
+++ /issm/trunk/src/m/model/display/fielddisplay.m	(revision 9278)
@@ -33,4 +33,22 @@
 		if max(fieldsize)==1,
 			displayunit(offset,name,num2str(field),comment),
+		%matrix
+		else
+			displayunit(offset,name,['(' num2str(fieldsize(1)) 'x' num2str(fieldsize(2)) ')'],comment),
+		end
+
+	%numeric
+	elseif islogical(field)
+
+		%get size
+		fieldsize=size(field);
+
+		%single value
+		if max(fieldsize)==1,
+			if (field)
+				displayunit(offset,name,'true',comment),
+			else
+				displayunit(offset,name,'false',comment),
+			end
 		%matrix
 		else
@@ -104,5 +122,5 @@
 	displayunit(offset,name,string,comment);
 end% }}}
-function displayunit(offset,name,caracterization,comment),% {{{
+function displayunit(offset,name,characterization,comment),% {{{
 
 	%take care of name
@@ -111,17 +129,17 @@
 	end
 
-	%take care of caracterization
-	if (strcmp(caracterization,['''' '''']) | strcmp(caracterization,'NaN')),
-		caracterization='N/A';
+	%take care of characterization
+	if (strcmp(characterization,['''' '''']) | strcmp(characterization,'NaN')),
+		characterization='N/A';
 	end
-	if length(caracterization)>15,
-		caracterization=[caracterization(1:12) '...'];
+	if length(characterization)>15,
+		characterization=[characterization(1:12) '...'];
 	end
 
 	%print
 	if isempty(comment)
-		disp(sprintf('%s%-23s: %-15s',offset,name,caracterization));
+		disp(sprintf('%s%-23s: %-15s',offset,name,characterization));
 	else
-		disp(sprintf('%s%-23s: %-15s -- %s',offset,name,caracterization,comment));
+		disp(sprintf('%s%-23s: %-15s -- %s',offset,name,characterization,comment));
 	end
 end% }}}
