27#ifndef OPM_ECL_THCONR_LAW_HPP
28#define OPM_ECL_THCONR_LAW_HPP
41template <
class ScalarT,
43 class ParamsT = EclThconrLawParams<ScalarT>>
48 using Scalar =
typename Params::Scalar;
54 template <
class Flu
idState,
class Evaluation =
typename Flu
idState::Scalar>
56 const FluidState& fluidState)
59 Scalar lambdaRef = params.referenceTotalThermalConductivity();
60 static constexpr int gasPhaseIdx = FluidSystem::gasPhaseIdx;
61 if (FluidSystem::phaseIsActive(gasPhaseIdx)) {
62 Scalar alpha = params.dTotalThermalConductivity_dSg();
63 const Evaluation& Sg = decay<Evaluation>(fluidState.saturation(gasPhaseIdx));
64 return lambdaRef*(1.0 - alpha*Sg);
A number of commonly used algebraic functions for the localized OPM automatic differentiation (AD) fr...
Implements the total thermal conductivity relations specified by the ECL THCONR.
Definition: EclThconrLaw.hpp:45
ParamsT Params
Definition: EclThconrLaw.hpp:47
static Evaluation thermalConductivity(const Params ¶ms, const FluidState &fluidState)
Given a fluid state, return the total thermal conductivity [W/m^2 / (K/m)] of the porous medium.
Definition: EclThconrLaw.hpp:55
typename Params::Scalar Scalar
Definition: EclThconrLaw.hpp:48
Definition: Air_Mesitylene.hpp:34