Index: sm/trunk-jpl/src/m/utils/Exp/readwrite/newline.m
===================================================================
--- /issm/trunk-jpl/src/m/utils/Exp/readwrite/newline.m	(revision 11953)
+++ 	(revision )
@@ -1,8 +1,0 @@
-function new_line(fid)
-%NEW_LINE - add a new line in a a file
-%
-%   Used by exp generators and readers. 
-%   DO NOT USE
-
-A='';
-fprintf(fid,'\n',A);
Index: sm/trunk-jpl/src/m/utils/Exp/readwrite/read_file.m
===================================================================
--- /issm/trunk-jpl/src/m/utils/Exp/readwrite/read_file.m	(revision 11953)
+++ 	(revision )
@@ -1,42 +1,0 @@
-function struct=read_file(name,whole);
-%READ_FILE - ???
-%
-%   Usage:
-%      struct=read_file(name,whole)
-
-fid=fopen(name,'r');
-i=0;
-while (~feof(fid)),
-   i=i+1;
-   A=readline(fid,2);
-A=readline(fid,2);
-A=readline(fid,4);
-[A,bytecount]=fscanf(fid,'%i %f',[1 2]);
-if whole==1,
-   struct(i).nods=A(1);
-else
-   struct(i).nods=A(1)-1;
-end
-A=readline(fid,5);
-
-struct(i).x=zeros(struct(i).nods,1);
-struct(i).y=zeros(struct(i).nods,1);
-
-for n=1:struct(i).nods,
-   [A,bytecount]=fscanf(fid,'%f %f',[1 2]);
-   struct(i).x(n)=A(1);
-   struct(i).y(n)=A(2);
-end
-if whole==0,
-   fscanf(fid,'%f %f',[1 2]);
-end
-
-end
-fclose(fid);
-
-
-
-
-
-
-
Index: sm/trunk-jpl/src/m/utils/Exp/readwrite/readfile.m
===================================================================
--- /issm/trunk-jpl/src/m/utils/Exp/readwrite/readfile.m	(revision 11953)
+++ 	(revision )
@@ -1,14 +1,0 @@
-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);
Index: sm/trunk-jpl/src/m/utils/Exp/readwrite/writefile.m
===================================================================
--- /issm/trunk-jpl/src/m/utils/Exp/readwrite/writefile.m	(revision 11953)
+++ 	(revision )
@@ -1,14 +1,0 @@
-function writefile(filename,string)
-%WRITEFILE - write a file from a string
-%
-%   useful to recovert an exp file from md.domainoutline
-%
-%   Usage:
-%      writefile(filename,string)
-%
-%   Example:
-%      writefile('DomainOutline.exp',md.domainoutline)
-
-fid = fopen(filename,'wt');
-fprintf(fid,string);
-fclose(fid);