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.38 2000/10/11 09:08:08 peterg +## cse --> csex +## ## Revision 1.37 2000/08/01 12:25:06 peterg ## Now includes euler ## ## Revision 1.36 2000/05/19 17:48:16 peterg ## Argument to state @@ -185,12 +188,12 @@ u(MTTi) = 0; endfor; mttj = 0; for it = 1:ilast #Integration loop - [y] = $1_$odeo(x,u,t,par);# Output - [u] = $1_input(t,x,y); # Input + [y] = $1_$odeo(x,u,t,par); # Output + [u] = $1_input(x,y,t,par); # Input if mttj==0 mtt_write(t,x,y,$Nx,$Ny); # Write it out endif [dx] = $1_$ode(x,u,t,par); # State derivative EOF