| subroutine gfs_pbl_generic_pre::gfs_pbl_generic_pre_run | ( | integer, intent(in) | im, |
| integer, intent(in) | levs, | ||
| integer, intent(in) | nvdiff, | ||
| integer, intent(in) | ntrac, | ||
| integer, intent(out) | rtg_ozone_index, | ||
| integer, intent(in) | ntqv, | ||
| integer, intent(in) | ntcw, | ||
| integer, intent(in) | ntiw, | ||
| integer, intent(in) | ntrw, | ||
| integer, intent(in) | ntsw, | ||
| integer, intent(in) | ntlnc, | ||
| integer, intent(in) | ntinc, | ||
| integer, intent(in) | ntrnc, | ||
| integer, intent(in) | ntsnc, | ||
| integer, intent(in) | ntgnc, | ||
| integer, intent(in) | ntwa, | ||
| integer, intent(in) | ntia, | ||
| integer, intent(in) | ntgl, | ||
| integer, intent(in) | ntoz, | ||
| integer, intent(in) | ntke, | ||
| integer, intent(in) | ntkev, | ||
| integer, intent(in) | nqrimef, | ||
| logical, intent(in) | trans_aero, | ||
| integer, intent(in) | ntchs, | ||
| integer, intent(in) | ntchm, | ||
| integer, intent(in) | ntccn, | ||
| integer, intent(in) | nthl, | ||
| integer, intent(in) | nthnc, | ||
| integer, intent(in) | ntgv, | ||
| integer, intent(in) | nthv, | ||
| integer, intent(in) | ntrz, | ||
| integer, intent(in) | ntgz, | ||
| integer, intent(in) | nthz, | ||
| integer, intent(in) | imp_physics, | ||
| integer, intent(in) | imp_physics_gfdl, | ||
| integer, intent(in) | imp_physics_thompson, | ||
| integer, intent(in) | imp_physics_wsm6, | ||
| integer, intent(in) | imp_physics_zhao_carr, | ||
| integer, intent(in) | imp_physics_mg, | ||
| integer, intent(in) | imp_physics_fer_hires, | ||
| integer, intent(in) | imp_physics_nssl, | ||
| logical, intent(in) | ltaerosol, | ||
| logical, intent(in) | mraerosol, | ||
| logical, intent(in) | nssl_ccn_on, | ||
| logical, intent(in) | nssl_hail_on, | ||
| logical, intent(in) | nssl_3moment, | ||
| logical, intent(in) | hybedmf, | ||
| logical, intent(in) | do_shoc, | ||
| logical, intent(in) | satmedmf, | ||
| real(kind=kind_phys), dimension(:,:,:), intent(in) | qgrs, | ||
| real(kind=kind_phys), dimension(:,:, :), intent(inout) | vdftra, | ||
| real(kind=kind_phys), dimension(:,:), intent(out) | save_u, | ||
| real(kind=kind_phys), dimension(:,:), intent(out) | save_v, | ||
| real(kind=kind_phys), dimension(:,:), intent(out) | save_t, | ||
| real(kind=kind_phys), dimension(:,:, :), intent(out) | save_q, | ||
| logical, intent(in) | flag_for_pbl_generic_tend, | ||
| logical, intent(in) | ldiag3d, | ||
| logical, intent(in) | qdiag3d, | ||
| logical, intent(in) | lssav, | ||
| real(kind=kind_phys), dimension(:,:), intent(in) | ugrs, | ||
| real(kind=kind_phys), dimension(:,:), intent(in) | vgrs, | ||
| real(kind=kind_phys), dimension(:,:), intent(in) | tgrs, | ||
| character(len=*), intent(out) | errmsg, | ||
| integer, intent(out) | errflg ) |