Overview
| Comment: | Put MTTYz := MTTYz outsise the BEGIN/END |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | origin/master | trunk |
| Files: | files | file ages | folders |
| SHA3-256: |
f4974ae64bea1e2657672b456e11d2ea |
| User & Date: | gawthrop@users.sourceforge.net on 1998-05-20 15:23:26 |
| Other Links: | branch diff | manifest | tags |
Context
|
1998-05-21
| ||
| 08:05:23 | Back under RCS check-in: 03f9899b7b user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
|
1998-05-20
| ||
| 15:23:26 | Put MTTYz := MTTYz outsise the BEGIN/END check-in: f4974ae64b user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
| 15:13:09 | Writes out algebraic equations (if any). check-in: 3f82cb70ab user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
Changes
Modified mttroot/mtt/bin/trans/dae2cse_r from [0b0b00053d] to [84ab35b399].
| ︙ | ︙ | |||
11 12 13 14 15 16 17 18 19 20 21 22 23 24 | # Copyright (c) P.J.Gawthrop 1991, 1992, 1994. ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ ## Revision 1.3 1998/03/03 09:02:46 peterg ## Replaced MTTEyx*MTTEdX + MTTEyu*MTTdu; term ## ## Revision 1.2 1997/08/26 08:22:36 peterg ## Changed ## MTTY := MTTY + MTTEyx*MTTdX + MTTEyu*MTTdu; ## to | > > > | 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 | # Copyright (c) P.J.Gawthrop 1991, 1992, 1994. ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ ## Revision 1.4 1998/05/20 15:13:09 peterg ## Writes out algebraic equations (if any). ## ## Revision 1.3 1998/03/03 09:02:46 peterg ## Replaced MTTEyx*MTTEdX + MTTEyu*MTTdu; term ## ## Revision 1.2 1997/08/26 08:22:36 peterg ## Changed ## MTTY := MTTY + MTTEyx*MTTdX + MTTEyu*MTTdu; ## to |
| ︙ | ︙ | |||
227 228 229 230 231 232 233 |
MTTEyx := MTTEyx;
%%%%% MTTdU := MTTdU;
END;
IF MTTNyz>0 THEN
BEGIN
write "matrix MTTYz(", MTTNyz, ",1)";
| < > | 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 |
MTTEyx := MTTEyx;
%%%%% MTTdU := MTTdU;
END;
IF MTTNyz>0 THEN
BEGIN
write "matrix MTTYz(", MTTNyz, ",1)";
END;
MTTYz := MTTYz;
write ";END;";
SHUT "$1_cse.r";
quit;
EOF
# Now invoke the standard error handling.
mtt_error_r dae2cse_r.log
|