ComputeHeatDiffFluxAndFactor Subroutine

public subroutine ComputeHeatDiffFluxAndFactor(bounds, num_nolakec, filter_nolakec, dtime, tk, cv, fn, fact, energyflux_inst, temperature_inst)

Arguments

Type IntentOptional Attributes Name
type(bounds_type), intent(in) :: bounds
integer, intent(in) :: num_nolakec
integer, intent(in) :: filter_nolakec(:)
real(kind=r8), intent(in) :: dtime
real(kind=r8), intent(in) :: tk(bounds%begc:,-nlevsno+1:)
real(kind=r8), intent(in) :: cv(bounds%begc:,-nlevsno+1:)
real(kind=r8), intent(out) :: fn(bounds%begc:,-nlevsno+1:)
real(kind=r8), intent(out) :: fact(bounds%begc:,-nlevsno+1:)
type(energyflux_type), intent(in) :: energyflux_inst
type(temperature_type), intent(in) :: temperature_inst