| subroutine gfs_suite_interstitial_5::gfs_suite_interstitial_5_run | ( | integer, intent(in) | im, |
| integer, intent(in) | levs, | ||
| integer, intent(in) | ntrac, | ||
| integer, intent(in) | ntcw, | ||
| integer, intent(in) | ntiw, | ||
| integer, intent(in) | nn, | ||
| real(kind=kind_phys), dimension(:,:,:), intent(in) | gq0, | ||
| real(kind=kind_phys), dimension(:,:,:), intent(out) | clw, | ||
| character(len=*), intent(out) | errmsg, | ||
| integer, intent(out) | errflg ) |