2010-05-12 13:27:55 +00:00
|
|
|
/*---------------------------------------------------------------------------*\
|
|
|
|
========= |
|
2013-12-11 16:09:41 +00:00
|
|
|
\\ / F ield | foam-extend: Open Source CFD
|
2010-05-12 13:27:55 +00:00
|
|
|
\\ / O peration |
|
2013-12-11 16:09:41 +00:00
|
|
|
\\ / A nd | For copyright notice see file Copyright
|
2010-05-12 13:27:55 +00:00
|
|
|
\\/ M anipulation |
|
|
|
|
-------------------------------------------------------------------------------
|
|
|
|
License
|
2013-12-11 16:09:41 +00:00
|
|
|
This file is part of foam-extend.
|
2010-05-12 13:27:55 +00:00
|
|
|
|
2013-12-11 16:09:41 +00:00
|
|
|
foam-extend is free software: you can redistribute it and/or modify it
|
2010-05-12 13:27:55 +00:00
|
|
|
under the terms of the GNU General Public License as published by the
|
2013-12-11 16:09:41 +00:00
|
|
|
Free Software Foundation, either version 3 of the License, or (at your
|
2010-05-12 13:27:55 +00:00
|
|
|
option) any later version.
|
|
|
|
|
2013-12-11 16:09:41 +00:00
|
|
|
foam-extend is distributed in the hope that it will be useful, but
|
|
|
|
WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
|
|
General Public License for more details.
|
2010-05-12 13:27:55 +00:00
|
|
|
|
|
|
|
You should have received a copy of the GNU General Public License
|
2013-12-11 16:09:41 +00:00
|
|
|
along with foam-extend. If not, see <http://www.gnu.org/licenses/>.
|
2010-05-12 13:27:55 +00:00
|
|
|
|
|
|
|
\*---------------------------------------------------------------------------*/
|
|
|
|
|
|
|
|
#include "sigmaRadial.H"
|
|
|
|
#include "addToRunTimeSelectionTable.H"
|
|
|
|
|
|
|
|
// * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
|
|
|
|
|
|
|
|
namespace Foam
|
|
|
|
{
|
|
|
|
namespace extrudeModels
|
|
|
|
{
|
|
|
|
|
|
|
|
// * * * * * * * * * * * * * * Static Data Members * * * * * * * * * * * * * //
|
|
|
|
|
|
|
|
defineTypeNameAndDebug(sigmaRadial, 0);
|
|
|
|
|
|
|
|
addToRunTimeSelectionTable(extrudeModel, sigmaRadial, dictionary);
|
|
|
|
|
|
|
|
|
|
|
|
// * * * * * * * * * * * * * * * * Constructors * * * * * * * * * * * * * * //
|
|
|
|
|
|
|
|
sigmaRadial::sigmaRadial(const dictionary& dict)
|
|
|
|
:
|
|
|
|
extrudeModel(typeName, dict),
|
|
|
|
RTbyg_(readScalar(coeffDict_.lookup("RTbyg"))),
|
|
|
|
pRef_(readScalar(coeffDict_.lookup("pRef"))),
|
|
|
|
pStrat_(readScalar(coeffDict_.lookup("pStrat")))
|
|
|
|
{}
|
|
|
|
|
|
|
|
|
|
|
|
// * * * * * * * * * * * * * * * * Destructor * * * * * * * * * * * * * * * //
|
|
|
|
|
|
|
|
sigmaRadial::~sigmaRadial()
|
|
|
|
{}
|
|
|
|
|
|
|
|
|
|
|
|
// * * * * * * * * * * * * * * * * Operators * * * * * * * * * * * * * * * * //
|
|
|
|
|
|
|
|
point sigmaRadial::operator()
|
|
|
|
(
|
|
|
|
const point& surfacePoint,
|
|
|
|
const vector& surfaceNormal,
|
|
|
|
const label layer
|
|
|
|
) const
|
|
|
|
{
|
|
|
|
// radius of the surface
|
|
|
|
scalar rs = mag(surfacePoint);
|
|
|
|
vector rsHat = surfacePoint/rs;
|
|
|
|
|
|
|
|
scalar p = pRef_ - layer*(pRef_ - pStrat_)/nLayers_;
|
|
|
|
scalar r = rs - RTbyg_*log(p/pRef_);
|
|
|
|
|
|
|
|
return r*rsHat;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
// * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
|
|
|
|
|
|
|
|
} // End namespace extrudeModels
|
|
|
|
} // End namespace Foam
|
|
|
|
|
|
|
|
// ************************************************************************* //
|
|
|
|
|