Index: mttroot/mtt/bin/trans/mtt_m2p
==================================================================
--- mttroot/mtt/bin/trans/mtt_m2p
+++ mttroot/mtt/bin/trans/mtt_m2p
@@ -13,10 +13,13 @@
 ###############################################################
 ## Version control history
 ###############################################################
 ## $Id$
 ## $Log$
+## Revision 1.49  2000/05/18 09:45:45  peterg
+## Fixed missing ;
+##
 ## Revision 1.48  2000/05/18 09:39:38  peterg
 ## Removed fifth argument from _input
 ##
 ## Revision 1.47  2000/05/16 18:56:03  peterg
 ## Upgraded for new simulation approach - uses data files to input
@@ -206,11 +209,12 @@
 #fi
 
 # Heading
 (case $rep in
     state)
-        echo "PROCEDURE $Sys_rep(VAR mttx : StateVector);"
+        echo "PROCEDURE $Sys_rep(VAR mttx : StateVector; 
+                                     mttpar : ParameterVector);"
         ;;
     numpar)
         echo "PROCEDURE $Sys_rep(VAR mttpar : ParameterVector);"
         ;;
     simpar)
@@ -518,11 +522,12 @@
 sed 's/(\([0-9]*,MTT[ijk0-9]\))/\[\1\]/g' |\
 sed 's/(\(MTT[ijk0-9],MTT[ijk0-9]\))/\[\1\]/g' |\
 sed 's/(\(MTT[ijk0-9,]*\))/\[\1\]/g'  |\
 sed 's/switcha(mttAA,/switcha(/g'   |\
 sed 's/switch(MTTx,/switch(/g'  |\
-sed 's/if nargin<[1-9] THEN//'  \
+sed 's/if nargin<[1-9] THEN//'  |\
+sed 's/if nargin>[0-9] THEN//'  \
 >> $Filename
 
 # p2c doesn't like mixed case filenames!
 #if [ "$Filename" != "$filename" ]; then
 #  echo Creating $filename