Overview
Comment: | Back under RCS for major revision |
---|---|
Downloads: | Tarball | ZIP archive | SQL 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 |
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 |
︙ | ︙ |