subroutine gfssflx::rosr12 | ( | integer, intent(in) | nsoil, |
real (kind=kind_phys), dimension(nsoil), intent(in) | a, | ||
real (kind=kind_phys), dimension(nsoil), intent(in) | b, | ||
real (kind=kind_phys), dimension(nsoil), intent(in) | d, | ||
real (kind=kind_phys), dimension(nsoil), intent(inout) | c, | ||
real (kind=kind_phys), dimension(nsoil), intent(out) | p, | ||
real (kind=kind_phys), dimension(nsoil), intent(out) | delta | ||
) |