fv_dynamics_adm_mod Module Reference

Functions/Subroutines
subroutine, public	fv_dynamics_fwd (npx, npy, npz, nq_tot, ng, bdt, consv_te, fill, reproduce_sum, kappa, cp_air, zvir, ptop, ks, ncnst, n_split, q_split, u, v, w, delz, hydrostatic, pt, delp, q, ps, pe, pk, peln, pkz, phis, q_con, omga, ua, va, uc, vc, ak, bk, mfx, mfy, cx, cy, ze0, hybrid_z, gridstruct, flagstruct, flagstructp, neststruct, idiag, bd, parent_grid, domain, time_total)
subroutine, public	fv_dynamics_bwd (npx, npy, npz, nq_tot, ng, bdt, consv_te, fill, reproduce_sum, kappa, cp_air, zvir, ptop, ks, ncnst, n_split, q_split, u, u_ad, v, v_ad, w, w_ad, delz, delz_ad, hydrostatic, pt, pt_ad, delp, delp_ad, q, q_ad, ps, ps_ad, pe, pe_ad, pk, pk_ad, peln, peln_ad, pkz, pkz_ad, phis, q_con, omga, omga_ad, ua, ua_ad, va, va_ad, uc, uc_ad, vc, vc_ad, ak, bk, mfx, mfx_ad, mfy, mfy_ad, cx, cx_ad, cy, cy_ad, ze0, hybrid_z, gridstruct, flagstruct, flagstructp, neststruct, idiag, bd, parent_grid, domain, time_total)
subroutine, public	fv_dynamics (npx, npy, npz, nq_tot, ng, bdt, consv_te, fill, reproduce_sum, kappa, cp_air, zvir, ptop, ks, ncnst, n_split, q_split, u, v, w, delz, hydrostatic, pt, delp, q, ps, pe, pk, peln, pkz, phis, q_con, omga, ua, va, uc, vc, ak, bk, mfx, mfy, cx, cy, ze0, hybrid_z, gridstruct, flagstruct, flagstructp, neststruct, idiag, bd, parent_grid, domain, time_total)
subroutine	rayleigh_super_fwd (dt, npx, npy, npz, ks, pm, phis, tau, u, v, w, pt, ua, va, delz, agrid, cp, rg, ptop, hydrostatic, conserve, rf_cutoff, rf, gridstruct, domain, bd)
subroutine	rayleigh_super_bwd (dt, npx, npy, npz, ks, pm, phis, tau, u, u_ad, v, v_ad, w, w_ad, pt, pt_ad, ua, ua_ad, va, va_ad, delz, agrid, cp, rg, ptop, hydrostatic, conserve, rf_cutoff, rf, gridstruct, domain, bd)
subroutine	rayleigh_super (dt, npx, npy, npz, ks, pm, phis, tau, u, v, w, pt, ua, va, delz, agrid, cp, rg, ptop, hydrostatic, conserve, rf_cutoff, rf, gridstruct, domain, bd)
subroutine	rayleigh_friction_fwd (dt, npx, npy, npz, ks, pm, tau, u, v, w, pt, ua, va, delz, cp, rg, ptop, hydrostatic, conserve, rf_cutoff, rf, gridstruct, domain, bd)
subroutine	rayleigh_friction_bwd (dt, npx, npy, npz, ks, pm, tau, u, u_ad, v, v_ad, w, w_ad, pt, pt_ad, ua, ua_ad, va, va_ad, delz, delz_ad, cp, rg, ptop, hydrostatic, conserve, rf_cutoff, rf, gridstruct, domain, bd)
subroutine	rayleigh_friction (dt, npx, npy, npz, ks, pm, tau, u, v, w, pt, ua, va, delz, cp, rg, ptop, hydrostatic, conserve, rf_cutoff, rf, gridstruct, domain, bd)
subroutine	compute_aam_fwd (npz, is, ie, js, je, isd, ied, jsd, jed, gridstruct, bd, ptop, ua, va, u, v, delp, aam, ps, m_fac)
subroutine	compute_aam_bwd (npz, is, ie, js, je, isd, ied, jsd, jed, gridstruct, bd, ptop, ua, ua_ad, va, va_ad, u, u_ad, v, v_ad, delp, delp_ad, aam, aam_ad, ps, ps_ad, m_fac, m_fac_ad)
subroutine	compute_aam (npz, is, ie, js, je, isd, ied, jsd, jed, gridstruct, bd, ptop, ua, va, u, v, delp, aam, ps, m_fac)

