Index: mttroot/mtt/bin/trans/make_ode2odes ================================================================== --- mttroot/mtt/bin/trans/make_ode2odes +++ mttroot/mtt/bin/trans/make_ode2odes @@ -7,10 +7,13 @@ ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ +## Revision 1.35 2000/05/18 18:59:40 peterg +## Removed the First time stuff +## ## Revision 1.34 2000/05/16 18:56:14 peterg ## *** empty log message *** ## ## Revision 1.33 2000/05/11 19:33:18 peterg ## Uniform version for _sim.m @@ -149,21 +152,21 @@ lang_header $1 ode2odes m 'x,par,simpar' '[Y,X,t]' > $1_ode2odes.m cat >> $1_ode2odes.m <<EOF global MTT_data; - if nargin<1 - x = $1_state; - [x] = mtt_state_update(x); + if nargin<3 + simpar = $1_simpar; + [simpar.dt] = mtt_simpar_update; endif if nargin<2 par = $1_numpar; [par] = mtt_numpar_update(par); endif - if nargin<3 - simpar = $1_simpar; - [simpar.dt] = mtt_simpar_update; + if nargin<1 + [x] = $1_state(par); + [x] = mtt_state_update(x); endif ## Initialise t = 0.0; ilast = round(simpar.last/simpar.dt)+1; # Total number of steps