00001 /*---------------------------------------------------------------------------*\ 00002 ========= | 00003 \\ / F ield | OpenFOAM: The Open Source CFD Toolbox 00004 \\ / O peration | 00005 \\ / A nd | Copyright (C) 2008-2010 OpenCFD Ltd. 00006 \\/ M anipulation | 00007 ------------------------------------------------------------------------------- 00008 License 00009 This file is part of OpenFOAM. 00010 00011 OpenFOAM is free software: you can redistribute it and/or modify it 00012 under the terms of the GNU General Public License as published by 00013 the Free Software Foundation, either version 3 of the License, or 00014 (at your option) any later version. 00015 00016 OpenFOAM is distributed in the hope that it will be useful, but WITHOUT 00017 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or 00018 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License 00019 for more details. 00020 00021 You should have received a copy of the GNU General Public License 00022 along with OpenFOAM. If not, see <http://www.gnu.org/licenses/>. 00023 00024 Application 00025 porousExplicitSourceReactingParcelFoam 00026 00027 Description 00028 Transient PISO solver for compressible, laminar or 00029 turbulent flow with reacting multiphase Lagrangian parcels 00030 for porous media, including explicit sources for mass, 00031 momentum and energy 00032 00033 The solver includes: 00034 - reacting multiphase parcel cloud 00035 - porous media 00036 - mass, momentum and energy sources 00037 - polynomial based, incompressible thermodynamics (f(T)) 00038 00039 Note 00040 ddtPhiCorr not used here when porous zones are active 00041 - not well defined for porous calculations 00042 00043 Usage 00044 - porousExplicitSourceReactingParcelFoam [OPTION] 00045 00046 @param -case <dir> \n 00047 Specify the case directory 00048 00049 @param -parallel \n 00050 Run the case in parallel 00051 00052 @param -help \n 00053 Display short usage message 00054 00055 @param -doc \n 00056 Display Doxygen documentation page 00057 00058 @param -srcDoc \n 00059 Display source code 00060 00061 \*---------------------------------------------------------------------------*/ 00062 00063 #include <finiteVolume/fvCFD.H> 00064 #include <reactionThermophysicalModels/hReactionThermo.H> 00065 #include <compressibleTurbulenceModel/turbulenceModel.H> 00066 #include <lagrangianIntermediate/BasicReactingMultiphaseCloud.H> 00067 #include <chemistryModel/rhoChemistryModel.H> 00068 #include <chemistryModel/chemistrySolver.H> 00069 #include <radiation/radiationModel.H> 00070 #include <finiteVolume/porousZones.H> 00071 #include <finiteVolume/timeActivatedExplicitSource.H> 00072 00073 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * // 00074 00075 int main(int argc, char *argv[]) 00076 { 00077 #include <OpenFOAM/setRootCase.H> 00078 00079 #include <OpenFOAM/createTime.H> 00080 #include <OpenFOAM/createMesh.H> 00081 #include "readChemistryProperties.H" 00082 #include <finiteVolume/readGravitationalAcceleration.H> 00083 #include "createFields.H" 00084 #include <radiation/createRadiationModel.H> 00085 #include "createClouds.H" 00086 #include "createExplicitSources.H" 00087 #include "createPorousZones.H" 00088 #include <finiteVolume/initContinuityErrs.H> 00089 #include <finiteVolume/readTimeControls.H> 00090 #include <finiteVolume/compressibleCourantNo.H> 00091 #include <finiteVolume/setInitialDeltaT.H> 00092 00093 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * // 00094 00095 Info<< "\nStarting time loop\n" << endl; 00096 00097 while (runTime.run()) 00098 { 00099 #include <finiteVolume/readTimeControls.H> 00100 #include <finiteVolume/readPISOControls.H> 00101 #include "readAdditionalSolutionControls.H" 00102 #include <finiteVolume/compressibleCourantNo.H> 00103 #include <finiteVolume/setDeltaT.H> 00104 00105 runTime++; 00106 00107 Info<< "Time = " << runTime.timeName() << nl << endl; 00108 00109 parcels.evolve(); 00110 00111 #include "chemistry.H" 00112 #include "rhoEqn.H" 00113 #include "UEqn.H" 00114 #include "YEqn.H" 00115 #include "hsEqn.H" 00116 00117 // --- PISO loop 00118 for (int corr=0; corr<nCorr; corr++) 00119 { 00120 #include "pEqn.H" 00121 } 00122 00123 turbulence->correct(); 00124 00125 rho = thermo.rho(); 00126 00127 if (runTime.write()) 00128 { 00129 chemistry.dQ()().write(); 00130 } 00131 00132 Info<< "ExecutionTime = " << runTime.elapsedCpuTime() << " s" 00133 << " ClockTime = " << runTime.elapsedClockTime() << " s" 00134 << nl << endl; 00135 } 00136 00137 Info<< "End\n" << endl; 00138 00139 return(0); 00140 } 00141 00142 00143 // ************************ vim: set sw=4 sts=4 et: ************************ //