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.9 1998/07/27 17:20:42 peterg +## Allow , between () +## ## Revision 1.8 1998/07/26 19:38:17 peterg ## Replaced t0..t9 by mtt_temp0.. ## ## Revision 1.7 1998/07/25 20:06:23 peterg ## Does the mtt_update function @@ -90,14 +93,15 @@ echo " InputVector =ARRAY[1..$Nu] OF REAL;" echo " OutputVector =ARRAY[1..$Ny] OF REAL;" echo " IntegrationMethod = (Euler,ImplicitL,Implicit);" echo "VAR" echo " MTTt,mttLAST,mttDT,mttDDT : REAL;" + echo " MTTWMIN,mttWMAX : REAL;" echo " mttx,mttdx : StateVector;" echo " mttu : InputVector;" echo " mtty : OutputVector;" - echo " MTTi,MTTj,MTTit,MTTiLast,mttSTEPFACTOR : INTEGER;" + echo " MTTi,MTTj,MTTit,MTTiLast,mttSTEPFACTOR,mttWSTEPS : INTEGER;" echo " mttMETHOD : STRING;" ;; switch) echo "PROCEDURE $Sys_rep(VAR mttxs : StateVector;" echo " mttx : StateVector);"