Overview
| Comment: | Replaced zero_vector by zero_input |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | origin/master | trunk |
| Files: | files | file ages | folders |
| SHA3-256: |
4b203e774498e55fe2bb11ff93143d43 |
| User & Date: | gawthrop@users.sourceforge.net on 1999-08-02 13:39:19 |
| Other Links: | branch diff | manifest | tags |
Context
|
1999-08-02
| ||
| 13:39:27 | Initial revision check-in: 773866be10 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
| 13:39:19 | Replaced zero_vector by zero_input check-in: 4b203e7744 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
| 12:52:12 | Removed redundant .p copying. check-in: 2978f3a691 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
Changes
Modified mttroot/mtt/bin/trans/make_ode2odes from [81e64960c4] to [4001c8d825].
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.21 1999/04/02 06:29:25 peterg
## New implicit method - solves numerical prob with ISW
##
## Revision 1.20 1999/04/02 02:13:58 peterg
## Back to RCS
##
## Revision 1.19 1999/03/30 21:39:25 peterg
| > > > > | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 |
#! /bin/sh
######################################
##### Model Transformation Tools #####
######################################
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## 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
##
## Revision 1.20 1999/04/02 02:13:58 peterg
## Back to RCS
##
## Revision 1.19 1999/03/30 21:39:25 peterg
|
| ︙ | ︙ | |||
96 97 98 99 100 101 102 | $1_simpar; # Read in simulation parameters $1_numpar; # Read in parameters MTTilast = round(mttlast/mttdt); # Total number of steps #Initialise MTTt = 0.0; | | | 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 | $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 #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 |
| ︙ | ︙ |