Index: mttroot/mtt/bin/trans/sm2sr_m
==================================================================
--- mttroot/mtt/bin/trans/sm2sr_m
+++ mttroot/mtt/bin/trans/sm2sr_m
@@ -14,10 +14,13 @@
 ###############################################################
 ## Version control history
 ###############################################################
 ## $Id$
 ## $Log$
+## Revision 1.16  1998/08/11 13:31:05  peterg
+## Lowercase mttLAST etc
+##
 ## Revision 1.15  1998/07/27 20:31:40  peterg
 ## New simpar version
 ##
 ## Revision 1.14  1998/07/25 10:00:48  peterg
 ## *** empty log message ***
@@ -76,19 +79,19 @@
 # PARAMS="$PARAMS ;"
 
 $MATRIX << EOF > sm2sr_m.log 2>mtt_error.txt
 
   % Read in the numeric system parameters
-  $1_numpar;
+  mttpar = $1_numpar;
 
   % Read in the simulation parameters
-  $1_simpar;
+  simpar = $1_simpar;
 
   [nx,ny,nu,nz,nyz] = $1_def;
   t=0;	%Just in case it appears in the parameter list.
 
-  T=[0:mttdt:mttlast]'
+  T=[0:simpar.dt:simpar.last]'
 
   if exist('u0')==0
     u0 = ones(nu,1);
   end;
 
@@ -100,11 +103,11 @@
   [n,m]=size(T);
   if m>n
     T=T';
   end;
 
-  [A,B,C,D] = $1_sm;
+  [A,B,C,D] = $1_sm(mttpar);
   [y,x] = sm2sr(A,B,C,D,T,u0,x0);
 
   if nx>0
     write_matrix([T x], '$1_sr');
   end;