subroutine gfs_mp_generic_pre::gfs_mp_generic_pre_run |
( |
integer, intent(in) |
im, |
|
|
integer, intent(in) |
levs, |
|
|
logical, intent(in) |
ldiag3d, |
|
|
logical, intent(in) |
qdiag3d, |
|
|
logical, intent(in) |
do_aw, |
|
|
logical, intent(in) |
progsigma, |
|
|
integer, intent(in) |
ntcw, |
|
|
integer, intent(in) |
nncl, |
|
|
integer, intent(in) |
ntrac, |
|
|
real(kind=kind_phys), dimension(:,:), intent(in) |
gt0, |
|
|
real(kind=kind_phys), dimension(:,:,:), intent(in) |
gq0, |
|
|
real(kind=kind_phys), dimension(:,:), intent(inout) |
save_t, |
|
|
real(kind=kind_phys), dimension(:,:,:), intent(inout) |
save_q, |
|
|
integer, intent(in) |
num_dfi_radar, |
|
|
character(len=*), intent(out) |
errmsg, |
|
|
integer, intent(out) |
errflg |
|
) |
| |