subroutine diag_surf_budgetc_sea |
( |
type(diag_seaflux_t), intent(inout) |
DGS, |
|
|
real, intent(in) |
PTSTEP, |
|
|
real, dimension(:), intent(in) |
PRN, |
|
|
real, dimension(:), intent(in) |
PH, |
|
|
real, dimension(:), intent(in) |
PLE, |
|
|
real, dimension(:), intent(in) |
PLE_ICE, |
|
|
real, dimension(:), intent(in) |
PGFLUX, |
|
|
real, dimension(:), intent(in) |
PSWD, |
|
|
real, dimension(:), intent(in) |
PSWU, |
|
|
real, dimension(:), intent(in) |
PLWD, |
|
|
real, dimension(:), intent(in) |
PLWU, |
|
|
real, dimension(:), intent(in) |
PFMU, |
|
|
real, dimension(:), intent(in) |
PFMV, |
|
|
real, dimension(:), intent(in) |
PEVAP, |
|
|
real, dimension(:), intent(in) |
PSUBL, |
|
|
logical, intent(in) |
OHANDLE_SIC, |
|
|
real, dimension(:), intent(in) |
PRN_ICE, |
|
|
real, dimension(:), intent(in) |
PH_ICE, |
|
|
real, dimension(:), intent(in) |
PGFLUX_ICE, |
|
|
real, dimension(:), intent(in) |
PSWU_ICE, |
|
|
real, dimension(:), intent(in) |
PLWU_ICE, |
|
|
real, dimension(:), intent(in) |
PFMU_ICE, |
|
|
real, dimension(:), intent(in) |
PFMV_ICE |
|
) |
| |