37 Rosenbrock12::gamma = 1 + 1.0/
std::sqrt(2.0),
38 Rosenbrock12::a21 = 1.0/gamma,
39 Rosenbrock12::c2 = 1.0,
40 Rosenbrock12::c21 = -2.0/gamma,
41 Rosenbrock12::b1 = (3.0/2.0)/gamma,
42 Rosenbrock12::b2 = (1.0/2.0)/gamma,
43 Rosenbrock12::e1 = b1 - 1.0/gamma,
44 Rosenbrock12::e2 = b2,
45 Rosenbrock12::d1 = gamma,
46 Rosenbrock12::d2 = -gamma;
109 a_(i, j) = -dfdy_(i, j);
112 a_(i, i) += 1.0/(gamma*dx);
120 k1_[i] = dydx0[i] + dx*d1*dfdx_[i];
128 y[i] = y0[i] + a21*k1_[i];
135 k2_[i] = dydx_[i] + dx*d2*dfdx_[i] + c21*k1_[i]/dx;
143 y[i] = y0[i] + b1*k1_[i] + b2*k2_[i];
144 err_[i] = e1*k1_[i] + e2*k2_[i];
#define forAll(list, i)
Loop across all elements in list.
Abstract base class for the systems of ordinary differential equations.
virtual bool resize()=0
Resize the ODE solver.
A list of keyword definitions, which are a keyword followed by any number of values (e...
void LUDecompose(scalarSquareMatrix &matrix, labelList &pivotIndices)
LU decompose the matrix with pivoting.
dimensionedScalar sqrt(const dimensionedScalar &ds)
virtual void derivatives(const scalar x, const scalarField &y, const label li, scalarField &dydx) const =0
Calculate the derivatives in dydx.
An ODE solver for chemistry.
scalar normaliseError(const scalarField &y0, const scalarField &y, const scalarField &err) const
Return the normalised scalar error.
Macros for easy insertion into run-time selection tables.
virtual bool resize()
Resize the ODE solver.
virtual scalar solve(const scalar x0, const scalarField &y0, const label li, const scalarField &dydx0, const scalar dx, scalarField &y) const
Solve a single step dx and return the error.
bool resize(const label n)
Resize the ODE solver.
void resizeMatrix(scalarSquareMatrix &m) const
const ODESystem & odes_
Reference to ODESystem.
addToRunTimeSelectionTable(ensightPart, ensightPartCells, istream)
defineTypeNameAndDebug(combustionModel, 0)
Abstract base-class for ODE system solvers.
virtual void jacobian(const scalar x, const scalarField &y, const label li, scalarField &dfdx, scalarSquareMatrix &dfdy) const =0
Calculate the Jacobian of the system.
Rosenbrock12(const ODESystem &ode, const dictionary &dict)
Construct from ODESystem.
static void resizeField(UList< Type > &f, const label n)
virtual scalar solve(const scalar x0, const scalarField &y0, const label li, const scalarField &dydx0, const scalar dx, scalarField &y) const =0
Solve a single step dx and return the error.
label n_
Size of the ODESystem (adjustable)
void LUBacksubstitute(const scalarSquareMatrix &luMmatrix, const labelList &pivotIndices, List< Type > &source)
LU back-substitution with given source, returning the solution.