Mercurial > hg > octave-lyh
diff liboctave/DASPK.h @ 4049:a35a3c5d4740
[project @ 2002-08-16 08:54:31 by jwe]
author | jwe |
---|---|
date | Fri, 16 Aug 2002 08:54:31 +0000 |
parents | 9678c5526190 |
children | 6e86256e9c54 |
line wrap: on
line diff
--- a/liboctave/DASPK.h +++ b/liboctave/DASPK.h @@ -37,12 +37,14 @@ { public: - DASPK (void); + DASPK (void) : DAE (), DASPK_options (), initialized (false) { } - DASPK (const ColumnVector& x, double time, DAEFunc& f); + DASPK (const ColumnVector& state, double time, DAEFunc& f) + : DAE (state, time, f), DASPK_options (), initialized (false) { } - DASPK (const ColumnVector& x, const ColumnVector& xdot, - double time, DAEFunc& f); + DASPK (const ColumnVector& state, const ColumnVector& deriv, + double time, DAEFunc& f) + : DAE (state, deriv, time, f), DASPK_options (), initialized (false) { } ~DASPK (void) { } @@ -61,20 +63,26 @@ private: - int n; + bool initialized; + int liw; int lrw; - int sanity_checked; + Array<int> info; Array<int> iwork; + Array<double> rwork; - friend int ddaspk_j (double *time, double *state, double *deriv, - double *pd, double *cj, double *rpar, int *ipar); + Array<double> abs_tol; + Array<double> rel_tol; - friend int ddaspk_f (double *time, double *state, double *deriv, - double *delta, int *ires, double *rpar, int *ipar); - + double *px; + double *pxdot; + double *pabs_tol; + double *prel_tol; + int *pinfo; + int *piwork; + double *prwork; }; #endif