| subroutine, private laketemperaturemod::phasechange_lake |
( |
type(bounds_type), intent(in) |
bounds, |
|
|
integer, intent(in) |
num_lakec, |
|
|
integer, dimension(:), intent(in) |
filter_lakec, |
|
|
real(r8), dimension( bounds%begc: , -nlevsno+1: ), intent(inout) |
cv, |
|
|
real(r8), dimension( bounds%begc: , 1: ), intent(inout) |
cv_lake, |
|
|
real(r8), dimension( bounds%begc: ), intent(out) |
lhabs, |
|
|
type(waterstate_type), intent(inout) |
waterstate_vars, |
|
|
type(waterflux_type), intent(inout) |
waterflux_vars, |
|
|
type(temperature_type), intent(inout) |
temperature_vars, |
|
|
type(energyflux_type), intent(inout) |
energyflux_vars, |
|
|
type(lakestate_type), intent(inout) |
lakestate_vars |
|
) |
| |
|
private |