subroutine clm_lake::snowcompaction |
( |
integer, intent(in) | lbc, |
|
|
integer, intent(in) | ubc, |
|
|
integer, intent(in) | num_snowc, |
|
|
integer, dimension(ubc-lbc+1), intent(in) | filter_snowc, |
|
|
integer, dimension(1), intent(in) | snl, |
|
|
integer, dimension(1,-nlevsnow+1:nlevsoil), intent(in) | imelt, |
|
|
real(kind_lake), dimension(1,-nlevsnow+1:nlevsoil), intent(in) | frac_iceold, |
|
|
real(kind_lake), dimension(1,-nlevsnow+1:nlevsoil), intent(in) | t_soisno, |
|
|
real(kind_lake), dimension(1,-nlevsnow+1:nlevsoil), intent(in) | h2osoi_ice, |
|
|
real(kind_lake), dimension(1,-nlevsnow+1:nlevsoil), intent(in) | h2osoi_liq, |
|
|
real(kind_lake), intent(in) | dtime, |
|
|
real(kind_lake), dimension(1,-nlevsnow+1:nlevsoil), intent(inout) | dz ) |
|
private |