Index: mttroot/mtt/bin/trans/dae_r2m
==================================================================
--- mttroot/mtt/bin/trans/dae_r2m
+++ mttroot/mtt/bin/trans/dae_r2m
@@ -12,10 +12,13 @@
 ###############################################################
 ## Version control history
 ###############################################################
 ## $Id$
 ## $Log$
+## Revision 1.2  1996/08/16 08:57:34  peter
+## Reads $1_input.
+##
 ## Revision 1.1  1996/08/15 16:46:06  peter
 ## Initial revision
 ##
 ###############################################################
 
@@ -142,11 +145,11 @@
 MTTdx := MTTdx;
 MTTGx := MTTGx;
 
 OFF fort;
 
-write "for i=1:", MTTNy, ";;";
+write "for i=1:", MTTNx, ";;";
 write "  residual(i) = MTTdX(i)-MTTdX0(i);";
 write "end;";
 
 IF MTTNz>0 THEN
 BEGIN