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.28 1999/02/17 02:59:54 peterg +## Added -q switch to mtt +## ## Revision 1.27 1999/02/16 21:56:52 peterg ## Now gets standard include files directly from source, ## ## Revision 1.26 1999/02/16 21:43:54 peterg ## Revises smx generation. @@ -129,12 +132,13 @@ state) echo "PROCEDURE $Sys_rep(VAR mttx : StateVector);" ;; input) echo "PROCEDURE $Sys_rep(VAR mttu : InputVector;" + echo " mttt : REAL;" echo " mttx : StateVector;" - echo " mttt : REAL);" + echo " mtty : OutputVector);" ;; ode) echo "PROCEDURE $Sys_rep(VAR mttdx: StateVector;" echo " mttx : StateVector;" echo " mttu : InputVector;" @@ -173,20 +177,20 @@ echo " mttu : InputVector;" echo " mtty : OutputVector;" echo " mttAA : StateMatrix;" echo " MTTi,MTTj,MTTit,MTTjt,MTTiLast,mttSTEPFACTOR,mttWSTEPS,mttSTEPS,mttINPUT : INTEGER;" echo " mttMETHOD : IntegrationMethod;" + echo " MTTopen : StateVector;" echo "" ;; switch) echo "PROCEDURE $Sys_rep(VAR mttx : StateVector);" echo "VAR" echo " MTTi,MTTj : INTEGER;" ;; - switcha) - echo "PROCEDURE $Sys_rep(VAR mttAA : StateMatrix;" - echo " mttx : StateVector);" + switchopen) + echo "PROCEDURE $Sys_rep(VAR open : StateVector; mttx : StateVector);" echo "VAR" echo " MTTi,MTTj : INTEGER;" ;; *) echo "PROCEDURE $Sys_rep;" echo "VAR" @@ -281,11 +285,11 @@ printf("{%s %s_state.p}\n",inc,Sys) printf("{%s %s_input.p}\n",inc,Sys) printf("{%s %s_ode.p}\n",inc,Sys) printf("{%s %s_odeo.p}\n",inc,Sys) printf("{%s %s_switch.p}\n\n",inc,Sys) - printf("{%s %s_switcha.p}\n\n",inc,Sys) + printf("{%s %s_switchopen.p}\n\n",inc,Sys) printf("\n{%s %s_smx.p}\n",inc,Sys) for (k=1;k<=j;k++) printf("%s\n", comment[k]) printf("\n") printf("\nBEGIN{%s}\n", Sys_rep)