subroutine cires_ugwpv1_solv2::cires_ugwpv1_ngw_solv2 | ( | integer, intent(in) | mpi_id, |
integer, intent(in) | master, | ||
integer, intent(in) | im, | ||
integer, intent(in) | levs, | ||
integer, intent(in) | kdt, | ||
real(kind=kind_phys), intent(in) | dtp, | ||
real(kind=kind_phys), dimension(im), intent(in) | tau_ngw, | ||
real(kind=kind_phys), dimension(im,levs), intent(in) | tm, | ||
real(kind=kind_phys), dimension(im,levs), intent(in) | um, | ||
real(kind=kind_phys), dimension(im,levs), intent(in) | vm, | ||
real(kind=kind_phys), dimension(im,levs), intent(in) | qm, | ||
real(kind=kind_phys), dimension(im,levs), intent(in) | prsl, | ||
real(kind=kind_phys), dimension(im,levs+1), intent(in) | prsi, | ||
real(kind=kind_phys), dimension(im,levs), intent(in) | zmet, | ||
real(kind=kind_phys), dimension(im,levs+1), intent(in) | zmeti, | ||
real(kind=kind_phys), dimension(im,levs), intent(in) | prslk, | ||
real(kind=kind_phys), dimension(im), intent(in) | xlatd, | ||
real(kind=kind_phys), dimension(im), intent(in) | sinlat, | ||
real(kind=kind_phys), dimension(im), intent(in) | coslat, | ||
real(kind=kind_phys), dimension(im,levs), intent(out) | pdudt, | ||
real(kind=kind_phys), dimension(im,levs), intent(out) | pdvdt, | ||
real(kind=kind_phys), dimension(im,levs), intent(out) | pdtdt, | ||
real(kind=kind_phys), dimension(im,levs), intent(out) | dked, | ||
real(kind=kind_phys), dimension(im), intent(out) | zngw ) |
Definition at line 17 of file cires_ugwpv1_solv2.F90.
References atm().