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.2  1998/07/25 14:04:14  peterg
+## Changed format
+##
 ## Revision 1.1  1998/07/25 09:47:25  peterg
 ## Initial revision
 ##
 ###############################################################
 
@@ -26,16 +29,16 @@
  
 VAR
    i : INTEGER;
    
 BEGIN
-   write(t);
+   write(t," ");
    FOR i := 1 TO ny DO
-      write(y[i]);
+      write(y[i]," ");
    write(" # ");
 
    write(t);
    FOR i := 1 TO nx DO
-      write(x[i]);
+      write(x[i]," ");
    writeln;
 END;