Variables
logical	rf_initialized = .false.
logical	pt_initialized = .false.
logical	bad_range = .false.
real, dimension(:), allocatable	rf
integer	kmax =1
real	agrav
logical, save, public	idealtest =.false.

Function/Subroutine Documentation

compute_aam()

subroutine fv_dynamics_adm_mod::compute_aam ( integer, intent(in)  npz, integer, intent(in)  is, integer, intent(in)  ie, integer, intent(in)  js, integer, intent(in)  je, integer, intent(in)  isd, integer, intent(in)  ied, integer, intent(in)  jsd, integer, intent(in)  jed, type(fv_grid_type), intent(in)  gridstruct, type(fv_grid_bounds_type), intent(in)  bd, real, intent(in)  ptop, real, dimension(isd:ied, jsd:jed, npz), intent(inout)  ua, real, dimension(isd:ied, jsd:jed, npz), intent(inout)  va, real, dimension(isd:ied, jsd:jed+1, npz), intent(inout)  u, real, dimension(isd:ied+1, jsd:jed, npz), intent(inout)  v, real, dimension(isd:ied, jsd:jed, npz), intent(inout)  delp, real, dimension(is:ie, js:je), intent(out)  aam, real, dimension(isd:ied, jsd:jed), intent(out)  ps, real, dimension(is:ie, js:je), intent(out)  m_fac  )

private

Definition at line 3518 of file fv_dynamics_adm.F90.

Here is the caller graph for this function:

compute_aam_bwd()

subroutine fv_dynamics_adm_mod::compute_aam_bwd ( integer, intent(in)  npz, integer, intent(in)  is, integer, intent(in)  ie, integer, intent(in)  js, integer, intent(in)  je, integer, intent(in)  isd, integer, intent(in)  ied, integer, intent(in)  jsd, integer, intent(in)  jed, type(fv_grid_type), intent(in)  gridstruct, type(fv_grid_bounds_type), intent(in)  bd, real, intent(in)  ptop, real, dimension(isd:ied, jsd:jed, npz), intent(inout)  ua, real, dimension(isd:ied, jsd:jed, npz), intent(inout)  ua_ad, real, dimension(isd:ied, jsd:jed, npz), intent(inout)  va, real, dimension(isd:ied, jsd:jed, npz), intent(inout)  va_ad, real, dimension(isd:ied, jsd:jed+1, npz), intent(inout)  u, real, dimension(isd:ied, jsd:jed+1, npz), intent(inout)  u_ad, real, dimension(isd:ied+1, jsd:jed, npz), intent(inout)  v, real, dimension(isd:ied+1, jsd:jed, npz), intent(inout)  v_ad, real, dimension(isd:ied, jsd:jed, npz), intent(inout)  delp, real, dimension(isd:ied, jsd:jed, npz), intent(inout)  delp_ad, real, dimension(is:ie, js:je)  aam, real, dimension(is:ie, js:je)  aam_ad, real, dimension(isd:ied, jsd:jed)  ps, real, dimension(isd:ied, jsd:jed)  ps_ad, real, dimension(is:ie, js:je)  m_fac, real, dimension(is:ie, js:je)  m_fac_ad  )

private

Definition at line 3458 of file fv_dynamics_adm.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

compute_aam_fwd()

