1 /*---------------------------------------------------------------------------*\
3 \\ / F ield | OpenFOAM: The Open Source CFD Toolbox
5 \\ / A nd | Copyright held by original author
7 -------------------------------------------------------------------------------
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
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 \*---------------------------------------------------------------------------*/
28 #include "addToRunTimeSelectionTable.H"
30 // * * * * * * * * * * * * * * Static Data Members * * * * * * * * * * * * * //
34 namespace compressibilityModels
36 defineTypeNameAndDebug(Chung, 0);
37 addToRunTimeSelectionTable
39 barotropicCompressibilityModel,
46 // * * * * * * * * * * * * * * * * Constructors * * * * * * * * * * * * * * //
48 Foam::compressibilityModels::Chung::Chung
50 const dictionary& compressibilityProperties,
51 const volScalarField& gamma,
55 barotropicCompressibilityModel(compressibilityProperties, gamma, psiName),
56 psiv_(compressibilityProperties_.lookup("psiv")),
57 psil_(compressibilityProperties_.lookup("psil")),
58 rhovSat_(compressibilityProperties_.lookup("rhovSat")),
59 rholSat_(compressibilityProperties_.lookup("rholSat"))
65 // * * * * * * * * * * * * * * Member Functions * * * * * * * * * * * * * * //
67 void Foam::compressibilityModels::Chung::correct()
69 volScalarField sfa = sqrt
72 /((scalar(1) - gamma_)*rhovSat_/psiv_ + gamma_*rholSat_/psil_)
77 ((scalar(1) - gamma_)/sqrt(psiv_) + gamma_*sfa/sqrt(psil_))
78 *sqrt(psiv_*psil_)/sfa
83 bool Foam::compressibilityModels::Chung::read
85 const dictionary& compressibilityProperties
88 barotropicCompressibilityModel::read(compressibilityProperties);
90 compressibilityProperties_.lookup("psiv") >> psiv_;
91 compressibilityProperties_.lookup("psil") >> psil_;
92 compressibilityProperties_.lookup("rhovSat") >> rhovSat_;
93 compressibilityProperties_.lookup("rholSat") >> rholSat_;
99 // ************************************************************************* //