Index: mttroot/mtt/bin/trans/cse2csm_r ================================================================== --- mttroot/mtt/bin/trans/cse2csm_r +++ mttroot/mtt/bin/trans/cse2csm_r @@ -12,10 +12,13 @@ ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ +# Revision 1.1 1996/08/25 10:13:37 peter +# Initial revision +# ############################################################### # Inform user echo Creating $1_csm.r @@ -26,11 +29,11 @@ reduce >cse2csm_r.log << EOF in "$1_def.r"; in "$1_cse.r"; in "$1_cr.r"; -in "$1_sympar.r"; +%%in "$1_sympar.r"; OFF Echo; OFF Nat; % Find MTTA : the A matrix @@ -72,11 +75,11 @@ xj := MTTU(j,1); MTTD(i,j) := df(MTTY(i,1), xj, 1); END; %Substitute the ss values -in "$1_ss.r"; +in "$1_sspar.r"; %Create the output file OUT "$1_csm.r"; %Write out the matrices.