| subroutine TRIP_SURFACE_WATER |
( |
REAL, intent(in) |
PTSTEP, |
|
|
INTEGER, dimension(:,:), intent(in) |
KGRCN, |
|
|
INTEGER, dimension(:,:), intent(in) |
KSEQ, |
|
|
INTEGER, dimension(:,:), intent(in) |
KNEXTX, |
|
|
INTEGER, dimension(:,:), intent(in) |
KNEXTY, |
|
|
INTEGER, intent(in) |
KSEQMAX, |
|
|
REAL, dimension(:,:), intent(in) |
PLEN, |
|
|
REAL, dimension(:,:), intent(in) |
PRUNOFF, |
|
|
REAL, dimension(:,:), intent(in) |
PGOUT, |
|
|
REAL, dimension(:,:), intent(in) |
PSURF_STO, |
|
|
REAL, dimension(:,:), intent(inout) |
PSURF_STO2, |
|
|
REAL, dimension(:,:), intent(out) |
PSIN, |
|
|
REAL, dimension(:,:), intent(out) |
PSOUT, |
|
|
REAL, intent(out) |
PSSTO_ALL, |
|
|
REAL, intent(out) |
PSSTO2_ALL, |
|
|
REAL, intent(out) |
PSIN_ALL, |
|
|
REAL, intent(out) |
PDRUN_ALL, |
|
|
REAL, intent(out) |
PSOUT_ALL |
|
) |
| |