subroutine gfs_surface_loop_control_part2::gfs_surface_loop_control_part2_run |
( |
integer, intent(in) |
im, |
|
|
integer, intent(in) |
lsm, |
|
|
integer, intent(in) |
lsm_noahmp, |
|
|
integer, intent(in) |
iter, |
|
|
real(kind=kind_phys), dimension(:), intent(in) |
wind, |
|
|
logical, dimension(:), intent(inout) |
flag_guess, |
|
|
logical, dimension(:), intent(inout) |
flag_iter, |
|
|
logical, dimension(:), intent(in) |
dry, |
|
|
logical, dimension(:), intent(in) |
wet, |
|
|
logical, dimension(:), intent(in) |
icy, |
|
|
integer, intent(in) |
nstf_name1, |
|
|
character(len=*), intent(out) |
errmsg, |
|
|
integer, intent(out) |
errflg |
|
) |
| |