mirror of
https://develop.openfoam.com/Development/openfoam.git
synced 2025-12-28 03:37:59 +00:00
d13c9810e8
MULES: Add support for explicit correction interPhaseChangeFoam: Add option for explicit MULES or as correction to an upwind solution Deprecate implicit form of MULES
120 lines
3.1 KiB
C
120 lines
3.1 KiB
C
/*---------------------------------------------------------------------------*\
|
|
========= |
|
|
\\ / F ield | OpenFOAM: The Open Source CFD Toolbox
|
|
\\ / O peration |
|
|
\\ / A nd | Copyright (C) 2011-2013 OpenFOAM Foundation
|
|
\\/ M anipulation |
|
|
-------------------------------------------------------------------------------
|
|
License
|
|
This file is part of OpenFOAM.
|
|
|
|
OpenFOAM 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.
|
|
|
|
OpenFOAM 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.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with OpenFOAM. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
\*---------------------------------------------------------------------------*/
|
|
|
|
#include "MULES.H"
|
|
|
|
// * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
|
|
|
|
void Foam::MULES::explicitSolve
|
|
(
|
|
volScalarField& psi,
|
|
const surfaceScalarField& phi,
|
|
surfaceScalarField& phiPsi,
|
|
const scalar psiMax,
|
|
const scalar psiMin
|
|
)
|
|
{
|
|
explicitSolve
|
|
(
|
|
geometricOneField(),
|
|
psi,
|
|
phi,
|
|
phiPsi,
|
|
zeroField(), zeroField(),
|
|
psiMax, psiMin
|
|
);
|
|
}
|
|
|
|
|
|
void Foam::MULES::correct
|
|
(
|
|
volScalarField& psi,
|
|
surfaceScalarField& phiPsiCorr,
|
|
const scalar psiMax,
|
|
const scalar psiMin
|
|
)
|
|
{
|
|
correct
|
|
(
|
|
geometricOneField(),
|
|
psi,
|
|
phiPsiCorr,
|
|
zeroField(), zeroField(),
|
|
psiMax, psiMin
|
|
);
|
|
}
|
|
|
|
|
|
void Foam::MULES::limitSum(UPtrList<scalarField>& phiPsiCorrs)
|
|
{
|
|
forAll(phiPsiCorrs[0], facei)
|
|
{
|
|
scalar sumPos = 0;
|
|
scalar sumNeg = 0;
|
|
|
|
for (int phasei=0; phasei<phiPsiCorrs.size(); phasei++)
|
|
{
|
|
if (phiPsiCorrs[phasei][facei] > 0)
|
|
{
|
|
sumPos += phiPsiCorrs[phasei][facei];
|
|
}
|
|
else
|
|
{
|
|
sumNeg += phiPsiCorrs[phasei][facei];
|
|
}
|
|
}
|
|
|
|
scalar sum = sumPos + sumNeg;
|
|
|
|
if (sum > 0 && sumPos > VSMALL)
|
|
{
|
|
scalar lambda = -sumNeg/sumPos;
|
|
|
|
for (int phasei=0; phasei<phiPsiCorrs.size(); phasei++)
|
|
{
|
|
if (phiPsiCorrs[phasei][facei] > 0)
|
|
{
|
|
phiPsiCorrs[phasei][facei] *= lambda;
|
|
}
|
|
}
|
|
}
|
|
else if (sum < 0 && sumNeg < -VSMALL)
|
|
{
|
|
scalar lambda = -sumPos/sumNeg;
|
|
|
|
for (int phasei=0; phasei<phiPsiCorrs.size(); phasei++)
|
|
{
|
|
if (phiPsiCorrs[phasei][facei] < 0)
|
|
{
|
|
phiPsiCorrs[phasei][facei] *= lambda;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
// ************************************************************************* //
|