1 /*---------------------------------------------------------------------------*\
3 \\ / F ield | OpenFOAM: The Open Source CFD Toolbox
5 \\ / A nd | Copyright (C) 1991-2009 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 \*---------------------------------------------------------------------------*/
27 #include "SyamlalOBrien.H"
28 #include "addToRunTimeSelectionTable.H"
30 // * * * * * * * * * * * * * * Static Data Members * * * * * * * * * * * * * //
34 defineTypeNameAndDebug(SyamlalOBrien, 0);
36 addToRunTimeSelectionTable
45 // * * * * * * * * * * * * * * * * Constructors * * * * * * * * * * * * * * //
47 Foam::SyamlalOBrien::SyamlalOBrien
49 const dictionary& interfaceDict,
50 const volScalarField& alpha,
51 const phaseModel& phasea,
52 const phaseModel& phaseb
55 dragModel(interfaceDict, alpha, phasea, phaseb)
59 // * * * * * * * * * * * * * * * * Destructor * * * * * * * * * * * * * * * //
61 Foam::SyamlalOBrien::~SyamlalOBrien()
65 // * * * * * * * * * * * * * * * Member Functions * * * * * * * * * * * * * //
67 Foam::tmp<Foam::volScalarField> Foam::SyamlalOBrien::K
69 const volScalarField& Ur
72 volScalarField beta = max(scalar(1) - alpha_, scalar(1.0e-6));
73 volScalarField A = pow(beta, 4.14);
74 volScalarField B = 0.8*pow(beta, 1.28);
78 if (beta[celli] > 0.85)
80 B[celli] = pow(beta[celli], 2.65);
84 volScalarField Re = max(Ur*phasea_.d()/phaseb_.nu(), scalar(1.0e-3));
86 volScalarField Vr = 0.5*
88 A - 0.06*Re + sqrt(sqr(0.06*Re) + 0.12*Re*(2.0*B - A) + sqr(A))
91 volScalarField Cds = sqr(0.63 + 4.8*sqrt(Vr/Re));
93 return 0.75*Cds*phaseb_.rho()*Ur/(phasea_.d()*sqr(Vr));
97 // ************************************************************************* //