applications/solvers/multiphase/twoPhaseEulerFoam/interfacialModels/dragModels/GidaspowErgunWenYu/GidaspowErgunWenYu.C

   1 /*---------------------------------------------------------------------------*\
   2   =========                 |
   3   \\      /  F ield         | OpenFOAM: The Open Source CFD Toolbox
   4    \\    /   O peration     |
   5     \\  /    A nd           | Copyright (C) 1991-2009 OpenCFD Ltd.
   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 the
  13     Free Software Foundation; either version 2 of the License, or (at your
  14     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, write to the Free Software Foundation,
  23     Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
  24
  25 \*---------------------------------------------------------------------------*/
  26
  27 #include "GidaspowErgunWenYu.H"
  28 #include "addToRunTimeSelectionTable.H"
  29
  30 // * * * * * * * * * * * * * * Static Data Members * * * * * * * * * * * * * //
  31
  32 namespace Foam
  33 {
  34     defineTypeNameAndDebug(GidaspowErgunWenYu, 0);
  35
  36     addToRunTimeSelectionTable
  37     (
  38         dragModel,
  39         GidaspowErgunWenYu,
  40         dictionary
  41     );
  42 }
  43
  44
  45 // * * * * * * * * * * * * * * * * Constructors  * * * * * * * * * * * * * * //
  46
  47 Foam::GidaspowErgunWenYu::GidaspowErgunWenYu
  48 (
  49     const dictionary& interfaceDict,
  50     const volScalarField& alpha,
  51     const phaseModel& phasea,
  52     const phaseModel& phaseb
  53 )
  54 :
  55     dragModel(interfaceDict, alpha, phasea, phaseb)
  56 {}
  57
  58
  59 // * * * * * * * * * * * * * * * * Destructor  * * * * * * * * * * * * * * * //
  60
  61 Foam::GidaspowErgunWenYu::~GidaspowErgunWenYu()
  62 {}
  63
  64
  65 // * * * * * * * * * * * * * * * Member Functions  * * * * * * * * * * * * * //
  66
  67 Foam::tmp<Foam::volScalarField> Foam::GidaspowErgunWenYu::K
  68 (
  69     const volScalarField& Ur
  70 ) const
  71 {
  72     volScalarField beta = max(scalar(1) - alpha_, scalar(1.0e-6));
  73
  74     volScalarField bp = pow(beta, -2.65);
  75     volScalarField Re = max(Ur*phasea_.d()/phaseb_.nu(), scalar(1.0e-3));
  76
  77     volScalarField Cds = 24.0*(1.0 + 0.15*pow(Re, 0.687))/Re;
  78
  79     forAll(Re, celli)
  80     {
  81         if(Re[celli] > 1000.0)
  82         {
  83             Cds[celli] = 0.44;
  84         }
  85     }
  86
  87     // Wen and Yu (1966)
  88     tmp<volScalarField> tKWenYu = 0.75*Cds*phaseb_.rho()*Ur*bp/phasea_.d();
  89     volScalarField& KWenYu = tKWenYu();
  90
  91     // Ergun
  92     forAll (beta, cellj)
  93     {
  94         if (beta[cellj] <= 0.8)
  95         {
  96             KWenYu[cellj] =
  97                 150.0*alpha_[cellj]*phaseb_.nu().value()*phaseb_.rho().value()
  98                /sqr(beta[cellj]*phasea_.d().value())
  99               + 1.75*phaseb_.rho().value()*Ur[cellj]
 100                /(beta[cellj]*phasea_.d().value());
 101         }
 102     }
 103
 104     return tKWenYu;
 105 }
 106
 107
 108 // ************************************************************************* //