Index: /issm/trunk/src/m/utils/Exp/readwrite/readfile.m
===================================================================
--- /issm/trunk/src/m/utils/Exp/readwrite/readfile.m	(revision 2727)
+++ /issm/trunk/src/m/utils/Exp/readwrite/readfile.m	(revision 2727)
@@ -0,0 +1,14 @@
+function string=readfile(filename)
+%READFILE - ???
+%
+%   Usage:
+%      string=readfile(filename)
+
+string='';
+fid=fopen(filename);
+while(1),
+	tline=fgets(fid);
+	if ~ischar(tline), break, end
+	string=[string  tline];
+end
+fclose(fid);
