applications/solvers/combustion/PDRFoam/PDRFoam.C

   1 /*---------------------------------------------------------------------------*\
   2   =========                 |
   3   \\      /  F ield         | OpenFOAM: The Open Source CFD Toolbox
   4    \\    /   O peration     |
   5     \\  /    A nd           | Copyright (C) 1991-2009 OpenCFD Ltd.
   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 the
  13     Free Software Foundation; either version 2 of the License, or (at your
  14     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, write to the Free Software Foundation,
  23     Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
  24
  25 Application
  26     PDRFoam
  27
  28 Description
  29     Solver for compressible premixed/partially-premixed combustion with
  30     turbulence modelling.
  31
  32     Combusting RANS code using the b-Xi two-equation model.
  33     Xi may be obtained by either the solution of the Xi transport
  34     equation or from an algebraic exression.  Both approaches are
  35     based on Gulder's flame speed correlation which has been shown
  36     to be appropriate by comparison with the results from the
  37     spectral model.
  38
  39     Strain effects are incorporated directly into the Xi equation
  40     but not in the algebraic approximation.  Further work need to be
  41     done on this issue, particularly regarding the enhanced removal rate
  42     caused by flame compression.  Analysis using results of the spectral
  43     model will be required.
  44
  45     For cases involving very lean Propane flames or other flames which are
  46     very strain-sensitive, a transport equation for the laminar flame
  47     speed is present.  This equation is derived using heuristic arguments
  48     involving the strain time scale and the strain-rate at extinction.
  49     the transport velocity is the same as that for the Xi equation.
  50
  51     For large flames e.g. explosions additional modelling for the flame
  52     wrinkling due to surface instabilities may be applied.
  53
  54     PDR (porosity/distributed resistance) modelling is included to handle
  55     regions containing blockages which cannot be resolved by the mesh.
  56
  57 \*---------------------------------------------------------------------------*/
  58
  59 #include "fvCFD.H"
  60 #include "hhuCombustionThermo.H"
  61 #include "RASModel.H"
  62 #include "laminarFlameSpeed.H"
  63 #include "XiModel.H"
  64 #include "PDRDragModel.H"
  65 #include "ignition.H"
  66 #include "Switch.H"
  67 #include "bound.H"
  68
  69 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
  70
  71 int main(int argc, char *argv[])
  72 {
  73     #include "setRootCase.H"
  74
  75     #include "createTime.H"
  76     #include "createMesh.H"
  77     #include "readCombustionProperties.H"
  78     #include "readGravitationalAcceleration.H"
  79     #include "createFields.H"
  80     #include "initContinuityErrs.H"
  81     #include "readTimeControls.H"
  82     #include "CourantNo.H"
  83     #include "setInitialDeltaT.H"
  84
  85     scalar StCoNum = 0.0;
  86
  87     // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
  88
  89     Info<< "\nStarting time loop\n" << endl;
  90
  91     while (runTime.run())
  92     {
  93         #include "readTimeControls.H"
  94         #include "readPISOControls.H"
  95         #include "CourantNo.H"
  96         #include "setDeltaT.H"
  97
  98         runTime++;
  99
 100         Info<< "\n\nTime = " << runTime.timeName() << endl;
 101
 102         #include "rhoEqn.H"
 103         #include "UEqn.H"
 104
 105         // --- PISO loop
 106         for (int corr=1; corr<=nCorr; corr++)
 107         {
 108             #include "bEqn.H"
 109             #include "ftEqn.H"
 110             #include "huEqn.H"
 111             #include "hEqn.H"
 112
 113             if (!ign.ignited())
 114             {
 115                 hu == h;
 116             }
 117
 118             #include "pEqn.H"
 119         }
 120
 121         turbulence->correct();
 122
 123         runTime.write();
 124
 125         Info<< "\nExecutionTime = "
 126              << runTime.elapsedCpuTime()
 127              << " s\n" << endl;
 128     }
 129
 130     Info<< "\n end\n";
 131
 132     return 0;
 133 }
 134
 135
 136 // ************************************************************************* //