subroutine, public get_prs_fv3::get_prs_fv3_run |
( |
integer, intent(in) |
ix, |
|
|
integer, intent(in) |
levs, |
|
|
real(kind=kind_phys), intent(in) |
con_fvirt, |
|
|
real(kind=kind_phys), dimension(:,:), intent(in) |
phii, |
|
|
real(kind=kind_phys), dimension(:,:), intent(in) |
prsi, |
|
|
real(kind=kind_phys), dimension(:,:), intent(in) |
tgrs, |
|
|
real(kind=kind_phys), dimension(:,:), intent(in) |
qgrs1, |
|
|
real(kind=kind_phys), dimension(:,:), intent(out) |
del, |
|
|
real(kind=kind_phys), dimension(:,:), intent(out) |
del_gz, |
|
|
character(len=*), intent(out) |
errmsg, |
|
|
integer, intent(out) |
errflg |
|
) |
| |