Index: mttroot/mtt/bin/trans/ode2odess_m ================================================================== --- mttroot/mtt/bin/trans/ode2odess_m +++ mttroot/mtt/bin/trans/ode2odess_m @@ -13,10 +13,13 @@ ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ +## Revision 1.2 1996/09/13 19:40:51 peter +## Fixed problem with default paramaters. +## ## Revision 1.1 1996/09/12 19:26:57 peter ## Initial revision ## ## Revision 1.4 1996/08/16 13:04:46 peter ## Fixed problem with more than one output (y vector). @@ -33,32 +36,19 @@ ############################################################### echo Creating $1_odess.m rm -f ode2odess_m.log -if [ "$2" = "" ]; -then - PARAMS='T=[0:10]; u=ones(nu,1)*t;x0=ones(nx,1);' - echo Using default parameter $PARAMS - echo $PARAMS>$1_args.m -else - PARAMS=$2; -fi - -PARAMS="$PARAMS ;" - $MATRIX << EOF > ode2odess_m.log 2>mtt_error.txt %Read in parameters $1_numpar; [nx,ny,nu,nz,nyz] = $1_def; t=0; %Just in case it appears in the parameter list. - $PARAMS - %Defaults if exist('T')==0 T=[0:0.1:1] end;