initial commit for version 1.5.x patch release
[OpenFOAM-1.5.x.git] / applications / solvers / combustion / dieselEngineFoam / dieselEngineFoam.C
blobb6cfb46d9284989c6788d1b4782f10be0284fcf9
1 /*---------------------------------------------------------------------------*\
2   =========                 |
3   \\      /  F ield         | OpenFOAM: The Open Source CFD Toolbox
4    \\    /   O peration     |
5     \\  /    A nd           | Copyright (C) 1991-2008 OpenCFD Ltd.
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 the
13     Free Software Foundation; either version 2 of the License, or (at your
14     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, write to the Free Software Foundation,
23     Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
25 Application
26     dieselFoam
28 Description
29     Diesel engine spray and combustion code.
31 \*---------------------------------------------------------------------------*/
33 #include "fvCFD.H"
34 #include "engineTime.H"
35 #include "engineMesh.H"
36 #include "hCombustionThermo.H"
37 #include "compressible/RASModel/RASModel.H"
38 #include "spray.H"
39 #include "chemistryModel.H"
40 #include "chemistrySolver.H"
41 #include "multivariateScheme.H"
42 #include "Switch.H"
43 #include "OFstream.H"
45 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
47 int main(int argc, char *argv[])
49 #   include "setRootCase.H"
50 #   include "createEngineTime.H"
51 #   include "createEngineMesh.H"
52 #   include "createFields.H"
53 #   include "readEnvironmentalProperties.H"
54 #   include "readCombustionProperties.H"
55 #   include "createSpray.H"
56 #   include "initContinuityErrs.H"
57 #   include "readEngineTimeControls.H"
58 #   include "compressibleCourantNo.H"
59 #   include "setInitialDeltaT.H"
60 #   include "startSummary.H"
62 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
64     Info << "\nStarting time loop\n" << endl;
66     while (runTime.run())
67     {
68 #       include "readPISOControls.H"
69 #       include "readEngineTimeControls.H"
70 #       include "compressibleCourantNo.H"
71 #       include "setDeltaT.H"
73         runTime++;
75         Info<< "Crank angle = " << runTime.theta() << " CA-deg" << endl;
77         mesh.move();
78         vpi.updateMesh();
80         dieselSpray.evolve();
82         Info << "Solving chemistry" << endl;
84         chemistry.solve
85         (
86             runTime.value() - runTime.deltaT().value(),
87             runTime.deltaT().value()
88         );
90         // turbulent time scale
91         {
92             volScalarField tk =
93                 Cmix*sqrt(turbulence->muEff()/rho/turbulence->epsilon());
94             volScalarField tc = chemistry.tc();
96             //Chalmers PaSR model
97             kappa = (runTime.deltaT() + tc)/(runTime.deltaT() + tc + tk);
98         }
100 #       include "rhoEqn.H"
101 #       include "UEqn.H"
103         for (label ocorr=1; ocorr <= nOuterCorr; ocorr++)
104         {
105 #           include "YEqn.H"
106 #           include "hEqn.H"
108             // --- PISO loop
109             for (int corr=1; corr<=nCorr; corr++)
110             {
111 #               include "pEqn.H"
112             }
113         }
115         turbulence->correct();
117 #       include "logSummary.H"
118 #       include "spraySummary.H"
120         rho = thermo->rho();
122         runTime.write();
124         Info<< "ExecutionTime = " << runTime.elapsedCpuTime() << " s"
125             << "  ClockTime = " << runTime.elapsedClockTime() << " s"
126             << nl << endl;
127     }
129     Info<< "End\n" << endl;
131     return(0);
135 // ************************************************************************* //