Program Listing for File model_ode.h

Return to documentation for file (include/amici/model_ode.h)

#ifndef AMICI_MODEL_ODE_H
#define AMICI_MODEL_ODE_H

#include "amici/event.h"
#include "amici/model.h"
#include <sundials/sundials_matrix.h>
#include <sundials/sundials_nvector.h>

#include <vector>

namespace amici {

class CVodeSolver;

class Model_ODE : public Model {
  public:
    Model_ODE() = default;

    Model_ODE(
        ModelDimensions const& model_dimensions,
        SimulationParameters simulation_parameters,
        SecondOrderMode const o2mode, std::vector<realtype> const& idlist,
        std::vector<int> const& z2event, std::vector<Event> events = {}
    )
        : Model(
              model_dimensions, simulation_parameters, o2mode, idlist, z2event,
              events
          ) {}

    void
    fJ(realtype t, realtype cj, AmiVector const& x, AmiVector const& dx,
       AmiVector const& xdot, SUNMatrix J) override;

    void fJ(realtype t, const_N_Vector x, const_N_Vector xdot, SUNMatrix J);

    void
    fJB(realtype t, realtype cj, AmiVector const& x, AmiVector const& dx,
        AmiVector const& xB, AmiVector const& dxB, AmiVector const& xBdot,
        SUNMatrix JB) override;

    void
    fJB(realtype t, const_N_Vector x, const_N_Vector xB, const_N_Vector xBdot,
        SUNMatrix JB);

    void fJSparse(
        realtype t, realtype cj, AmiVector const& x, AmiVector const& dx,
        AmiVector const& xdot, SUNMatrix J
    ) override;

    void fJSparse(realtype t, const_N_Vector x, SUNMatrix J);

    void fJSparseB(
        realtype t, realtype cj, AmiVector const& x, AmiVector const& dx,
        AmiVector const& xB, AmiVector const& dxB, AmiVector const& xBdot,
        SUNMatrix JB
    ) override;

    void fJSparseB(
        realtype t, const_N_Vector x, const_N_Vector xB, const_N_Vector xBdot,
        SUNMatrix JB
    );

    void fJDiag(realtype t, N_Vector JDiag, const_N_Vector x);

    void fJDiag(
        realtype t, AmiVector& JDiag, realtype cj, AmiVector const& x,
        AmiVector const& dx
    ) override;

    void
    fJv(realtype t, AmiVector const& x, AmiVector const& dx,
        AmiVector const& xdot, AmiVector const& v, AmiVector& Jv,
        realtype cj) override;

    void fJv(const_N_Vector v, N_Vector Jv, realtype t, const_N_Vector x);

    void fJvB(
        const_N_Vector vB, N_Vector JvB, realtype t, const_N_Vector x,
        const_N_Vector xB
    );

    void froot(
        realtype t, AmiVector const& x, AmiVector const& dx,
        gsl::span<realtype> root
    ) override;

    void froot(realtype t, const_N_Vector x, gsl::span<realtype> root);

    void fxdot(
        realtype t, AmiVector const& x, AmiVector const& dx, AmiVector& xdot
    ) override;

    void fxdot(realtype t, const_N_Vector x, N_Vector xdot);

    void fxBdot(realtype t, N_Vector x, N_Vector xB, N_Vector xBdot);

    void
    fqBdot(realtype t, const_N_Vector x, const_N_Vector xB, N_Vector qBdot);

    void fxBdot_ss(
        realtype t, AmiVector const& xB, AmiVector const& /*dxB*/,
        AmiVector& xBdot
    ) override;

    void fxBdot_ss(realtype t, const_N_Vector xB, N_Vector xBdot) const;

    void fqBdot_ss(realtype t, N_Vector xB, N_Vector qBdot) const;

    void fJSparseB_ss(SUNMatrix JB) override;

    void write_steady_state_JB(
        realtype t, realtype cj, AmiVector const& x, AmiVector const& dx,
        AmiVector const& xB, AmiVector const& dxB, AmiVector const& xBdot
    ) override;

    void fsxdot(
        realtype t, AmiVector const& x, AmiVector const& dx, int ip,
        AmiVector const& sx, AmiVector const& sdx, AmiVector& sxdot
    ) override;

    void fsxdot(
        realtype t, const_N_Vector x, int ip, const_N_Vector sx, N_Vector sxdot
    );

    std::unique_ptr<Solver> create_solver() override;

  protected:
    virtual void fJSparse(
        realtype* JSparse, realtype t, realtype const* x, realtype const* p,
        realtype const* k, realtype const* h, realtype const* w,
        realtype const* dwdx
    );

    virtual void fJSparse_colptrs(SUNMatrixWrapper& JSparse);

    virtual void fJSparse_rowvals(SUNMatrixWrapper& JSparse);

    virtual void froot(
        realtype* root, realtype t, realtype const* x, realtype const* p,
        realtype const* k, realtype const* h, realtype const* w,
        realtype const* tcl
    );

    virtual void fxdot(
        realtype* xdot, realtype t, realtype const* x, realtype const* p,
        realtype const* k, realtype const* h, realtype const* w
    ) = 0;

    virtual void fdxdotdp_explicit(
        realtype* dxdotdp_explicit, realtype t, realtype const* x,
        realtype const* p, realtype const* k, realtype const* h,
        realtype const* w
    );

    virtual void fdxdotdp_explicit_colptrs(SUNMatrixWrapper& dxdotdp);

    virtual void fdxdotdp_explicit_rowvals(SUNMatrixWrapper& dxdotdp);

    virtual void fdxdotdx_explicit(
        realtype* dxdotdx_explicit, realtype t, realtype const* x,
        realtype const* p, realtype const* k, realtype const* h,
        realtype const* w
    );

    virtual void fdxdotdx_explicit_colptrs(SUNMatrixWrapper& dxdotdx);

    virtual void fdxdotdx_explicit_rowvals(SUNMatrixWrapper& dxdotdx);

    virtual void fdxdotdw(
        realtype* dxdotdw, realtype t, realtype const* x, realtype const* p,
        realtype const* k, realtype const* h, realtype const* w
    );

    virtual void fdxdotdw_colptrs(SUNMatrixWrapper& dxdotdw);

    virtual void fdxdotdw_rowvals(SUNMatrixWrapper& dxdotdw);

    void fdxdotdw(realtype t, const_N_Vector x);

    void fdxdotdp(realtype t, const_N_Vector x);

    void fdxdotdp(realtype t, AmiVector const& x, AmiVector const& dx) override;
};
} // namespace amici

#endif // MODEL_H