Index: mttroot/mtt/bin/trans/mtt_r2m
==================================================================
--- mttroot/mtt/bin/trans/mtt_r2m
+++ mttroot/mtt/bin/trans/mtt_r2m
@@ -14,10 +14,13 @@
 ###############################################################
 ## Version control history
 ###############################################################
 ## $Id$
 ## $Log$
+## Revision 1.16  2000/04/18 11:14:18  peterg
+## Put in the -parameters option
+##
 ## Revision 1.15  2000/02/10 14:58:57  peterg
 ## *** empty log message ***
 ##
 ## Revision 1.14  1999/12/08 02:06:00  peterg
 ## Now incudes csm rep.
@@ -66,15 +69,16 @@
 
 
 # Args
 while [ -n "`echo $1 | grep '^-'`" ]; do
   case $1 in
-    -noglobal)
-	noglobal='-noglobal';
+    -noglobals)
+	noglobals='-noglobals';
 	;;
     -parameters)
 	parameters='-parameters';
+        par='mttpar'
 	;;
     *)
 	echo $1 is an unknown option
         exit;;
   esac
@@ -137,12 +141,12 @@
   echo Creating $outfileo.m
 
   #rm -f $1_odea.$ext.1;
 
   #Header
-  lang_header $noglobal $parameters $1 $rep $ext 'mttx,mttu,mttt,mttpar' mttdx > $1_$2.p
-  lang_header $noglobal $parameters $1 $2o $ext 'mttx,mttu,mttt,mttpar' mtty  > $1_$2o.p
+  lang_header $noglobals $parameters $1 $rep $ext 'mttx,mttu,mttt,mttpar' mttdx > $1_$2.p
+  lang_header $noglobals $parameters $1 $2o $ext 'mttx,mttu,mttt,mttpar' mtty  > $1_$2o.p
 
   rm -f mtt_ode mtt_odeo
 
   # Use reduce to accomplish the transformation
 $SYMBOLIC  > mtt_r2m.log <<EOF
@@ -227,29 +231,29 @@
 if [ "$rep" = "sm" ]||[ "$rep" = "ssm" ]||[ "$rep" = "dm" ]||\
    [ "$rep" = "csm" ]||[ "$rep" = "obs" ]; then
 
 if  [ "$rep" = "sm" ]||[ "$rep" = "ssm" ]; then
    #Header
-  lang_header $noglobal $parameters $1 $rep $ext '' [mtta,mttb,mttc,mttd] > $outfile.p
+  lang_header $noglobals $parameters $1 $rep $ext "$par" [mtta,mttb,mttc,mttd] > $outfile.p
   Symbols='a b c d'    
 fi
 
 if [ "$rep" = "dm" ]||[ "$rep" = "csm" ]; then
    #Header
-  lang_header $noglobal $parameters $1 $rep $ext '' [mtta,mttb,mttc,mttd,mtte] > $outfile.p
+  lang_header $noglobals $parameters $1 $rep $ext "$par" [mtta,mttb,mttc,mttd,mtte] > $outfile.p
   Symbols='a b c d e'    
 fi
 
 if [ "$rep" = "obs" ]; then
   # Is the system affine (look in the _obs.r file
   affine=`grep 'affine :=' $1_obs.r | awk '{print $3}' | sed 's/;//'`
   echo 'affine = ' $affine
    #Header 
 if [ "$affine" = "1" ]; then
-    lang_header $noglobal $parameters $1 obs m mttx [mttobs_o,mttobs_h] >  $outfile.p
+    lang_header $noglobals $parameters $1 obs m mttx [mttobs_o,mttobs_h] >  $outfile.p
 else
-    lang_header $noglobal $parameters $1 obs m mttx,mttu mttyy > $outfile.p
+    lang_header $noglobals $parameters $1 obs m mttx,mttu mttyy > $outfile.p
 fi
   Symbols='obs_o obs_h'    
 fi
 
 for Symbol in $Symbols; do