BUG: UListIO: byteSize overflowing on really big faceLists
[OpenFOAM-2.0.x.git] / src / thermophysicalModels / chemistryModel / chemistrySolver / sequential / sequential.C
blobfa773944bd470534660ec9779fdee930377baa78
1 /*---------------------------------------------------------------------------*\
2   =========                 |
3   \\      /  F ield         | OpenFOAM: The Open Source CFD Toolbox
4    \\    /   O peration     |
5     \\  /    A nd           | Copyright (C) 2011 OpenFOAM Foundation
6      \\/     M anipulation  |
7 -------------------------------------------------------------------------------
8 License
9     This file is part of OpenFOAM.
11     OpenFOAM is free software: you can redistribute it and/or modify it
12     under the terms of the GNU General Public License as published by
13     the Free Software Foundation, either version 3 of the License, or
14     (at your option) any later version.
16     OpenFOAM is distributed in the hope that it will be useful, but WITHOUT
17     ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
18     FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
19     for more details.
21     You should have received a copy of the GNU General Public License
22     along with OpenFOAM.  If not, see <http://www.gnu.org/licenses/>.
24 \*---------------------------------------------------------------------------*/
26 #include "sequential.H"
27 #include "addToRunTimeSelectionTable.H"
29 // * * * * * * * * * * * * * * * * Constructors  * * * * * * * * * * * * * * //
31 template<class ODEChemistryType>
32 Foam::sequential<ODEChemistryType>::sequential
34     const fvMesh& mesh,
35     const word& ODEModelName,
36     const word& thermoType
39     chemistrySolver<ODEChemistryType>(mesh, ODEModelName, thermoType),
40     coeffsDict_(this->subDict("sequentialCoeffs")),
41     cTauChem_(readScalar(coeffsDict_.lookup("cTauChem"))),
42     eqRateLimiter_(coeffsDict_.lookup("equilibriumRateLimiter"))
46 // * * * * * * * * * * * * * * * * Destructor  * * * * * * * * * * * * * * * //
48 template<class ODEChemistryType>
49 Foam::sequential<ODEChemistryType>::~sequential()
53 // * * * * * * * * * * * * * * * Member Functions  * * * * * * * * * * * * * //
55 template<class ODEChemistryType>
56 Foam::scalar Foam::sequential<ODEChemistryType>::solve
58     scalarField &c,
59     const scalar T,
60     const scalar p,
61     const scalar t0,
62     const scalar dt
63 ) const
65     scalar tChemInv = SMALL;
67     scalar pf, cf, pb, cb;
68     label lRef, rRef;
70     forAll(this->reactions(), i)
71     {
72         scalar omega = this->omegaI(i, c, T, p, pf, cf, lRef, pb, cb, rRef);
74         if (eqRateLimiter_)
75         {
76             if (omega < 0.0)
77             {
78                 omega /= 1.0 + pb*dt;
79             }
80             else
81             {
82                 omega /= 1.0 + pf*dt;
83             }
84         }
86         tChemInv = max(tChemInv, mag(omega));
88         this->updateConcsInReactionI(i, dt, omega, c);
89     }
91     return cTauChem_/tChemInv;
95 // ************************************************************************* //