src/thermophysicalModels/barotropicCompressibilityModel/Wallis/Wallis.C

   1 /*---------------------------------------------------------------------------*\
   2   =========                 |
   3   \\      /  F ield         | foam-extend: Open Source CFD
   4    \\    /   O peration     | Version:     3.2
   5     \\  /    A nd           | Web:         http://www.foam-extend.org
   6      \\/     M anipulation  | For copyright notice see file Copyright
   7 -------------------------------------------------------------------------------
   8 License
   9     This file is part of foam-extend.
  10
  11     foam-extend 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 3 of the License, or (at your
  14     option) any later version.
  15
  16     foam-extend is distributed in the hope that it will be useful, but
  17     WITHOUT ANY WARRANTY; without even the implied warranty of
  18     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  19     General Public License for more details.
  20
  21     You should have received a copy of the GNU General Public License
  22     along with foam-extend.  If not, see <http://www.gnu.org/licenses/>.
  23
  24 \*---------------------------------------------------------------------------*/
  25
  26 #include "Wallis.H"
  27 #include "addToRunTimeSelectionTable.H"
  28
  29 // * * * * * * * * * * * * * * Static Data Members * * * * * * * * * * * * * //
  30
  31 namespace Foam
  32 {
  33     namespace compressibilityModels
  34     {
  35         defineTypeNameAndDebug(Wallis, 0);
  36         addToRunTimeSelectionTable
  37         (
  38             barotropicCompressibilityModel,
  39             Wallis,
  40             dictionary
  41         );
  42     }
  43 }
  44
  45 // * * * * * * * * * * * * * * * * Constructors  * * * * * * * * * * * * * * //
  46
  47 Foam::compressibilityModels::Wallis::Wallis
  48 (
  49     const dictionary& compressibilityProperties,
  50     const volScalarField& gamma,
  51     const word& psiName
  52 )
  53 :
  54     barotropicCompressibilityModel(compressibilityProperties, gamma, psiName),
  55     psiv_(compressibilityProperties_.lookup("psiv")),
  56     psil_(compressibilityProperties_.lookup("psil")),
  57     rhovSat_(compressibilityProperties_.lookup("rhovSat")),
  58     rholSat_(compressibilityProperties_.lookup("rholSat"))
  59 {
  60     correct();
  61 }
  62
  63
  64 // * * * * * * * * * * * * * * Member Functions  * * * * * * * * * * * * * * //
  65
  66 void Foam::compressibilityModels::Wallis::correct()
  67 {
  68     psi_ =
  69         (gamma_*rhovSat_ + (scalar(1) - gamma_)*rholSat_)
  70        *(gamma_*psiv_/rhovSat_ + (scalar(1) - gamma_)*psil_/rholSat_);
  71 }
  72
  73
  74 bool Foam::compressibilityModels::Wallis::read
  75 (
  76     const dictionary& compressibilityProperties
  77 )
  78 {
  79     barotropicCompressibilityModel::read(compressibilityProperties);
  80
  81     compressibilityProperties_.lookup("psiv") >> psiv_;
  82     compressibilityProperties_.lookup("psil") >> psil_;
  83     compressibilityProperties_.lookup("rhovSat") >> rhovSat_;
  84     compressibilityProperties_.lookup("rholSat") >> rholSat_;
  85
  86     return true;
  87 }
  88
  89
  90 // ************************************************************************* //