Go to the source code of this file.
|
subroutine | glt_updsnow_r (kinit, omsg, tpdom, tptfl, tpsit, psnow_a, pemp_a, paddterm, paddterm2) |
|
subroutine glt_updsnow_r |
( |
integer, intent(in) |
kinit, |
|
|
character(*), intent(in) |
omsg, |
|
|
type(t_dom), dimension(np), intent(in) |
tpdom, |
|
|
type(t_tfl), dimension(np), intent(in) |
tptfl, |
|
|
type(t_sit), dimension(nt,np), intent(in) |
tpsit, |
|
|
real, intent(inout) |
psnow_a, |
|
|
real, intent(inout) |
pemp_a, |
|
|
real, dimension(np), intent(in), optional |
paddterm, |
|
|
real, dimension(np), intent(in), optional |
paddterm2 |
|
) |
| |