Overview
| Comment: | Back under RCS for major revision |
|---|---|
| Downloads: | Tarball | ZIP archive |
| Timelines: | family | ancestors | descendants | both | origin/master | trunk |
| Files: | files | file ages | folders |
| SHA3-256: |
929cf15e7959131aad5e05f4ba25030c |
| User & Date: | gawthrop@users.sourceforge.net on 1998-07-13 09:56:31.000 |
| Other Links: | branch diff | manifest | tags |
Context
|
1998-07-15
| ||
| 09:26:50 | Reinstated the second column of the sympar file - the system name check-in: 595cf61fa1 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
|
1998-07-13
| ||
| 09:56:31 | Back under RCS for major revision check-in: 929cf15e79 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
|
1998-07-10
| ||
| 09:01:42 | Added error + info file in new form check-in: b3ebb38395 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
Changes
Modified mttroot/mtt/bin/trans/cse2csm_r
from [6480ffc8bd]
to [68e1e855e4].
| ︙ | ︙ | |||
10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 | # Copyright (c) P.J.Gawthrop, 1991, 1994. ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ ############################################################### # Inform user echo Creating $1_csm.r # Remove the old log file rm -f cse2csm_r.log # Use reduce to accomplish the transformation reduce >cse2csm_r.log << EOF in "$1_def.r"; in "$1_cse.r"; in "$1_cr.r"; | > > > | | 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 | # Copyright (c) P.J.Gawthrop, 1991, 1994. ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ # Revision 1.1 1996/08/25 10:13:37 peter # Initial revision # ############################################################### # Inform user echo Creating $1_csm.r # Remove the old log file rm -f cse2csm_r.log # Use reduce to accomplish the transformation reduce >cse2csm_r.log << EOF in "$1_def.r"; in "$1_cse.r"; in "$1_cr.r"; %%in "$1_sympar.r"; OFF Echo; OFF Nat; % Find MTTA : the A matrix matrix MTTA(MTTNx,MTTNx); |
| ︙ | ︙ | |||
70 71 72 73 74 75 76 |
FOR j := 1:MTTNu DO
BEGIN
xj := MTTU(j,1);
MTTD(i,j) := df(MTTY(i,1), xj, 1);
END;
%Substitute the ss values
| | | 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 |
FOR j := 1:MTTNu DO
BEGIN
xj := MTTU(j,1);
MTTD(i,j) := df(MTTY(i,1), xj, 1);
END;
%Substitute the ss values
in "$1_sspar.r";
%Create the output file
OUT "$1_csm.r";
%Write out the matrices.
IF MTTNx>0 THEN
BEGIN
|
| ︙ | ︙ |