| subroutine gfs_suite_stateout_update::gfs_suite_stateout_update_run | ( | integer, intent(in) | im, |
| integer, intent(in) | levs, | ||
| integer, intent(in) | ntrac, | ||
| real(kind=kind_phys), intent(in) | dtp, | ||
| real(kind=kind_phys), dimension(:,:), intent(in) | tgrs, | ||
| real(kind=kind_phys), dimension(:,:), intent(in) | ugrs, | ||
| real(kind=kind_phys), dimension(:,:), intent(in) | vgrs, | ||
| real(kind=kind_phys), dimension(:,:,:), intent(in) | qgrs, | ||
| real(kind=kind_phys), dimension(:,:), intent(in) | dudt, | ||
| real(kind=kind_phys), dimension(:,:), intent(in) | dvdt, | ||
| real(kind=kind_phys), dimension(:,:), intent(in) | dtdt, | ||
| real(kind=kind_phys), dimension(:,:,:), intent(in) | dqdt, | ||
| real(kind=kind_phys), dimension(:,:), intent(out) | gt0, | ||
| real(kind=kind_phys), dimension(:,:), intent(out) | gu0, | ||
| real(kind=kind_phys), dimension(:,:), intent(out) | gv0, | ||
| real(kind=kind_phys), dimension(:,:,:), intent(out) | gq0, | ||
| integer, intent(in) | ntiw, | ||
| integer, intent(in) | nqrimef, | ||
| integer, intent(in) | imp_physics, | ||
| integer, intent(in) | imp_physics_fer_hires, | ||
| real(kind=kind_phys), intent(in) | epsq, | ||
| character(len=*), intent(out) | errmsg, | ||
| integer, intent(out) | errflg ) |