thermoSingleLayer: Revert q back to the working version in OpenFOAM-2.1.x

Revert changes in tutorial to correspond to the version in OpenFOAM-2.1.x
Resolves bug-report http://openfoam.org/mantisbt/view.php?id=1207
This commit is contained in:
Henry
2015-03-10 19:59:09 +00:00
parent 8bed463f45
commit d66408c86a
2 changed files with 9 additions and 14 deletions

View File

@ -31,6 +31,7 @@ License
#include "zeroGradientFvPatchFields.H" #include "zeroGradientFvPatchFields.H"
#include "mappedFieldFvPatchField.H" #include "mappedFieldFvPatchField.H"
#include "mapDistribute.H" #include "mapDistribute.H"
#include "constants.H"
// Sub-models // Sub-models
#include "filmThermoModel.H" #include "filmThermoModel.H"
@ -255,19 +256,13 @@ void thermoSingleLayer::updateSubmodels()
tmp<fvScalarMatrix> thermoSingleLayer::q(volScalarField& hs) const tmp<fvScalarMatrix> thermoSingleLayer::q(volScalarField& hs) const
{ {
dimensionedScalar Tstd("Tstd", dimTemperature, 298.15);
volScalarField boundedAlpha(max(alpha_, ROOTVSMALL));
volScalarField htcst(htcs_->h()*boundedAlpha);
volScalarField htcwt(htcw_->h()*boundedAlpha);
htcst.correctBoundaryConditions();
htcwt.correctBoundaryConditions();
return return
( (
- fvm::Sp(htcst/Cp_, hs) - htcst*(Tstd - TPrimary_) - fvm::Sp(htcs_->h()/Cp_, hs)
- fvm::Sp(htcwt/Cp_, hs) - htcwt*(Tstd - Tw_) - htcs_->h()*(constant::standard::Tstd - TPrimary_)
- fvm::Sp(htcw_->h()/Cp_, hs)
- htcw_->h()*(constant::standard::Tstd - Tw_)
); );
} }

View File

@ -83,12 +83,12 @@ subModels
((0.6 0.35 1.45) (0 0 -1)) ((0.6 0.35 1.45) (0 0 -1))
); );
massTotal 5; massTotal 10;
parcelsPerInjector 20000; parcelsPerInjector 20000;
parcelsPerSecond 500; parcelsPerSecond 500;
parcelBasisType mass; parcelBasisType mass;
flowRateProfile constant 1; flowRateProfile constant 0.1;
Umag constant 1; Umag constant 3.0;
thetaInner constant 0; thetaInner constant 0;
thetaOuter constant 45; thetaOuter constant 45;