diff --git a/src/regionModels/surfaceFilmModels/submodels/thermo/filmRadiationModel/constantRadiation/constantRadiation.C b/src/regionModels/surfaceFilmModels/submodels/thermo/filmRadiationModel/constantRadiation/constantRadiation.C index bb1b6c294f4bfe38bafe1c97004fea3c85d797e4..f7e1b821432e644d405d2242a825c98596e2c8e3 100644 --- a/src/regionModels/surfaceFilmModels/submodels/thermo/filmRadiationModel/constantRadiation/constantRadiation.C +++ b/src/regionModels/surfaceFilmModels/submodels/thermo/filmRadiationModel/constantRadiation/constantRadiation.C @@ -82,6 +82,7 @@ constantRadiation::constantRadiation owner.regionMesh(), dimensionedScalar("one", dimless, 1.0) ), + absorptivity_(readScalar(coeffs_.lookup("absorptivity"))), timeStart_(readScalar(coeffs_.lookup("timeStart"))), duration_(readScalar(coeffs_.lookup("duration"))) { @@ -129,7 +130,7 @@ tmp<volScalarField> constantRadiation::Shs() const scalarField& Qr = QrConst_.internalField(); const scalarField& alpha = owner_.alpha().internalField(); - Shs = mask_*Qr*alpha; + Shs = mask_*Qr*alpha*absorptivity_; } return tShs; diff --git a/src/regionModels/surfaceFilmModels/submodels/thermo/filmRadiationModel/constantRadiation/constantRadiation.H b/src/regionModels/surfaceFilmModels/submodels/thermo/filmRadiationModel/constantRadiation/constantRadiation.H index 06e6fe676b2974381cd22d76bdc78423285514b8..911d53e461a422578d64f39919ba093752a01113 100644 --- a/src/regionModels/surfaceFilmModels/submodels/thermo/filmRadiationModel/constantRadiation/constantRadiation.H +++ b/src/regionModels/surfaceFilmModels/submodels/thermo/filmRadiationModel/constantRadiation/constantRadiation.H @@ -68,6 +68,9 @@ private: //- Radiation mask volScalarField mask_; + //- Absorptivity + scalar absorptivity_; + //- Time start [s] const scalar timeStart_;