Index: /issm/trunk/src/m/classes/public/WriteData.m
===================================================================
--- /issm/trunk/src/m/classes/public/WriteData.m	(revision 4447)
+++ /issm/trunk/src/m/classes/public/WriteData.m	(revision 4448)
@@ -20,8 +20,9 @@
 	fwrite(fid,data,'char'); 
 elseif strcmpi(data_type,'Mat'),
+	%Get size
 	s=size(data);
-	if isnan(data),
-		s(1)=0;
-		s(2)=0;
+	%if matrix = NaN, then do not write anything
+	if (s(1)==1 & s(2)==1 & isnan(data)),
+		s(1)=0; s(2)=0;
 	end