compressibleInterFilmFoam.C
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 Application
25  compressibleInterFilmFoam
26 
27 Description
28  Solver for 2 compressible, non-isothermal immiscible fluids using a VOF
29  (volume of fluid) phase-fraction based interface capturing approach
30  and surface film modelling.
31 
32  The momentum and other fluid properties are of the "mixture" and a single
33  momentum equation is solved.
34 
35  Turbulence modelling is generic, i.e. laminar, RAS or LES may be selected.
36 
37 \*---------------------------------------------------------------------------*/
38 
39 #include "fvCFD.H"
40 #include "CMULES.H"
41 #include "EulerDdtScheme.H"
42 #include "localEulerDdtScheme.H"
43 #include "CrankNicolsonDdtScheme.H"
44 #include "subCycle.H"
46 #include "pimpleControl.H"
47 #include "SLGThermo.H"
48 #include "surfaceFilmModel.H"
49 #include "pimpleControl.H"
50 #include "fvOptions.H"
51 #include "fvcSmooth.H"
52 
53 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
54 
55 int main(int argc, char *argv[])
56 {
57  #include "postProcess.H"
58 
59  #include "setRootCaseLists.H"
60  #include "createTime.H"
61  #include "createMesh.H"
62  #include "createControl.H"
63  #include "createTimeControls.H"
64  #include "createFields.H"
65  #include "createSurfaceFilmModel.H"
66 
67  volScalarField& p = mixture.p();
68  volScalarField& T = mixture.T();
69  const volScalarField& psi1 = mixture.thermo1().psi();
70  const volScalarField& psi2 = mixture.thermo2().psi();
71 
72  regionModels::surfaceFilmModel& surfaceFilm = tsurfaceFilm();
73 
74  if (!LTS)
75  {
76  #include "readTimeControls.H"
77  #include "CourantNo.H"
78  #include "setInitialDeltaT.H"
79  }
80 
81  // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
82 
83  Info<< "\nStarting time loop\n" << endl;
84 
85  while (runTime.run())
86  {
87  #include "readTimeControls.H"
88 
89  if (LTS)
90  {
91  #include "setRDeltaT.H"
92  }
93  else
94  {
95  #include "CourantNo.H"
96  #include "alphaCourantNo.H"
97  #include "setDeltaT.H"
98  }
99 
100  runTime++;
101 
102  Info<< "Time = " << runTime.timeName() << nl << endl;
103 
104  surfaceFilm.evolve();
105 
106  // --- Pressure-velocity PIMPLE corrector loop
107  while (pimple.loop())
108  {
109  #include "alphaControls.H"
111 
112  turbulence.correctPhasePhi();
113 
114  volScalarField::Internal Srho(surfaceFilm.Srho());
115  contErr -= posPart(Srho);
116 
117  #include "UEqn.H"
118  #include "TEqn.H"
119 
120  // --- Pressure corrector loop
121  while (pimple.correct())
122  {
123  #include "pEqn.H"
124  }
125 
126  if (pimple.turbCorr())
127  {
128  turbulence.correct();
129  }
130  }
131 
132  runTime.write();
133 
134  Info<< "ExecutionTime = "
135  << runTime.elapsedCpuTime()
136  << " s\n\n" << endl;
137  }
138 
139  Info<< "End\n" << endl;
140 
141  return 0;
142 }
143 
144 
145 // ************************************************************************* //
pimpleNoLoopControl & pimple
engineTime & runTime
Ostream & endl(Ostream &os)
Add newline and flush stream.
Definition: Ostream.H:256
Read the control parameters used by setDeltaT.
dimensionedScalar posPart(const dimensionedScalar &ds)
GeometricField< scalar, fvPatchField, volMesh > volScalarField
Definition: volFieldsFwd.H:52
static const char nl
Definition: Ostream.H:265
bool LTS
Definition: createRDeltaT.H:1
Info<< "Reading field U\"<< endl;volVectorField U(IOobject("U", runTime.timeName(), mesh, IOobject::MUST_READ, IOobject::AUTO_WRITE), mesh);volScalarField rho(IOobject("rho", runTime.timeName(), mesh, IOobject::NO_READ, IOobject::AUTO_WRITE), thermo.rho());volVectorField rhoU(IOobject("rhoU", runTime.timeName(), mesh, IOobject::NO_READ, IOobject::NO_WRITE), rho *U);volScalarField rhoE(IOobject("rhoE", runTime.timeName(), mesh, IOobject::NO_READ, IOobject::NO_WRITE), rho *(e+0.5 *magSqr(U)));surfaceScalarField pos(IOobject("pos", runTime.timeName(), mesh), mesh, dimensionedScalar("pos", dimless, 1.0));surfaceScalarField neg(IOobject("neg", runTime.timeName(), mesh), mesh, dimensionedScalar("neg", dimless, -1.0));surfaceScalarField phi("phi", fvc::flux(rhoU));Info<< "Creating turbulence model\"<< endl;autoPtr< compressible::turbulenceModel > turbulence(compressible::turbulenceModel::New(rho, U, phi, thermo))
Definition: createFields.H:94
Info<< "Reading field p_rgh\"<< endl;volScalarField p_rgh(IOobject("p_rgh", runTime.timeName(), mesh, IOobject::MUST_READ, IOobject::AUTO_WRITE), mesh);Info<< "Reading field U\"<< endl;volVectorField U(IOobject("U", runTime.timeName(), mesh, IOobject::MUST_READ, IOobject::AUTO_WRITE), mesh);Info<< "Creating phaseChangeTwoPhaseMixture\"<< endl;autoPtr< phaseChangeTwoPhaseMixture > mixture
Definition: createFields.H:33
Info<< "\Constructing surface film model"<< endl;autoPtr< regionModels::surfaceFilmModel > tsurfaceFilm(regionModels::surfaceFilmModel::New(mesh, g))
messageStream Info
Execute application functionObjects to post-process existing results.
Provides functions smooth spread and sweep which use the FaceCellWave algorithm to smooth and redistr...
Read the control parameters used by setDeltaT.
CMULES: Multidimensional universal limiter for explicit corrected implicit solution.