1 /*---------------------------------------------------------------------------*\
3 \\ / F ield | OpenFOAM: The Open Source CFD Toolbox
5 \\ / A nd | Copyright (C) 1991-2008 OpenCFD Ltd.
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
37 defineTypeNameAndDebug(Chung, 0);
38 addToRunTimeSelectionTable(barotropicCompressibilityModel, Chung, dictionary);
43 // * * * * * * * * * * * * * * * * Constructors * * * * * * * * * * * * * * //
45 Foam::compressibilityModels::Chung::Chung
47 const dictionary& compressibilityProperties,
48 const volScalarField& gamma
51 barotropicCompressibilityModel(compressibilityProperties, gamma),
52 psiv_(compressibilityProperties_.lookup("psiv")),
53 psil_(compressibilityProperties_.lookup("psil")),
54 rhovSat_(compressibilityProperties_.lookup("rhovSat")),
55 rholSat_(compressibilityProperties_.lookup("rholSat"))
61 // * * * * * * * * * * * * * * Member Functions * * * * * * * * * * * * * * //
63 void Foam::compressibilityModels::Chung::correct()
65 volScalarField sfa = sqrt
68 /((scalar(1) - gamma_)*rhovSat_/psiv_ + gamma_*rholSat_/psil_)
73 ((scalar(1) - gamma_)/sqrt(psiv_) + gamma_*sfa/sqrt(psil_))
74 *sqrt(psiv_*psil_)/sfa
79 bool Foam::compressibilityModels::Chung::read
81 const dictionary& compressibilityProperties
84 barotropicCompressibilityModel::read(compressibilityProperties);
86 compressibilityProperties_.lookup("psiv") >> psiv_;
87 compressibilityProperties_.lookup("psil") >> psil_;
88 compressibilityProperties_.lookup("rhovSat") >> rhovSat_;
89 compressibilityProperties_.lookup("rholSat") >> rholSat_;
95 // ************************************************************************* //