subroutine, public get_phi_fv3::get_phi_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) | gt0, | ||
real(kind=kind_phys), dimension(:,:), intent(in) | gq01, | ||
real(kind=kind_phys), dimension(:,:), intent(inout) | del_gz, | ||
real(kind=kind_phys), dimension(:,:), intent(out) | phii, | ||
real(kind=kind_phys), dimension(:,:), intent(out) | phil, | ||
character(len=*), intent(out) | errmsg, | ||
integer, intent(out) | errflg | ||
) |