subroutine snodpth | ( | real (kind=kind_io8), dimension(len) | scvanl, |
real (kind=kind_io8), dimension(len) | slianl, | ||
real (kind=kind_io8), dimension(len) | tsfanl, | ||
real (kind=kind_io8), dimension(len) | snoclm, | ||
real (kind=kind_io8), dimension(len) | glacir, | ||
real (kind=kind_io8) | snwmax, | ||
real (kind=kind_io8) | snwmin, | ||
logical, intent(in) | landice, | ||
integer | len, | ||
real (kind=kind_io8), dimension(len) | snoanl, | ||
integer | me | ||
) |