SQLITE_NOTICE(283): recovered 5 frames from WAL file /data/mtt.fossil-wal
Differences From Artifact [0075b8f053]:
- Executable file mttroot/mtt/bin/trans/make_ode2odes — part of check-in [fc1fb36185] at 2000-11-10 14:19:50 on branch origin/master — Corrected the csex and cseo functions (user: gawthrop@users.sourceforge.net, size: 15106) [annotate] [blame] [check-ins using] [more...]
To Artifact [7cda0137f2]:
- Executable file mttroot/mtt/bin/trans/make_ode2odes — part of check-in [b9e3c0ebd6] at 2000-12-04 10:59:40 on branch origin/master — *** empty log message *** (user: gawthrop@users.sourceforge.net, size: 15196) [annotate] [blame] [check-ins using] [more...]
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 |
#! /bin/sh
######################################
##### Model Transformation Tools #####
######################################
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.41 2000/11/09 17:06:39 peterg
## Now does euler for cc
##
## Revision 1.40 2000/10/17 09:55:00 peterg
## Replaced switchopen by logic
##
## Revision 1.39 2000/10/14 08:04:40 peterg
| > > > | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 |
#! /bin/sh
######################################
##### Model Transformation Tools #####
######################################
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.42 2000/11/10 14:19:50 peterg
## Corrected the csex and cseo functions
##
## Revision 1.41 2000/11/09 17:06:39 peterg
## Now does euler for cc
##
## Revision 1.40 2000/10/17 09:55:00 peterg
## Replaced switchopen by logic
##
## Revision 1.39 2000/10/14 08:04:40 peterg
|
| ︙ | ︙ | |||
186 187 188 189 190 191 192 | ## Initialise t = 0.0; ddt = simpar.dt/simpar.stepfactor; ilast = round(simpar.last/ddt)+1; # Total number of steps ## Following removed due to p2c bug ## [u] = zero_input($Nu); # Zero the input | | | < > | 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 |
## Initialise
t = 0.0;
ddt = simpar.dt/simpar.stepfactor;
ilast = round(simpar.last/ddt)+1; # Total number of steps
## Following removed due to p2c bug
## [u] = zero_input($Nu); # Zero the input
for MTTi=1:$Ny
y(MTTi) = 0;
endfor;
mttj = 0;
for it = 1:ilast #Integration loop
[u] = ${sys}_input(x,y,t,par); # Input
[y] = ${sys}_$odeo(x,u,t,par); # Output
if mttj==0
mtt_write(t,x,y,$Nx,$Ny); # Write it out
endif
[dx] = ${sys}_$ode(x,u,t,par); # State derivative
EOF
if [ "$method" = "implicit" ]; then
|
| ︙ | ︙ |