COPASI API  4.16.103
common.cpp
Go to the documentation of this file.
1 /* Begin CVS Header
2  $Source: /Volumes/Home/Users/shoops/cvs/copasi_dev/copasi/odepack++/common.cpp,v $
3  $Revision: 1.3 $
4  $Name: $
5  $Author: shoops $
6  $Date: 2006/06/20 13:19:11 $
7  End CVS Header */
8 
9 // Copyright 2006 by Pedro Mendes, Virginia Tech Intellectual
10 // Properties, Inc. and EML Research, gGmbH.
11 // All rights reserved.
12 //
13 // This C++ code is based on an f2c conversion of the Fortran
14 // library ODEPACK available at: http://www.netlib.org/odepack/
15 
16 #include "copasi.h"
17 
18 #include "common.h"
19 
20 PJAC::PJAC(): mpMethod(NULL) {}
21 
22 PJAC::PJAC(C_INT (*pMethod)(C_INT *neq, double *y, double *yh,
23  C_INT *nyh, double *ewt, double *ftem,
24  double *savf, double *wm, C_INT *iwm,
25  evalF f, evalJ jac)) : mpMethod(pMethod) {}
26 
28 
29 C_INT PJAC::operator() (C_INT *neq, double *y, double *yh,
30  C_INT *nyh, double *ewt, double *ftem,
31  double *savf, double *wm, C_INT *iwm,
32  evalF f, evalJ jac)
33 {return (*mpMethod)(neq, y, yh, nyh, ewt, ftem, savf, wm, iwm, f, jac);}
34 
35 SLVS::SLVS() : mpMethod(NULL) {}
36 
37 SLVS::SLVS(C_INT (*pMethod)(double *wm, C_INT *iwm, double *x, double *tem)):
38  mpMethod(pMethod)
39 {}
40 
42 
43 C_INT SLVS::operator() (double *wm, C_INT *iwm, double *x,
44  double *tem)
45 {return (*mpMethod)(wm, iwm, x, tem);}
#define C_INT
Definition: copasi.h:115
virtual C_INT operator()(C_INT *neq, double *y, double *yh, C_INT *nyh, double *ewt, double *ftem, double *savf, double *wm, C_INT *iwm, evalF f, evalJ jac)
Definition: common.cpp:29
SLVS()
Definition: common.cpp:35
PJAC()
Definition: common.cpp:20
void(* evalF)(const C_INT *, const double *, const double *, double *)
Definition: common.h:29
virtual ~PJAC()
Definition: common.cpp:27
virtual ~SLVS()
Definition: common.cpp:41
void(* evalJ)(const C_INT *, const double *, const double *, const C_INT *, const C_INT *, double *, const C_INT *)
Definition: common.h:30
C_INT(* mpMethod)(double *wm, C_INT *iwm, double *x, double *tem)
Definition: common.h:203
C_INT(* mpMethod)(C_INT *neq, double *y, double *yh, C_INT *nyh, double *ewt, double *ftem, double *savf, double *wm, C_INT *iwm, evalF f, evalJ jac)
Definition: common.h:149
virtual C_INT operator()(double *wm, C_INT *iwm, double *x, double *tem)
Definition: common.cpp:43