subroutine sfc_diag_post::sfc_diag_post_run |
( |
integer, intent(in) |
im, |
|
|
integer, intent(in) |
lsm, |
|
|
integer, intent(in) |
lsm_noahmp, |
|
|
integer, intent(in) |
opt_diag, |
|
|
logical, dimension(:), intent(in) |
dry, |
|
|
logical, intent(in) |
lssav, |
|
|
real(kind=kind_phys), intent(in) |
dtf, |
|
|
real(kind=kind_phys), intent(in) |
con_eps, |
|
|
real(kind=kind_phys), intent(in) |
con_epsm1, |
|
|
real(kind=kind_phys), dimension(:), intent(in) |
pgr, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) |
t2mmp, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) |
q2mp, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) |
t2m, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) |
q2m, |
|
|
real(kind=kind_phys), dimension(:), intent(in) |
u10m, |
|
|
real(kind=kind_phys), dimension(:), intent(in) |
v10m, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) |
tmpmin, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) |
tmpmax, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) |
spfhmin, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) |
spfhmax, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) |
wind10mmax, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) |
u10mmax, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) |
v10mmax, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) |
dpt2m, |
|
|
character(len=*), intent(out) |
errmsg, |
|
|
integer, intent(out) |
errflg |
|
) |
| |