40 Rosenbrock12::gamma = 1 + 1.0/
std::sqrt(2.0),
41 Rosenbrock12::a21 = 1.0/
gamma,
42 Rosenbrock12::c2 = 1.0,
43 Rosenbrock12::c21 = -2.0/
gamma,
44 Rosenbrock12::b1 = (3.0/2.0)/
gamma,
45 Rosenbrock12::b2 = (1.0/2.0)/
gamma,
46 Rosenbrock12::e1 = b1 - 1.0/
gamma,
47 Rosenbrock12::e2 = b2,
49 Rosenbrock12::d2 = -
gamma;
103 odes_.jacobian(x0,
y0, dfdx_, dfdy_);
105 for (label i=0; i<n_; i++)
107 for (label j=0; j<n_; j++)
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];
131 odes_.derivatives(x0 +
c2*dx,
y, dydx_);
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];
147 return normalizeError(
y0,
y, err_);
virtual scalar solve(const scalar x0, const scalarField &y0, const scalarField &dydx0, const scalar dx, scalarField &y) const =0
Solve a single step dx and return the error.
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 a number of values (eg...
void LUDecompose(scalarSquareMatrix &matrix, labelList &pivotIndices)
LU decompose the matrix with pivoting.
const dimensionedScalar c2
Second radiation constant: default SI units: [m.K].
dimensionedScalar sqrt(const dimensionedScalar &ds)
dimensionedScalar y0(const dimensionedScalar &ds)
An ODE solver for chemistry.
Macros for easy insertion into run-time selection tables.
virtual scalar solve(const scalar x0, const scalarField &y0, const scalarField &dydx0, const scalar dx, scalarField &y) const
Solve a single step dx and return the error.
#define forAll(list, i)
Loop across all elements in list.
virtual bool resize()
Resize the ODE solver.
bool resize(const label n)
Resize the ODE solver.
void resizeMatrix(scalarSquareMatrix &m) const
Field< scalar > scalarField
Specialisation of Field<T> for scalar.
defineTypeNameAndDebug(combustionModel, 0)
addToRunTimeSelectionTable(decompositionMethod, kahipDecomp, dictionary)
Abstract base-class for ODE system solvers.
Rosenbrock12(const ODESystem &ode, const dictionary &dict)
Construct from ODESystem.
static void resizeField(UList< Type > &f, const label n)
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 in the source.