Index: mttroot/mtt/bin/trans/dae2dm_r
==================================================================
--- mttroot/mtt/bin/trans/dae2dm_r
+++ mttroot/mtt/bin/trans/dae2dm_r
@@ -12,10 +12,13 @@
 ###############################################################
 ## Version control history
 ###############################################################
 ## $Id$
 ## $Log$
+## Revision 1.1  1996/08/18 20:03:51  peter
+## Initial revision
+##
 ###############################################################
 
 #Inform user
 echo Creating $1_dm.r
 
@@ -285,10 +288,15 @@
   write "matrix MTTD(", MTTNy, ",", MTTNu, ");";
   FOR i := 1:MTTNy DO
     FOR j := 1:MTTNu DO IF MTTD(i,j) NEQ 0 THEN
       write "MTTD(", i, ",", j, ") := ", MTTD(i,j);
 END;
+
+write "END;";
 
 SHUT "$1_dm.r";
 quit;
 
 EOF
+
+# Now invoke the standard error handling.
+mtt_error_r dae2dm_r.log