Overview
Comment:removed zero_input to avoid p2c bug
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: 02ee217d884a858da5f37a1b1a7b4f9ba614236acbc92d7d32be87b8aefc5538
User & Date: gawthrop@users.sourceforge.net on 1999-08-27 06:02:16
Other Links: branch diff | manifest | tags
Context
1999-08-29
06:14:27
No longer remove "PASCAL_MAIN" check-in: ae5f44e139 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
1999-08-27
06:02:16
removed zero_input to avoid p2c bug check-in: 02ee217d88 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
1999-08-26
01:34:59
Summary line added check-in: e8362f24fa 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 [4001c8d825] to [6fe656eb37]. 

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.23  1999/08/02 13:39:19  peterg
## Replaced zero_vector by zero_input
##
## Revision 1.22  1999/04/20 06:16:07  peterg
## Removed initialisation of AA and AAx
## Remove _switch calls -- uses _switchopen exclusively
##
## Revision 1.21  1999/04/02 06:29:25  peterg
## New implicit method - solves numerical prob with ISW
##
︙
100
101
102
103
104
105
106
107

108
109
110
111
112
113
114

103
104
105
106
107
108
109

110
111
112
113
114
115
116
117








-
+









$1_simpar;			# Read in simulation parameters
$1_numpar;			# Read in parameters
MTTilast = round(mttlast/mttdt); # Total number of steps

#Initialise
MTTt = 0.0;
[MTTu]  = zero_input($Nu);	# Zero the input
####[MTTu]  = zero_input($Nu);	# Zero the input
#if $Nx>0
  [MTTx] = $1_state;	        # Read in initial state
#else
#  MTTx = 0;			# Dummy value
#endif;

[MTTy] = $1_odeo(MTTx,MTTu,MTTt); # Evaluate initial output
︙

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