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.3  1998/07/25 20:41:38  peterg
+## Spaces between numbers
+##
 ## Revision 1.2  1998/07/25 14:04:14  peterg
 ## Changed format
 ##
 ## Revision 1.1  1998/07/25 09:47:25  peterg
 ## Initial revision
@@ -34,11 +37,11 @@
    write(t," ");
    FOR i := 1 TO ny DO
       write(y[i]," ");
    write(" # ");
 
-   write(t);
+   write(t," ");
    FOR i := 1 TO nx DO
       write(x[i]," ");
    writeln;
 END;