atmPlantCanopyTurbSourceTemplates.C
Go to the documentation of this file.
1/*---------------------------------------------------------------------------*\
2 ========= |
3 \\ / F ield | OpenFOAM: The Open Source CFD Toolbox
4 \\ / O peration |
5 \\ / A nd | www.openfoam.com
6 \\/ M anipulation |
7-------------------------------------------------------------------------------
8 Copyright (C) 2020 ENERCON GmbH
9 Copyright (C) 2020 OpenCFD Ltd.
10-------------------------------------------------------------------------------
11License
12 This file is part of OpenFOAM.
13
14 OpenFOAM is free software: you can redistribute it and/or modify it
15 under the terms of the GNU General Public License as published by
16 the Free Software Foundation, either version 3 of the License, or
17 (at your option) any later version.
18
19 OpenFOAM is distributed in the hope that it will be useful, but WITHOUT
20 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
21 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
22 for more details.
23
24 You should have received a copy of the GNU General Public License
25 along with OpenFOAM. If not, see <http://www.gnu.org/licenses/>.
26
27\*---------------------------------------------------------------------------*/
28
30#include "volFields.H"
31
32// * * * * * * * * * * * * * * * Member Functions * * * * * * * * * * * * * //
33
34template<class AlphaFieldType, class RhoFieldType>
35void Foam::fv::atmPlantCanopyTurbSource::atmPlantCanopyTurbSourceEpsilon
36(
37 const AlphaFieldType& alpha,
38 const RhoFieldType& rho,
39 fvMatrix<scalar>& eqn,
40 const label fieldi
41) const
42{
43 const auto* turbPtr =
45 (
47 );
48 const volScalarField& epsilon = turbPtr->epsilon();
49 const volVectorField::Internal& U = turbPtr->U()();
50
51 eqn -= fvm::Sp(alpha()*rho()*(C1_ - C2_)*calcPlantCanopyTerm(U), epsilon);
52}
53
54
55template<class AlphaFieldType, class RhoFieldType>
56void Foam::fv::atmPlantCanopyTurbSource::atmPlantCanopyTurbSourceOmega
57(
58 const AlphaFieldType& alpha,
59 const RhoFieldType& rho,
60 fvMatrix<scalar>& eqn,
61 const label fieldi
62) const
63{
64 const auto* turbPtr =
65 mesh_.findObject<turbulenceModel>
66 (
68 );
69 const volScalarField& omega = turbPtr->omega();
70 const volVectorField::Internal& U = turbPtr->U()();
72 mesh_.lookupObjectRef<volScalarField::Internal>
73 (
74 word(turbPtr->type() + ":gamma")
75 );
77 mesh_.lookupObjectRef<volScalarField::Internal>
78 (
79 word(turbPtr->type() + ":beta")
80 );
81
82 eqn -= fvm::Sp(alpha()*rho()*(gamma - beta)*calcPlantCanopyTerm(U), omega);
83}
84
85
86// ************************************************************************* //
DimensionedField< vector, volMesh > Internal
The internal field type from which this GeometricField is derived.
const fvMesh & mesh_
Reference to the mesh database.
Definition: fvOption.H:139
const Type * findObject(const word &name, const bool recursive=false) const
Return const pointer to the object of the given Type.
static const word propertiesName
Default name of the turbulence properties dictionary.
U
Definition: pEqn.H:72
const scalar gamma
Definition: EEqn.H:9
scalar epsilon
ThermalDiffusivity< CompressibleTurbulenceModel< fluidThermo > > turbulenceModel
zeroField Sp(const Foam::zero, const GeometricField< Type, fvPatchField, volMesh > &)
A no-op source.
GeometricField< scalar, fvPatchField, volMesh > volScalarField
Definition: volFieldsFwd.H:82
volScalarField & alpha
dimensionedScalar beta("beta", dimless/dimTemperature, laminarTransport)