FreeFOAM The Cross-Platform CFD Toolkit
coalChemistryFoam.C
Go to the documentation of this file.
1 /*---------------------------------------------------------------------------*\
2  ========= |
3  \\ / F ield | OpenFOAM: The Open Source CFD Toolbox
4  \\ / O peration |
5  \\ / A nd | Copyright (C) 2008-2010 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
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 Application
25  coalChemistryFoam
26 
27 Description
28  Transient solver for compressible, turbulent flow with coal and
29  limestone parcel injections, and combustion.
30 
31 Usage
32  - coalChemistryFoam [OPTION]
33 
34  @param -case <dir> \n
35  Specify the case directory
36 
37  @param -parallel \n
38  Run the case in parallel
39 
40  @param -help \n
41  Display short usage message
42 
43  @param -doc \n
44  Display Doxygen documentation page
45 
46  @param -srcDoc \n
47  Display source code
48 
49 \*---------------------------------------------------------------------------*/
50 
51 #include <finiteVolume/fvCFD.H>
60 
61 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
62 
63 int main(int argc, char *argv[])
64 {
65  #include <OpenFOAM/setRootCase.H>
66 
67  #include <OpenFOAM/createTime.H>
68  #include <OpenFOAM/createMesh.H>
69  #include "readChemistryProperties.H"
71  #include "createFields.H"
72  #include "createClouds.H"
78 
79  // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
80 
81  Info<< "\nStarting time loop\n" << endl;
82 
83  while (runTime.run())
84  {
88  #include <finiteVolume/setDeltaT.H>
89 
90  runTime++;
91 
92  Info<< "Time = " << runTime.timeName() << nl << endl;
93 
94  rhoEffLagrangian = coalParcels.rhoEff() + limestoneParcels.rhoEff();
95  pDyn = 0.5*rho*magSqr(U);
96 
97  coalParcels.evolve();
98 
99  limestoneParcels.evolve();
100 
101  #include "chemistry.H"
102  #include "rhoEqn.H"
103 
104  // --- PIMPLE loop
105  for (int ocorr=1; ocorr<=nOuterCorr; ocorr++)
106  {
107  #include "UEqn.H"
108  #include "YEqn.H"
109  #include "hsEqn.H"
110 
111  // --- PISO loop
112  for (int corr=1; corr<=nCorr; corr++)
113  {
114  #include "pEqn.H"
115  }
116  }
117 
118  turbulence->correct();
119 
120  rho = thermo.rho();
121 
122  if (runTime.write())
123  {
124  chemistry.dQ()().write();
125  }
126 
127  Info<< "ExecutionTime = " << runTime.elapsedCpuTime() << " s"
128  << " ClockTime = " << runTime.elapsedClockTime() << " s"
129  << nl << endl;
130  }
131 
132  Info<< "End\n" << endl;
133 
134  return(0);
135 }
136 
137 
138 // ************************ vim: set sw=4 sts=4 et: ************************ //