Index: mttroot/mtt/bin/trans/dae2daes_m
==================================================================
--- mttroot/mtt/bin/trans/dae2daes_m
+++ mttroot/mtt/bin/trans/dae2daes_m
@@ -13,10 +13,13 @@
 ###############################################################
 ## Version control history
 ###############################################################
 ## $Id$
 ## $Log$
+## Revision 1.3  1996/08/18 12:00:19  peter
+## Unified format of responses.
+##
 ## Revision 1.2  1996/08/16 13:17:57  peter
 ## Changed default args to include nx+nz
 ## Fixed bug with vector outputs.
 ##
 ## Revision 1.1  1996/08/15 16:24:55  peter
@@ -40,11 +43,14 @@
 fi
 
 PARAMS="$PARAMS ;"
 
 
-$MATRIX << EOF > dae2daes_m.log
+$MATRIX << EOF > dae2daes_m.log 2>mtt_error
+
+  %Read the parameters
+  $1_numpar;
 
   [nx,ny,nu,nz,nyz] = $1_def;
   t=0;  %Just in case its in the parameter list
   $PARAMS
 
@@ -81,13 +87,24 @@
     y(i,:) = $1_daeo(x(i,:),tt)';
   end;
   write_matrix([T,y], '$1_daeso');
 end;
 
-
 EOF
+
+# Test for errors and print if any
+err_length=$(wc -c <mtt_error)
+if [ $err_length != "0" ]
+then
+  echo MTT has failed with the following errors '...'
+  cat mtt_error
+  exit 1
+else
+  exit 0
+fi
+