Overview
Comment: | Paramererised version of sm etc etc (using -parameter switch) |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | origin/master | trunk |
Files: | files | file ages | folders |
SHA3-256: |
5efa96193d1166df1bf5f4b8782fc7a8 |
User & Date: | gawthrop@users.sourceforge.net on 2000-05-20 15:23:56 |
Other Links: | branch diff | manifest | tags |
Context
2000-05-20
| ||
15:35:18 | Parameterised version check-in: e76613f7c4 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
15:23:56 | Paramererised version of sm etc etc (using -parameter switch) check-in: 5efa96193d user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
15:23:09 | Parameterised version of sm etc. check-in: 78ac9c0f2f user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
Changes
Modified mttroot/mtt/bin/trans/mtt_r2m from [eb59d320a7] to [db818e2d97].
︙ | ︙ | |||
12 13 14 15 16 17 18 19 20 21 22 23 24 25 | # Copyright (c) P.J.Gawthrop 1991, 1994, 1995, 1996, 1998 ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ ## 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. ## ## Revision 1.13 1999/11/23 00:59:14 peterg | > > > | 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 | # Copyright (c) P.J.Gawthrop 1991, 1994, 1995, 1996, 1998 ############################################################### ## 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. ## ## Revision 1.13 1999/11/23 00:59:14 peterg |
︙ | ︙ | |||
64 65 66 67 68 69 70 | ## ############################################################### # Args while [ -n "`echo $1 | grep '^-'`" ]; do case $1 in | | | > | 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 | ## ############################################################### # Args while [ -n "`echo $1 | grep '^-'`" ]; do case $1 in -noglobals) noglobals='-noglobals'; ;; -parameters) parameters='-parameters'; par='mttpar' ;; *) echo $1 is an unknown option exit;; esac shift done |
︙ | ︙ | |||
135 136 137 138 139 140 141 | #echo Creating $1_odea.$ext outfileo=$outfile"o" echo Creating $outfileo.m #rm -f $1_odea.$ext.1; #Header | | | | 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 | #echo Creating $1_odea.$ext outfileo=$outfile"o" echo Creating $outfileo.m #rm -f $1_odea.$ext.1; #Header 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 %Set up the code generator in"mtt_setreduce.r"; |
︙ | ︙ | |||
225 226 227 228 229 230 231 | fi if [ "$rep" = "sm" ]||[ "$rep" = "ssm" ]||[ "$rep" = "dm" ]||\ [ "$rep" = "csm" ]||[ "$rep" = "obs" ]; then if [ "$rep" = "sm" ]||[ "$rep" = "ssm" ]; then #Header | | | | | | 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 | fi if [ "$rep" = "sm" ]||[ "$rep" = "ssm" ]||[ "$rep" = "dm" ]||\ [ "$rep" = "csm" ]||[ "$rep" = "obs" ]; then if [ "$rep" = "sm" ]||[ "$rep" = "ssm" ]; then #Header 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 $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 $noglobals $parameters $1 obs m mttx [mttobs_o,mttobs_h] > $outfile.p else lang_header $noglobals $parameters $1 obs m mttx,mttu mttyy > $outfile.p fi Symbols='obs_o obs_h' fi for Symbol in $Symbols; do rm -f $outfile.1 |
︙ | ︙ |