subroutine fv_dynamics_adm_mod::compute_aam_fwd ( integer, intent(in)  npz, integer, intent(in)  is, integer, intent(in)  ie, integer, intent(in)  js, integer, intent(in)  je, integer, intent(in)  isd, integer, intent(in)  ied, integer, intent(in)  jsd, integer, intent(in)  jed, type(fv_grid_type), intent(in)  gridstruct, type(fv_grid_bounds_type), intent(in)  bd, real, intent(in)  ptop, real, dimension(isd:ied, jsd:jed, npz), intent(inout)  ua, real, dimension(isd:ied, jsd:jed, npz), intent(inout)  va, real, dimension(isd:ied, jsd:jed+1, npz), intent(inout)  u, real, dimension(isd:ied+1, jsd:jed, npz), intent(inout)  v, real, dimension(isd:ied, jsd:jed, npz), intent(inout)  delp, real, dimension(is:ie, js:je)  aam, real, dimension(isd:ied, jsd:jed)  ps, real, dimension(is:ie, js:je)  m_fac  )

private

Definition at line 3380 of file fv_dynamics_adm.F90.

Here is the caller graph for this function:

fv_dynamics()

subroutine, public fv_dynamics_adm_mod::fv_dynamics	(	integer, intent(in)	npx,
		integer, intent(in)	npy,
		integer, intent(in)	npz,
		integer, intent(in)	nq_tot,
		integer, intent(in)	ng,
		real, intent(in)	bdt,
		real, intent(in)	consv_te,
		logical, intent(in)	fill,
		logical, intent(in)	reproduce_sum,
		real, intent(in)	kappa,
		real, intent(in)	cp_air,
		real, intent(in)	zvir,
		real, intent(in)	ptop,
		integer, intent(in)	ks,
		integer, intent(in)	ncnst,
		integer, intent(in)	n_split,
		integer, intent(in)	q_split,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed+1, npz), intent(inout)	u,
		real, dimension(bd%isd:bd%ied+1, bd%jsd:bd%jed, npz), intent(inout)	v,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	w,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	delz,
		logical, intent(in)	hydrostatic,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	pt,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	delp,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz, ncnst), intent(inout)	q,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed), intent(inout)	ps,
		real, dimension(bd%is-1:bd%ie+1, npz+1, bd%js-1:bd%je+1), intent(inout)	pe,
		real, dimension(bd%is:bd%ie, bd%js:bd%je, npz+1), intent(inout)	pk,
		real, dimension(bd%is:bd%ie, npz+1, bd%js:bd%je), intent(inout)	peln,
		real, dimension(bd%is:bd%ie, bd%js:bd%je, npz), intent(inout)	pkz,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed), intent(inout)	phis,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	q_con,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	omga,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	ua,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	va,
		real, dimension(bd%isd:bd%ied+1, bd%jsd:bd%jed, npz), intent(inout)	uc,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed+1, npz), intent(inout)	vc,
		real, dimension(npz+1), intent(in)	ak,
		real, dimension(npz+1), intent(in)	bk,
		real, dimension(bd%is:bd%ie+1, bd%js:bd%je, npz), intent(inout)	mfx,
		real, dimension(bd%is:bd%ie, bd%js:bd%je+1, npz), intent(inout)	mfy,
		real, dimension(bd%is:bd%ie+1, bd%jsd:bd%jed, npz), intent(inout)	cx,
		real, dimension(bd%isd:bd%ied, bd%js:bd%je+1, npz), intent(inout)	cy,
		real, dimension(bd%is:bd%is, bd%js:bd%js, 1), intent(inout)	ze0,
		logical, intent(in)	hybrid_z,
		type(fv_grid_type), intent(inout), target	gridstruct,
		type(fv_flags_type), intent(inout)	flagstruct,
		type(fv_flags_pert_type), intent(inout)	flagstructp,
		type(fv_nest_type), intent(inout)	neststruct,
		type(fv_diag_type), intent(in)	idiag,
		type(fv_grid_bounds_type), intent(in)	bd,
		type(fv_atmos_type), intent(inout)	parent_grid,
		type(domain2d), intent(inout)	domain,
		real, intent(in), optional	time_total
	)

