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

◆ orogw_v1()

subroutine cires_ugwpv1_oro::orogw_v1 ( integer, intent(in) im,
integer, intent(in) km,
integer, intent(in) imx,
integer, intent(in) me,
integer, intent(in) master,
real(kind=kind_phys), intent(in) dtp,
integer, intent(in) kdt,
logical, intent(in) do_tofd,
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), intent(in) sparea,
real(kind=kind_phys), dimension(2), intent(in) cdmbgwd,
real(kind=kind_phys), dimension(im), intent(in) hprime,
real(kind=kind_phys), dimension(im), intent(in) oc,
real(kind=kind_phys), dimension(im,4), intent(in) oa4,
real(kind=kind_phys), dimension(im,4), intent(in) clx4,
real(kind=kind_phys), dimension(im), intent(in) theta,
real(kind=kind_phys), dimension(im), intent(in) sigmad,
real(kind=kind_phys), dimension(im), intent(in) gammad,
real(kind=kind_phys), dimension(im), intent(in) elvmaxd,
real(kind=kind_phys), dimension(im), intent(in) sgh30,
integer, dimension(im), intent(in) kpbl,
real(kind=kind_phys), dimension(im,km), intent(in) u1,
real(kind=kind_phys), dimension(im,km), intent(in) v1,
real(kind=kind_phys), dimension(im,km), intent(in) t1,
real(kind=kind_phys), dimension(im,km), intent(in) q1,
real(kind=kind_phys), dimension(im,km+1), intent(in) prsi,
real(kind=kind_phys), dimension(im,km), intent(in) del,
real(kind=kind_phys), dimension(im,km), intent(in) prsl,
real(kind=kind_phys), dimension(im,km), intent(in) prslk,
real(kind=kind_phys), dimension(im,km+1), intent(in) zmeti,
real(kind=kind_phys), dimension(im,km), intent(in) zmet,
real(kind=kind_phys), dimension(im,km), intent(out) pdvdt,
real(kind=kind_phys), dimension(im,km), intent(out) pdudt,
real(kind=kind_phys), dimension(im,km), intent(out) pdtdt,
real(kind=kind_phys), dimension(im,km), intent(out) pkdis,
real(kind=kind_phys), dimension(im), intent(out) dusfc,
real(kind=kind_phys), dimension(im), intent(out) dvsfc,
real(kind=kind_phys), dimension(im), intent(out) rdxzb,
real(kind=kind_phys), dimension(im), intent(out) zobl,
real(kind=kind_phys), dimension(im), intent(out) zlwb,
real(kind=kind_phys), dimension(im), intent(out) zogw,
real(kind=kind_phys), dimension(im), intent(out) tau_ogw,
real(kind=kind_phys), dimension(im,km), intent(out) dudt_ogw,
real(kind=kind_phys), dimension(im,km), intent(out) dvdt_ogw,
real(kind=kind_phys), dimension(im,km), intent(out) dudt_obl,
real(kind=kind_phys), dimension(im,km), intent(out) dvdt_obl,
real(kind=kind_phys), dimension(im,km), intent(out) dudt_ofd,
real(kind=kind_phys), dimension(im,km), intent(out) dvdt_ofd,
real(kind=kind_phys), dimension(im), intent(out) du_ogwcol,
real(kind=kind_phys), dimension(im), intent(out) dv_ogwcol,
real(kind=kind_phys), dimension(im), intent(out) du_oblcol,
real(kind=kind_phys), dimension(im), intent(out) dv_oblcol,
real(kind=kind_phys), dimension(im), intent(out) du_ofdcol,
real(kind=kind_phys), dimension(im), intent(out) dv_ofdcol,
character(len=*), intent(out) errmsg,
integer, intent(out) errflg )

Definition at line 8 of file cires_ugwpv1_oro.F90.