initial commit for version 1.5.x patch release
[OpenFOAM-1.5.x.git] / applications / solvers / compressible / sonicLiquidFoam / sonicLiquidFoam.C
blob97889b8fe61fb611c836d684336b96c3149c681e
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     sonicLiquidFoam
28 Description
29     Transient solver for trans-sonic/supersonic, laminar flow of a
30     compressible liquid.
32 \*---------------------------------------------------------------------------*/
34 #include "fvCFD.H"
36 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
38 int main(int argc, char *argv[])
41 #   include "setRootCase.H"
42 #   include "createTime.H"
43 #   include "createMesh.H"
44 #   include "readThermodynamicProperties.H"
45 #   include "readTransportProperties.H"
46 #   include "createFields.H"
47 #   include "initContinuityErrs.H"
49 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
51     Info<< "\nStarting time loop\n" << endl;
53     for (runTime++; !runTime.end(); runTime++)
54     {
55         Info<< "Time = " << runTime.timeName() << nl << endl;
57 #       include "readPISOControls.H"
58 #       include "compressibleCourantNo.H"
60 #       include "rhoEqn.H"
62         fvVectorMatrix UEqn
63         (
64             fvm::ddt(rho, U)
65           + fvm::div(phi, U)
66           - fvm::laplacian(mu, U)
67         );
69         solve(UEqn == -fvc::grad(p));
72         // --- PISO loop
74         for (int corr=0; corr<nCorr; corr++)
75         {
76             volScalarField rUA = 1.0/UEqn.A();
77             U = rUA*UEqn.H();
79             surfaceScalarField phid
80             (
81                 "phid",
82                 psi*
83                 (
84                     (fvc::interpolate(U) & mesh.Sf())
85                   + fvc::ddtPhiCorr(rUA, rho, U, phi)
86                 )
87             );
89             phi = (rhoO/psi)*phid;
91             fvScalarMatrix pEqn
92             (
93                 fvm::ddt(psi, p)
94               + fvc::div(phi)
95               + fvm::div(phid, p)
96               - fvm::laplacian(rho*rUA, p)
97             );
99             pEqn.solve();
101             phi += pEqn.flux();
103 #           include "compressibleContinuityErrs.H"
105             U -= rUA*fvc::grad(p);
106             U.correctBoundaryConditions();
107         }
109         rho = rhoO + psi*p;
111         runTime.write();
113         Info<< "ExecutionTime = " << runTime.elapsedCpuTime() << " s"
114             << "  ClockTime = " << runTime.elapsedClockTime() << " s"
115             << nl << endl;
116     }
118     Info<< "End\n" << endl;
120     return(0);
124 // ************************************************************************* //