Overview
Comment: | Give other procedures local i,j vars. |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | origin/master | trunk |
Files: | files | file ages | folders |
SHA3-256: |
874ad25f7094fcaae0a205f2b3d79ebb |
User & Date: | gawthrop@users.sourceforge.net on 1998-07-25 16:59:40 |
Other Links: | branch diff | manifest | tags |
Context
1998-07-25
| ||
18:18:23 | Added switches check-in: 37d2b01af3 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
16:59:40 | Give other procedures local i,j vars. check-in: 874ad25f70 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
16:35:43 | Sorted out log files etc check-in: 9cb3ac5c88 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
Changes
Modified mttroot/mtt/bin/trans/mtt_m2p from [b81642ff5a] to [b39af5938d].
︙ | ︙ | |||
11 12 13 14 15 16 17 18 19 20 21 22 23 24 | # Copyright (c) P.J.Gawthrop 1998 ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ ## Revision 1.4 1998/07/25 15:05:54 peterg ## DD ## ## Revision 1.3 1998/07/25 14:03:30 peterg ## Added () to [] conversion when the variable is i j k or an integer or ## combination ## | > > > | 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 | # Copyright (c) P.J.Gawthrop 1998 ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ ## Revision 1.5 1998/07/25 15:06:17 peterg ## Added DDT VAR ## ## Revision 1.4 1998/07/25 15:05:54 peterg ## DD ## ## Revision 1.3 1998/07/25 14:03:30 peterg ## Added () to [] conversion when the variable is i j k or an integer or ## combination ## |
︙ | ︙ | |||
89 90 91 92 93 94 95 96 97 98 99 100 101 102 | echo " mttx,mttdx : StateVector;" echo " mttu : InputVector;" echo " mtty : OutputVector;" echo " i,j,it,iLast,STEPFACTOR : INTEGER;" echo " METHOD : STRING;" ;; *) echo "PROCEDURE $Sys_rep;" ;; esac) > $Filename cat<<EOF >> $Filename {*** System $Sys, rep $rep, language Pascal, file $Filename ***} {*** Translated by MTT from $Sys_rep.m on `date` ***} | > > | 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 | echo " mttx,mttdx : StateVector;" echo " mttu : InputVector;" echo " mtty : OutputVector;" echo " i,j,it,iLast,STEPFACTOR : INTEGER;" echo " METHOD : STRING;" ;; *) echo "PROCEDURE $Sys_rep;" echo "VAR" echo " i,j : INTEGER;" ;; esac) > $Filename cat<<EOF >> $Filename {*** System $Sys, rep $rep, language Pascal, file $Filename ***} {*** Translated by MTT from $Sys_rep.m on `date` ***} |
︙ | ︙ |