ComputeHeatLake Subroutine

public subroutine ComputeHeatLake(bounds, num_lakec, filter_lakec, soilstate_inst, temperature_inst, waterstate_inst, heat, heat_liquid, cv_liquid)

Arguments

Type IntentOptional Attributes Name
type(bounds_type), intent(in) :: bounds
integer, intent(in) :: num_lakec
integer, intent(in) :: filter_lakec(:)
type(soilstate_type), intent(in) :: soilstate_inst
type(temperature_type), intent(in) :: temperature_inst
type(waterstate_type), intent(in) :: waterstate_inst
real(kind=r8), intent(inout) :: heat(bounds%begc:)
real(kind=r8), intent(inout) :: heat_liquid(bounds%begc:)
real(kind=r8), intent(inout) :: cv_liquid(bounds%begc:)