Overview
Comment: | Put mtt or MTT in front of variable names to avoid clashes with globals |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | origin/master | trunk |
Files: | files | file ages | folders |
SHA3-256: |
8d8ebf28ffe6909bf391265f35f5a21a |
User & Date: | gawthrop@users.sourceforge.net on 1998-07-26 11:02:20 |
Other Links: | branch diff | manifest | tags |
Context
1998-07-26
| ||
11:11:32 | i --> MTTi check-in: d0d26321ed user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
11:02:20 |
Put mtt or MTT in front of variable names to avoid clashes with globals check-in: 8d8ebf28ff user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
11:00:18 | Put in exits-- this all needs a good clean check-in: 3d8f53654f user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
Changes
Modified mttroot/mtt/bin/trans/make_ode2odes from [4c6ad3aaed] to [353e7b8d60].
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$ ############################################################### # Bourne shell script: make_ode2odes # Copyright (c) P.J.Gawthrop July 1998. | > > > | 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.4 1998/07/25 20:14:00 peterg ## update code added for flexibility and octave efficiency ## ############################################################### # Bourne shell script: make_ode2odes # Copyright (c) P.J.Gawthrop July 1998. |
︙ | ︙ | |||
33 34 35 36 37 38 39 | # The rest of the program cat << EOF >> $1_ode2odes.m $1_simpar; # Read in simulation parameters $1_numpar; # Read in parameters | | | | | | | | | | | | | | | | 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 | # The rest of the program cat << EOF >> $1_ode2odes.m $1_simpar; # Read in simulation parameters $1_numpar; # Read in parameters MTTiLast = round(mttLAST/mttDT); # Total number of steps mttDDT = mttDT/mttSTEPFACTOR; #Initialise MTTt = 0.0; MTTx = $1_state; # Read in initial state MTTu = $1_input(MTTx,MTTt); # Evaluate initial input MTTy = $1_odeo(MTTx,MTTu,MTTt); # Evaluate initial output mtt_write(MTTt,MTTx,MTTy,$Nx,$Ny); # And write them #Integration loop for MTTit = 1:MTTiLast for MTTi = 1:mttSTEPFACTOR [MTTu] = $1_input(MTTx,MTTt);# Input [MTTx] = $1_switch(MTTx); # Switches [MTTdx] = $1_ode(MTTx,MTTu,MTTt); [MTTx] = mtt_update(MTTdx,MTTx,mttDDT,$Nx,mttMETHOD); [MTTy] = $1_odeo(MTTx,MTTu,MTTt); MTTt = MTTt + mttDDT; end; mtt_write(MTTt,MTTx,MTTy,$Nx,$Ny); end; EOF |