Overview
Comment:Changed arguments to _inout for consistency
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: a031b2bddea68aac187cd89b52cc9d4da9e13d27b0a719e92195bac9aa510643
User & Date: gawthrop@users.sourceforge.net on 2000-10-14 08:04:40
Other Links: branch diff | manifest | tags
Context
2000-10-14
08:50:07
Use new mtt_header check-in: 64256e8732 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
08:04:40
Changed arguments to _inout for consistency check-in: a031b2bdde user: gawthrop@users.sourceforge.net tags: origin/master, trunk
07:58:56
Put in leading spaces to prettify code check-in: 85ee2cc2bb user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes
Hide Diffs Side-by-Side Diffs Ignore Whitespace Patch

Modified mttroot/mtt/bin/trans/make_ode2odes from [8e1bc6b73a] to [6ea960f185]. 

1
2
3
4
5
6
7
8
9
10
11



12
13
14
15
16
17
18

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.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
##
## Revision 1.35  2000/05/18 18:59:40  peterg
︙
183
184
185
186
187
188
189
190
191


192
193
194
195
196
197
198

186
187
188
189
190
191
192


193
194
195
196
197
198
199
200
201








-
-
+
+








##  [u]  = zero_input($Nu);		# Zero the input
  for MTTi=1:$Nu
    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

if [ "$method" = "implicit" ]; then
︙

MTT: Model Transformation Tools
[ GitHub | SourceHut | Sourceforge | Fossil RSS ]