setRDeltaT.H
Go to the documentation of this file.
1 /*---------------------------------------------------------------------------*\
2  ========= |
3  \\ / F ield | OpenFOAM: The Open Source CFD Toolbox
4  \\ / O peration | Website: https://openfoam.org
5  \\ / A nd | Copyright (C) 2011-2018 OpenFOAM Foundation
6  \\/ M anipulation |
7 -------------------------------------------------------------------------------
8 License
9  This file is part of OpenFOAM.
10 
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.
15 
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.
20 
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/>.
23 
24 \*---------------------------------------------------------------------------*/
25 
26 {
27  volScalarField& rDeltaT = trDeltaT.ref();
28 
29  const dictionary& pimpleDict = pimple.dict();
30 
31  // Maximum flow Courant number
32  scalar maxCo(readScalar(pimpleDict.lookup("maxCo")));
33 
34  // Maximum time scale
35  scalar maxDeltaT(pimpleDict.lookupOrDefault<scalar>("maxDeltaT", great));
36 
37  // Smoothing parameter (0-1) when smoothing iterations > 0
39  (
40  pimpleDict.lookupOrDefault<scalar>("rDeltaTSmoothingCoeff", 0.1)
41  );
42 
43  // Damping coefficient (1-0)
44  scalar rDeltaTDampingCoeff
45  (
46  pimpleDict.lookupOrDefault<scalar>("rDeltaTDampingCoeff", 0.2)
47  );
48 
49  // Maximum change in cell temperature per iteration
50  // (relative to previous value)
51  scalar alphaTemp(pimpleDict.lookupOrDefault("alphaTemp", 0.05));
52 
53 
54  Info<< "Time scales min/max:" << endl;
55 
56  // Cache old reciprocal time scale field
57  volScalarField rDeltaT0("rDeltaT0", rDeltaT);
58 
59  // Flow time scale
60  {
61  rDeltaT.ref() =
62  (
63  fvc::surfaceSum(mag(phi))()()
64  /((2*maxCo)*mesh.V()*rho())
65  );
66 
67  // Limit the largest time scale
68  rDeltaT.max(1/maxDeltaT);
69 
70  Info<< " Flow = "
71  << gMin(1/rDeltaT.primitiveField()) << ", "
72  << gMax(1/rDeltaT.primitiveField()) << endl;
73  }
74 
75  // Reaction source time scale
76  {
77  volScalarField::Internal rDeltaTT
78  (
79  mag
80  (
81  (coalParcels.hsTrans() + limestoneParcels.hsTrans())
82  /(mesh.V()*runTime.deltaT())
83  + Qdot
84  )
85  /(
86  alphaTemp
87  *rho()
88  *thermo.Cp()()()
89  *T()
90  )
91  );
92 
93  Info<< " Temperature = "
94  << gMin(1/(rDeltaTT.field() + vSmall)) << ", "
95  << gMax(1/(rDeltaTT.field() + vSmall)) << endl;
96 
97  rDeltaT.ref() = max
98  (
99  rDeltaT(),
100  rDeltaTT
101  );
102  }
103 
104  // Update tho boundary values of the reciprocal time-step
105  rDeltaT.correctBoundaryConditions();
106 
107  // Spatially smooth the time scale field
108  if (rDeltaTSmoothingCoeff < 1.0)
109  {
111  }
112 
113  // Limit rate of change of time scale
114  // - reduce as much as required
115  // - only increase at a fraction of old time scale
116  if
117  (
118  rDeltaTDampingCoeff < 1.0
119  && runTime.timeIndex() > runTime.startTimeIndex() + 1
120  )
121  {
122  rDeltaT = max
123  (
124  rDeltaT,
125  (scalar(1) - rDeltaTDampingCoeff)*rDeltaT0
126  );
127  }
128 
129  Info<< " Overall = "
130  << gMin(1/rDeltaT.primitiveField())
131  << ", " << gMax(1/rDeltaT.primitiveField()) << endl;
132 }
133 
134 
135 // ************************************************************************* //
#define readScalar
Definition: doubleScalar.C:38
scalar maxCo(readScalar(pimpleDict.lookup("maxCo")))
pimpleNoLoopControl & pimple
surfaceScalarField & phi
dimensioned< Type > max(const dimensioned< Type > &, const dimensioned< Type > &)
Type gMin(const FieldField< Field, Type > &f)
engineTime & runTime
Ostream & endl(Ostream &os)
Add newline and flush stream.
Definition: Ostream.H:256
rhoReactionThermo & thermo
Definition: createFields.H:28
scalar Qdot
Definition: solveChemistry.H:2
void smooth(volScalarField &field, const scalar coeff)
Definition: fvcSmooth.C:35
volScalarField rDeltaT0("rDeltaT0", rDeltaT)
GeometricField< scalar, fvPatchField, volMesh > volScalarField
Definition: volFieldsFwd.H:52
dynamicFvMesh & mesh
scalar rDeltaTDampingCoeff(pimpleDict.lookupOrDefault< scalar >("rDeltaTDampingCoeff", 1.0))
Type gMax(const FieldField< Field, Type > &f)
scalar maxDeltaT(pimpleDict.lookupOrDefault< scalar >("maxDeltaT", great))
scalar alphaTemp(pimpleDict.lookupOrDefault("alphaTemp", 0.05))
const volScalarField & T
messageStream Info
dimensioned< scalar > mag(const dimensioned< Type > &)
tmp< GeometricField< Type, fvPatchField, volMesh > > surfaceSum(const GeometricField< Type, fvsPatchField, surfaceMesh > &ssf)
tmp< volScalarField > trDeltaT
Definition: createRDeltaT.H:3
scalar rDeltaTSmoothingCoeff(pimpleDict.lookupOrDefault< scalar >("rDeltaTSmoothingCoeff", 0.1))