CCPP SciDoc v7.0.x  v7.0.0
Common Community Physics Package Developed at DTC
 
Loading...
Searching...
No Matches

◆ ecmwf_ngw_emc()

subroutine ecmwf_ngw::ecmwf_ngw_emc ( integer, intent(in)  mpi_id,
integer, intent(in)  master,
integer, intent(in)  klon,
integer, intent(in)  klev,
integer, intent(in)  kdt,
real(kind=kind_phys), intent(in)  ptstep,
real(kind=kind_phys), dimension(klon), intent(in)  dx,
real(kind=kind_phys), dimension(klon), intent(in)  tau_ngw,
real(kind=kind_phys), dimension(klon,klev), intent(in)  ptm11,
real(kind=kind_phys), dimension(klon,klev), intent(in)  pum11,
real(kind=kind_phys), dimension(klon,klev), intent(in)  pvm11,
real(kind=kind_phys), dimension(klon,klev), intent(in)  qm1,
real(kind=kind_phys), dimension(klon,klev), intent(in)  papm11,
real(kind=kind_phys), dimension(klon,klev+1), intent(in)  paphm11,
real(kind=kind_phys), dimension(klon,klev), intent(in)  pgeo11,
real(kind=kind_phys), dimension(klon,klev+1), intent(in)  zmeti1,
real(kind=kind_phys), dimension(klon,klev), intent(in)  prslk1,
real(kind=kind_phys), dimension(klon), intent(in)  xlatd,
real(kind=kind_phys), dimension(klon), intent(in)  sinlat,
real(kind=kind_phys), dimension(klon), intent(in)  coslat,
real(kind=kind_phys), dimension(klon,klev), intent(out)  ptenu,
real(kind=kind_phys), dimension(klon,klev), intent(out)  ptenv,
real(kind=kind_phys), dimension(klon,klev), intent(out)  pdtdt,
real(kind=kind_phys), dimension(klon,klev), intent(out)  dked,
real(kind=kind_phys), dimension(klon), intent(out)  zngw 
)

Definition at line 54 of file ecmwf_ngw.F90.