mirror of
https://develop.openfoam.com/Development/openfoam.git
synced 2025-11-28 03:28:01 +00:00
ThermoParcel: Improved numerical stability of heat transfer term
Patch contributed by Timo Niemi, VTT. Resolves bug-report https://bugs.openfoam.org/view.php?id=2655
This commit is contained in:
committed by
Andrew Heather
parent
0a97c3fc95
commit
c0bc17ea50
@ -282,7 +282,8 @@ Foam::scalar Foam::ThermoParcel<ParcelType>::calcHeatTransfer
|
|||||||
const scalar As = this->areaS(d);
|
const scalar As = this->areaS(d);
|
||||||
|
|
||||||
scalar ap = Tc_ + Sh/(As*htc);
|
scalar ap = Tc_ + Sh/(As*htc);
|
||||||
scalar bp = 6.0*(Sh/As + htc*(Tc_ - T_));
|
const scalar bp = 6.0*htc/max(rho*d*Cp_, ROOTVSMALL);
|
||||||
|
|
||||||
if (td.cloud().radiation())
|
if (td.cloud().radiation())
|
||||||
{
|
{
|
||||||
tetIndices tetIs = this->currentTetIndices();
|
tetIndices tetIs = this->currentTetIndices();
|
||||||
@ -294,9 +295,7 @@ Foam::scalar Foam::ThermoParcel<ParcelType>::calcHeatTransfer
|
|||||||
scalar s = epsilon*(Gc/4.0 - sigma*pow4(T_));
|
scalar s = epsilon*(Gc/4.0 - sigma*pow4(T_));
|
||||||
|
|
||||||
ap += s/htc;
|
ap += s/htc;
|
||||||
bp += 6.0*s;
|
|
||||||
}
|
}
|
||||||
bp /= rho*d*Cp_*(ap - T_) + ROOTVSMALL;
|
|
||||||
|
|
||||||
// Integrate to find the new parcel temperature
|
// Integrate to find the new parcel temperature
|
||||||
IntegrationScheme<scalar>::integrationResult Tres =
|
IntegrationScheme<scalar>::integrationResult Tres =
|
||||||
|
|||||||
Reference in New Issue
Block a user