subroutine isba_budget |
( |
type(diag_evap_isba_t), intent(inout) |
DGEI, |
|
|
character(len=*), intent(in) |
HISBA, |
|
|
character(len=*), intent(in) |
HSNOW_ISBA, |
|
|
logical, intent(in) |
OGLACIER, |
|
|
real, intent(in) |
PTSTEP, |
|
|
real, dimension(:,:), intent(in) |
PWG, |
|
|
real, dimension(:,:), intent(in) |
PWGI, |
|
|
real, dimension(:), intent(in) |
PWR, |
|
|
real, dimension(:,:), intent(in) |
PSNOWSWE, |
|
|
real, dimension(:,:), intent(in) |
PDG, |
|
|
real, dimension(:,:), intent(in) |
PDZG, |
|
|
real, dimension(:), intent(in) |
PWG_INI, |
|
|
real, dimension(:), intent(in) |
PWGI_INI, |
|
|
real, dimension(:), intent(in) |
PWR_INI, |
|
|
real, dimension(:), intent(in) |
PSWE_INI, |
|
|
real, dimension(:), intent(in) |
PRAIN, |
|
|
real, dimension(:), intent(in) |
PSNOW, |
|
|
real, dimension(:), intent(in) |
PEVAP, |
|
|
real, dimension(:), intent(in) |
PDRAIN, |
|
|
real, dimension(:), intent(in) |
PRUNOFF, |
|
|
real, dimension(:), intent(in) |
PIFLOOD, |
|
|
real, dimension(:), intent(in) |
PPFLOOD, |
|
|
real, dimension(:), intent(in) |
PLE_FLOOD, |
|
|
real, dimension(:), intent(in) |
PLEI_FLOOD, |
|
|
real, dimension(:), intent(in) |
PICEFLUX, |
|
|
real, dimension(:), intent(in) |
PIRRIG_FLUX, |
|
|
real, dimension(:), intent(in) |
PSNDRIFT, |
|
|
real, dimension(:), intent(in) |
PLVTT, |
|
|
real, dimension(:), intent(in) |
PLSTT, |
|
|
real, dimension(:), intent(out) |
PDWG, |
|
|
real, dimension(:), intent(out) |
PDWGI, |
|
|
real, dimension(:), intent(out) |
PDWR, |
|
|
real, dimension(:), intent(out) |
PDSWE, |
|
|
real, dimension(:), intent(out) |
PWATBUD |
|
) |
| |