Definition at line 1562 of file fv_dynamics_adm.F90.

Here is the call graph for this function:

fv_dynamics_bwd()

subroutine, public fv_dynamics_adm_mod::fv_dynamics_bwd	(	integer, intent(in)	npx,
		integer, intent(in)	npy,
		integer, intent(in)	npz,
		integer, intent(in)	nq_tot,
		integer, intent(in)	ng,
		real, intent(in)	bdt,
		real, intent(in)	consv_te,
		logical, intent(in)	fill,
		logical, intent(in)	reproduce_sum,
		real, intent(in)	kappa,
		real, intent(in)	cp_air,
		real, intent(in)	zvir,
		real, intent(in)	ptop,
		integer, intent(in)	ks,
		integer, intent(in)	ncnst,
		integer, intent(in)	n_split,
		integer, intent(in)	q_split,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed+1, npz), intent(inout)	u,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed+1, npz), intent(inout)	u_ad,
		real, dimension(bd%isd:bd%ied+1, bd%jsd:bd%jed, npz), intent(inout)	v,
		real, dimension(bd%isd:bd%ied+1, bd%jsd:bd%jed, npz), intent(inout)	v_ad,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	w,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	w_ad,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	delz,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	delz_ad,
		logical, intent(in)	hydrostatic,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	pt,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	pt_ad,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	delp,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	delp_ad,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz, ncnst), intent(inout)	q,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz, ncnst ), intent(inout)	q_ad,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed), intent(inout)	ps,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed), intent(inout)	ps_ad,
		real, dimension(bd%is-1:bd%ie+1, npz+1, bd%js-1:bd%je+1), intent(inout)	pe,
		real, dimension(bd%is-1:bd%ie+1, npz+1, bd%js-1:bd%je+1 ), intent(inout)	pe_ad,
		real, dimension(bd%is:bd%ie, bd%js:bd%je, npz+1), intent(inout)	pk,
		real, dimension(bd%is:bd%ie, bd%js:bd%je, npz+1), intent(inout)	pk_ad,
		real, dimension(bd%is:bd%ie, npz+1, bd%js:bd%je), intent(inout)	peln,
		real, dimension(bd%is:bd%ie, npz+1, bd%js:bd%je), intent(inout)	peln_ad,
		real, dimension(bd%is:bd%ie, bd%js:bd%je, npz), intent(inout)	pkz,
		real, dimension(bd%is:bd%ie, bd%js:bd%je, npz), intent(inout)	pkz_ad,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed), intent(inout)	phis,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	q_con,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	omga,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	omga_ad,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	ua,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	ua_ad,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	va,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	va_ad,
		real, dimension(bd%isd:bd%ied+1, bd%jsd:bd%jed, npz), intent(inout)	uc,
		real, dimension(bd%isd:bd%ied+1, bd%jsd:bd%jed, npz), intent(inout)	uc_ad,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed+1, npz), intent(inout)	vc,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed+1, npz), intent(inout)	vc_ad,
		real, dimension(npz+1), intent(in)	ak,
		real, dimension(npz+1), intent(in)	bk,
		real, dimension(bd%is:bd%ie+1, bd%js:bd%je, npz), intent(inout)	mfx,
		real, dimension(bd%is:bd%ie+1, bd%js:bd%je, npz), intent(inout)	mfx_ad,
		real, dimension(bd%is:bd%ie, bd%js:bd%je+1, npz), intent(inout)	mfy,
		real, dimension(bd%is:bd%ie, bd%js:bd%je+1, npz), intent(inout)	mfy_ad,
		real, dimension(bd%is:bd%ie+1, bd%jsd:bd%jed, npz), intent(inout)	cx,
		real, dimension(bd%is:bd%ie+1, bd%jsd:bd%jed, npz), intent(inout)	cx_ad,
		real, dimension(bd%isd:bd%ied, bd%js:bd%je+1, npz), intent(inout)	cy,
		real, dimension(bd%isd:bd%ied, bd%js:bd%je+1, npz), intent(inout)	cy_ad,
		real, dimension(bd%is:bd%is, bd%js:bd%js, 1), intent(inout)	ze0,
		logical, intent(in)	hybrid_z,
		type(fv_grid_type), intent(inout), target	gridstruct,
		type(fv_flags_type), intent(inout)	flagstruct,
		type(fv_flags_pert_type), intent(inout)	flagstructp,
		type(fv_nest_type), intent(inout)	neststruct,
		type(fv_diag_type), intent(in)	idiag,
		type(fv_grid_bounds_type), intent(in)	bd,
		type(fv_atmos_type), intent(inout)	parent_grid,
		type(domain2d), intent(inout)	domain,
		real, intent(in), optional	time_total
	)

