Overview
Comment:Fixed problem with more than one output (y vector).
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: 57084c7bf11979be1fca6a5a2854b0e77433251e0c67f1c36f2330eb16f49455
User & Date: gawthrop@users.sourceforge.net on 1996-08-16 13:04:46
Other Links: branch diff | manifest | tags
Context
1996-08-16
13:10:53
Fixed bug Ny changed to Nx in redidual loop. check-in: 73ee98f275 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
13:04:46
Fixed problem with more than one output (y vector). check-in: 57084c7bf1 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
12:58:58
Now does preferred causality of I and C. check-in: 4064008eaa user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Modified mttroot/mtt/bin/trans/ode2odes_m from [d32a28e7bf] to [75108a9087].

︙︙
11
12
13
14
15
16
17



18
19
20
21
22
23
24

# Copyright (c) P.J.Gawthrop, 1996.

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$



## Revision 1.2  1996/08/15 16:24:43  peter
## Uses T in place of t to avoid name clash within function.
##
## Revision 1.1  1996/08/15 11:56:38  peter
## Initial revision
##
###############################################################








>
>
>








11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27

# Copyright (c) P.J.Gawthrop, 1996.

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.3  1996/08/16 06:36:03  peter
## Removed u from default arg list.
##
## Revision 1.2  1996/08/15 16:24:43  peter
## Uses T in place of t to avoid name clash within function.
##
## Revision 1.1  1996/08/15 11:56:38  peter
## Initial revision
##
###############################################################
︙︙
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77

  end;

x = lsode('$1_ode', x0, T);

i=0;
for tt=T'
  i=i+1;
  y(i) = $1_odeo(x(i,:),tt);
end;

write_matrix([T,y], '$1_odesol');

EOF














|












62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80

  end;

x = lsode('$1_ode', x0, T);

i=0;
for tt=T'
  i=i+1;
  y(i,:) = $1_odeo(x(i,:),tt)';
end;

write_matrix([T,y], '$1_odesol');

EOF

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