Index: mttroot/mtt/bin/trans/octave_ode2odes ================================================================== --- mttroot/mtt/bin/trans/octave_ode2odes +++ mttroot/mtt/bin/trans/octave_ode2odes @@ -11,15 +11,23 @@ ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ +## Revision 1.1 1999/03/15 23:27:16 peterg +## Initial revision +## ############################################################### echo Creating $1_odes.dat2 -$MATRIX -q <octave_ode2odes.log +$MATRIX <octave_ode2odes.log 2>mtt_error.txt global MTT_data $1_ode2odes; + if is_complex(MTT_data) + mtt_error("octave_ode2odes: Simulated data is complex - something is wrong!"); + MTT_data = real(MTT_data); + endif; save -ascii $1_odes.dat2 MTT_data EOF +mtt_error mtt_error.txt