Definition at line 882 of file fv_dynamics_adm.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

fv_dynamics_fwd()

subroutine, public fv_dynamics_adm_mod::fv_dynamics_fwd	(	integer, intent(in)	npx,
		integer, intent(in)	npy,
		integer, intent(in)	npz,
		integer, intent(in)	nq_tot,
		integer, intent(in)	ng,
		real, intent(in)	bdt,
		real, intent(in)	consv_te,
		logical, intent(in)	fill,
		logical, intent(in)	reproduce_sum,
		real, intent(in)	kappa,
		real, intent(in)	cp_air,
		real, intent(in)	zvir,
		real, intent(in)	ptop,
		integer, intent(in)	ks,
		integer, intent(in)	ncnst,
		integer, intent(in)	n_split,
		integer, intent(in)	q_split,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed+1, npz), intent(inout)	u,
		real, dimension(bd%isd:bd%ied+1, bd%jsd:bd%jed, npz), intent(inout)	v,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	w,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	delz,
		logical, intent(in)	hydrostatic,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	pt,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	delp,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz, ncnst), intent(inout)	q,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed), intent(inout)	ps,
		real, dimension(bd%is-1:bd%ie+1, npz+1, bd%js-1:bd%je+1), intent(inout)	pe,
		real, dimension(bd%is:bd%ie, bd%js:bd%je, npz+1), intent(inout)	pk,
		real, dimension(bd%is:bd%ie, npz+1, bd%js:bd%je), intent(inout)	peln,
		real, dimension(bd%is:bd%ie, bd%js:bd%je, npz), intent(inout)	pkz,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed), intent(inout)	phis,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	q_con,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	omga,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	ua,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)	va,
		real, dimension(bd%isd:bd%ied+1, bd%jsd:bd%jed, npz), intent(inout)	uc,
		real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed+1, npz), intent(inout)	vc,
		real, dimension(npz+1), intent(in)	ak,
		real, dimension(npz+1), intent(in)	bk,
		real, dimension(bd%is:bd%ie+1, bd%js:bd%je, npz), intent(inout)	mfx,
		real, dimension(bd%is:bd%ie, bd%js:bd%je+1, npz), intent(inout)	mfy,
		real, dimension(bd%is:bd%ie+1, bd%jsd:bd%jed, npz), intent(inout)	cx,
		real, dimension(bd%isd:bd%ied, bd%js:bd%je+1, npz), intent(inout)	cy,
		real, dimension(bd%is:bd%is, bd%js:bd%js, 1), intent(inout)	ze0,
		logical, intent(in)	hybrid_z,
		type(fv_grid_type), intent(inout), target	gridstruct,
		type(fv_flags_type), intent(inout)	flagstruct,
		type(fv_flags_pert_type), intent(inout)	flagstructp,
		type(fv_nest_type), intent(inout)	neststruct,
		type(fv_diag_type), intent(in)	idiag,
		type(fv_grid_bounds_type), intent(in)	bd,
		type(fv_atmos_type), intent(inout)	parent_grid,
		type(domain2d), intent(inout)	domain,
		real, intent(in), optional	time_total
	)

