Mercurial > hg > octave-lyh
diff liboctave/LSODE.cc @ 3511:d92134062783
[project @ 2000-02-01 22:06:28 by jwe]
author | jwe |
---|---|
date | Tue, 01 Feb 2000 22:10:24 +0000 |
parents | 00fdd363c098 |
children | 7da18459c08b |
line wrap: on
line diff
--- a/liboctave/LSODE.cc +++ b/liboctave/LSODE.cc @@ -305,34 +305,6 @@ return retval; } -#if 0 -void -LSODE::integrate (int nsteps, double tstep, std::ostream& s) -{ - int time_to_quit = 0; - double tout = t; - - s << t << " " << x << "\n"; - - for (int i = 0; i < nsteps; i++) - { - tout += tstep; - if (stop_time_set && tout > stop_time) - { - tout = stop_time; - time_to_quit = 1; - } - - x = integrate (tout); - - s << t << " " << x << "\n"; - - if (time_to_quit) - return; - } -} -#endif - Matrix LSODE::do_integrate (const ColumnVector& tout) { @@ -362,7 +334,7 @@ } Matrix -LSODE::integrate (const ColumnVector& tout, const ColumnVector& tcrit) +LSODE::do_integrate (const ColumnVector& tout, const ColumnVector& tcrit) { Matrix retval; int n_out = tout.capacity ();