Index: mttroot/mtt/bin/trans/sm2sr_m ================================================================== --- mttroot/mtt/bin/trans/sm2sr_m +++ mttroot/mtt/bin/trans/sm2sr_m @@ -14,17 +14,20 @@ ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ +## Revision 1.1 1996/08/11 09:45:46 peter +## Initial revision +## ############################################################### echo Creating $1_sr.dat -$MATRIX << EOF | awk '$1 !~ /[A-Za-z]/ && NF>0 {print} ' >$1_sr.dat +$MATRIX << EOF | awk '$1 !~ /[A-MO-Zb-cf-z]/ && NF>0 {print} ' >$1_sr.dat - tmax=2; tstep=tmax/100; + tmax=0.01; tstep=tmax/100; T = [0:tstep:tmax]'; [A,B,C,D,E] = $1_dm($1_numpar); y = dm2sr(A,B,C,D,E,T); [Ny,Nu]=size(D);