Index: mttroot/mtt/bin/trans/m/mtt_write.m
==================================================================
--- mttroot/mtt/bin/trans/m/mtt_write.m
+++ mttroot/mtt/bin/trans/m/mtt_write.m
@@ -1,16 +1,23 @@
 function mtt_write(t,x,y,nx,ny);
+
+###############################################################
+## Version control history
+###############################################################
+## $Id$
+## $Log$
+###############################################################
+
 
   printf("%e ", t);
   for i=1:ny
     printf("%e ", y(i));
-  end
-  printf("# ");
+  endfor
 
   printf("%e ", t);
   for i=1:nx
     printf("%e ", x(i));
-  end
+  endfor
   printf("\n");
 
 endfunction
 

Index: mttroot/mtt/bin/trans/p/mtt_write.p
==================================================================
--- mttroot/mtt/bin/trans/p/mtt_write.p
+++ mttroot/mtt/bin/trans/p/mtt_write.p
@@ -14,10 +14,13 @@
 ###############################################################
 ## Version control history
 ###############################################################
 ## $Id$
 ## $Log$
+## Revision 1.4  1998/11/26 13:31:30  peterg
+## Put missing space after 2nd t
+##
 ## Revision 1.3  1998/07/25 20:41:38  peterg
 ## Spaces between numbers
 ##
 ## Revision 1.2  1998/07/25 14:04:14  peterg
 ## Changed format
@@ -35,13 +38,12 @@
    
 BEGIN
    write(t," ");
    FOR i := 1 TO ny DO
       write(y[i]," ");
-   write(" # ");
 
    write(t," ");
    FOR i := 1 TO nx DO
       write(x[i]," ");
    writeln;
 END;