Index: mttroot/mtt/bin/trans/ode_r2m ================================================================== --- mttroot/mtt/bin/trans/ode_r2m +++ mttroot/mtt/bin/trans/ode_r2m @@ -12,10 +12,13 @@ ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ +## Revision 1.2 1996/08/24 14:09:41 peter +## Global parameter passing. +## ## Revision 1.1 1996/08/18 12:03:49 peter ## Initial revision ## ############################################################### @@ -93,11 +96,11 @@ %Fortran switches - one line expressions OFF echo; ON fort$ cardno!* := 1$ -fortwidth!* := 100$ +fortwidth!* := 500$ OFF period$ MTTdx := MTTdx; SHUT "$1_ode.m"; @@ -115,11 +118,11 @@ %Fortran switches - one line expressions OFF echo; ON fort$ cardno!* := 1$ -fortwidth!* := 100$ +fortwidth!* := 500$ OFF period$ MTTy := MTTy; SHUT "$1_odeo.m";