Overview
| Comment: | Write EdX regardless - csex is needed to create ode when not optimised. |
|---|---|
| Downloads: | Tarball | ZIP archive |
| Timelines: | family | ancestors | descendants | both | origin/master | trunk |
| Files: | files | file ages | folders |
| SHA3-256: |
35095f6bf3be526bd3a548ca790c6f5f |
| User & Date: | geraint@users.sourceforge.net on 2002-09-03 19:34:15.000 |
| Other Links: | branch diff | manifest | tags |
Context
|
2002-09-11
| ||
| 14:17:36 | Modified for new qp_mu algorithms check-in: 5c4767b05b user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
|
2002-09-03
| ||
| 19:34:16 | Created branch global-optimisation check-in: d53bcb0661 user: gawthrop@users.sourceforge.net tags: origin/global-optimisation, trunk | |
| 19:34:15 | Write EdX regardless - csex is needed to create ode when not optimised. check-in: 35095f6bf3 user: geraint@users.sourceforge.net tags: origin/master, trunk | |
|
2002-08-30
| ||
| 15:39:04 |
Read fix_c.r before ese.r and explicitly overload ** operator with pow(). These changes are required for the Codemist version of Reduce. check-in: cbecb36981 user: geraint@users.sourceforge.net tags: origin/master, trunk | |
Changes
Modified mttroot/mtt/bin/trans/def2write_r
from [c9ea406b2d]
to [bdaa78ff6b].
| ︙ | ︙ | |||
9 10 11 12 13 14 15 16 17 18 19 20 21 22 | # Copyright (C) 2000 by Peter J. Gawthrop ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ ## Revision 1.14 2002/08/09 14:34:45 geraint ## Fix to prevent numbers being formed with a decimal point in the exponent, Reduce cannot handle these. ## ## Revision 1.13 2002/07/10 17:43:05 geraint ## Added feature [ 562453 ] Optimisation of algebraic equations. ## ## Revision 1.12 2002/06/28 10:13:40 geraint | > > > > | 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 | # Copyright (C) 2000 by Peter J. Gawthrop ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ ## Revision 1.15 2002/08/29 15:45:20 geraint ## Tests for existence of matrix before entering shell loop. ## Tests for existence of expression before attempting to write or optimise. ## ## Revision 1.14 2002/08/09 14:34:45 geraint ## Fix to prevent numbers being formed with a decimal point in the exponent, Reduce cannot handle these. ## ## Revision 1.13 2002/07/10 17:43:05 geraint ## Added feature [ 562453 ] Optimisation of algebraic equations. ## ## Revision 1.12 2002/06/28 10:13:40 geraint |
| ︙ | ︙ | |||
227 228 229 230 231 232 233 |
else
echo 'off echo$'
echo 'load gentran$'
fi >> $1_$2_write.r
for matrix in $matrices; do
matrix_exists=`grep -i MTT${matrix} ${sys}_dae.r | wc -l | gawk '{print $1}'`
| | | 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 |
else
echo 'off echo$'
echo 'load gentran$'
fi >> $1_$2_write.r
for matrix in $matrices; do
matrix_exists=`grep -i MTT${matrix} ${sys}_dae.r | wc -l | gawk '{print $1}'`
if [ "$matrix" = "EdX" -o $matrix_exists -gt 0 ]; then
n=`first "$ns"`; ns=`rest "$ns"`
m=`first "$ms"`; ms=`rest "$ms"`
is=`n2m 1 $n`;
js=`n2m 1 $m`;
if [ $n -ge 1 ]; then
for i in $is; do
for j in $js; do
|
| ︙ | ︙ |