Definition at line 116 of file fv_dynamics_adm.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

rayleigh_friction()

subroutine fv_dynamics_adm_mod::rayleigh_friction ( real, intent(in)  dt, integer, intent(in)  npx, integer, intent(in)  npy, integer, intent(in)  npz, integer, intent(in)  ks, real, dimension(npz), intent(in)  pm, real, intent(in)  tau, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed+1, npz), intent(inout)  u, real, dimension(bd%isd:bd%ied+1, bd%jsd:bd%jed, npz), intent(inout)  v, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  w, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  pt, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  ua, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  va, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  delz, real, intent(in)  cp, real, intent(in)  rg, real, intent(in)  ptop, logical, intent(in)  hydrostatic, logical, intent(in)  conserve, real, intent(in)  rf_cutoff, real, dimension(npz), intent(inout)  rf, type(fv_grid_type), intent(in)  gridstruct, type(domain2d), intent(inout)  domain, type(fv_grid_bounds_type), intent(in)  bd  )

private

Definition at line 3223 of file fv_dynamics_adm.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

rayleigh_friction_bwd()

subroutine fv_dynamics_adm_mod::rayleigh_friction_bwd ( real, intent(in)  dt, integer, intent(in)  npx, integer, intent(in)  npy, integer, intent(in)  npz, integer, intent(in)  ks, real, dimension(npz), intent(in)  pm, real, intent(in)  tau, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed+1, npz), intent(inout)  u, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed+1, npz), intent(inout)  u_ad, real, dimension(bd%isd:bd%ied+1, bd%jsd:bd%jed, npz), intent(inout)  v, real, dimension(bd%isd:bd%ied+1, bd%jsd:bd%jed, npz), intent(inout)  v_ad, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  w, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  w_ad, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  pt, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  pt_ad, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  ua, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  ua_ad, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  va, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  va_ad, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  delz, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  delz_ad, real, intent(in)  cp, real, intent(in)  rg, real, intent(in)  ptop, logical, intent(in)  hydrostatic, logical, intent(in)  conserve, real, intent(in)  rf_cutoff, real, dimension(npz), intent(inout)  rf, type(fv_grid_type), intent(in)  gridstruct, type(domain2d), intent(inout)  domain, type(fv_grid_bounds_type), intent(in)  bd  )

private

Definition at line 3010 of file fv_dynamics_adm.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

rayleigh_friction_fwd()

subroutine fv_dynamics_adm_mod::rayleigh_friction_fwd ( real, intent(in)  dt, integer, intent(in)  npx, integer, intent(in)  npy, integer, intent(in)  npz, integer, intent(in)  ks, real, dimension(npz), intent(in)  pm, real, intent(in)  tau, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed+1, npz), intent(inout)  u, real, dimension(bd%isd:bd%ied+1, bd%jsd:bd%jed, npz), intent(inout)  v, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  w, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  pt, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  ua, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  va, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  delz, real, intent(in)  cp, real, intent(in)  rg, real, intent(in)  ptop, logical, intent(in)  hydrostatic, logical, intent(in)  conserve, real, intent(in)  rf_cutoff, real, dimension(npz), intent(inout)  rf, type(fv_grid_type), intent(in)  gridstruct, type(domain2d), intent(inout)  domain, type(fv_grid_bounds_type), intent(in)  bd  )

private

Definition at line 2808 of file fv_dynamics_adm.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

rayleigh_super()

subroutine fv_dynamics_adm_mod::rayleigh_super ( real, intent(in)  dt, integer, intent(in)  npx, integer, intent(in)  npy, integer, intent(in)  npz, integer, intent(in)  ks, real, dimension(npz), intent(in)  pm, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed), intent(in)  phis, real, intent(in)  tau, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed+1, npz), intent(inout)  u, real, dimension(bd%isd:bd%ied+1, bd%jsd:bd%jed, npz), intent(inout)  v, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  w, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  pt, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  ua, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  va, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  delz, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, 2), intent(in)  agrid, real, intent(in)  cp, real, intent(in)  rg, real, intent(in)  ptop, logical, intent(in)  hydrostatic, logical, intent(in)  conserve, real, intent(in)  rf_cutoff, real, dimension(npz), intent(inout)  rf, type(fv_grid_type), intent(in)  gridstruct, type(domain2d), intent(inout)  domain, type(fv_grid_bounds_type), intent(in)  bd  )

