subroutine isba_budget_init |
( |
type(diag_evap_isba_t), intent(inout) |
DGEI, |
|
|
character(len=*), intent(in) |
HISBA, |
|
|
character(len=*), intent(in) |
HSNOW_ISBA, |
|
|
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(out) |
PWG_INI, |
|
|
real, dimension(:), intent(out) |
PWGI_INI, |
|
|
real, dimension(:), intent(out) |
PWR_INI, |
|
|
real, dimension(:), intent(out) |
PSWE_INI |
|
) |
| |