This repository has been archived on 2023-11-20. You can view files and clone it, but cannot push or open issues or pull requests.
foam-extend4.1-coherent-io/applications/solvers/heatTransfer/chtMultiRegionFoam/solid/solidRegionDiffNo.C

61 lines
2.1 KiB
C
Raw Normal View History

2010-08-26 14:22:03 +00:00
/*---------------------------------------------------------------------------*\
========= |
2013-12-11 16:09:41 +00:00
\\ / F ield | foam-extend: Open Source CFD
\\ / O peration | Version: 3.2
\\ / A nd | Web: http://www.foam-extend.org
\\/ M anipulation | For copyright notice see file Copyright
2010-08-26 14:22:03 +00:00
-------------------------------------------------------------------------------
License
2013-12-11 16:09:41 +00:00
This file is part of foam-extend.
2010-08-26 14:22:03 +00:00
2013-12-11 16:09:41 +00:00
foam-extend is free software: you can redistribute it and/or modify it
under the terms of the GNU General Public License as published by the
Free Software Foundation, either version 3 of the License, or (at your
option) any later version.
2010-08-26 14:22:03 +00:00
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-08-26 14:22:03 +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-08-26 14:22:03 +00:00
\*---------------------------------------------------------------------------*/
#include "solidRegionDiffNo.H"
#include "fvc.H"
Foam::scalar Foam::solidRegionDiffNo
(
const fvMesh& mesh,
const Time& runTime,
const volScalarField& Cprho,
2015-08-05 11:34:57 +00:00
const volScalarField& Kappa
2010-08-26 14:22:03 +00:00
)
{
scalar DiNum = 0.0;
scalar meanDiNum = 0.0;
//- Can have fluid domains with 0 cells so do not test.
if (mesh.nInternalFaces())
{
2015-08-05 11:34:57 +00:00
surfaceScalarField KappaRhoCpbyDelta =
2010-08-26 14:22:03 +00:00
mesh.surfaceInterpolation::deltaCoeffs()
2015-08-05 11:34:57 +00:00
* fvc::interpolate(Kappa)
2010-08-26 14:22:03 +00:00
/ fvc::interpolate(Cprho);
2015-08-05 11:34:57 +00:00
DiNum = max(KappaRhoCpbyDelta.internalField())*runTime.deltaT().value();
2010-08-26 14:22:03 +00:00
2015-08-05 11:34:57 +00:00
meanDiNum = (average(KappaRhoCpbyDelta)).value()*runTime.deltaT().value();
2010-08-26 14:22:03 +00:00
}
Info<< "Region: " << mesh.name() << " Diffusion Number mean: " << meanDiNum
<< " max: " << DiNum << endl;
return DiNum;
}
// ************************************************************************* //