private

Definition at line 2656 of file fv_dynamics_adm.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

rayleigh_super_bwd()

subroutine fv_dynamics_adm_mod::rayleigh_super_bwd ( real, intent(in)  dt, integer, intent(in)  npx, integer, intent(in)  npy, integer, intent(in)  npz, integer, intent(in)  ks, real, dimension(npz), intent(in)  pm, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed), intent(in)  phis, real, intent(in)  tau, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed+1, npz), intent(inout)  u, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed+1, npz), intent(inout)  u_ad, real, dimension(bd%isd:bd%ied+1, bd%jsd:bd%jed, npz), intent(inout)  v, real, dimension(bd%isd:bd%ied+1, bd%jsd:bd%jed, npz), intent(inout)  v_ad, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  w, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  w_ad, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  pt, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  pt_ad, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  ua, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  ua_ad, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  va, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  va_ad, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  delz, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, 2), intent(in)  agrid, real, intent(in)  cp, real, intent(in)  rg, real, intent(in)  ptop, logical, intent(in)  hydrostatic, logical, intent(in)  conserve, real, intent(in)  rf_cutoff, real, dimension(npz), intent(inout)  rf, type(fv_grid_type), intent(in)  gridstruct, type(domain2d), intent(inout)  domain, type(fv_grid_bounds_type), intent(in)  bd  )

private

Definition at line 2526 of file fv_dynamics_adm.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

rayleigh_super_fwd()

subroutine fv_dynamics_adm_mod::rayleigh_super_fwd ( real, intent(in)  dt, integer, intent(in)  npx, integer, intent(in)  npy, integer, intent(in)  npz, integer, intent(in)  ks, real, dimension(npz), intent(in)  pm, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed), intent(in)  phis, real, intent(in)  tau, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed+1, npz), intent(inout)  u, real, dimension(bd%isd:bd%ied+1, bd%jsd:bd%jed, npz), intent(inout)  v, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  w, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  pt, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  ua, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  va, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(inout)  delz, real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, 2), intent(in)  agrid, real, intent(in)  cp, real, intent(in)  rg, real, intent(in)  ptop, logical, intent(in)  hydrostatic, logical, intent(in)  conserve, real, intent(in)  rf_cutoff, real, dimension(npz), intent(inout)  rf, type(fv_grid_type), intent(in)  gridstruct, type(domain2d), intent(inout)  domain, type(fv_grid_bounds_type), intent(in)  bd  )

private

Definition at line 2330 of file fv_dynamics_adm.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

Variable Documentation

agrav

real fv_dynamics_adm_mod::agrav

Definition at line 76 of file fv_dynamics_adm.F90.

bad_range

logical fv_dynamics_adm_mod::bad_range = .false.

Definition at line 73 of file fv_dynamics_adm.F90.

idealtest

logical, save, public fv_dynamics_adm_mod::idealtest =.false.

Definition at line 77 of file fv_dynamics_adm.F90.

kmax

integer fv_dynamics_adm_mod::kmax =1

Definition at line 75 of file fv_dynamics_adm.F90.

pt_initialized

logical fv_dynamics_adm_mod::pt_initialized = .false.

Definition at line 72 of file fv_dynamics_adm.F90.

rf

real, dimension(:), allocatable fv_dynamics_adm_mod::rf

Definition at line 74 of file fv_dynamics_adm.F90.

rf_initialized

logical fv_dynamics_adm_mod::rf_initialized = .false.

Definition at line 71 of file fv_dynamics_adm.F90.