Variable transforms on wind variables for fv3-jedi Daniel Holdaway, NASA/JCSDA. More...

Functions/Subroutines
subroutine, public	sfc_10m_winds (geom, usrf, vsrf, f10r, spd10m, dir10m)

subroutine, public	uv_to_vortdivg (geom, u, v, ua, va, vort, divg)

subroutine, public	vortdivg_to_psichi (geom, vort, divg, psi, chi)

subroutine, public	gauss_seidel (geom, x, b)

subroutine, public	psichi_to_uava (geom, psi, chi, ua, va)

subroutine, public	psichi_to_uava_adm (geom, psi_ad, chi_ad, ua_ad, va_ad)

subroutine, public	psichi_to_udvd (geom, psi, chi, u, v)

subroutine, public	d_to_ac (geom, u, v, ua, va, uc, vc)

subroutine, public	d2a2c_vect (geom, u, v, ua, va, uc, vc, ut, vt, dord4)

real(kind=kind_real) function	edge_interpolate4 (ua, dxa)

subroutine, public	divergence_corner (geom, u, v, ua, va, divg_d)

subroutine, public	a2b_ord4 (qin, qout, geom, npx, npy, is, ie, js, je, ng)

real(kind=kind_real) function	extrap_corner (p0, p1, p2, q1, q2)

real(kind=kind_real) function	great_circle_dist (q1, q2)

subroutine, public	psichi_to_udvd_adm (geom, psi_ad, chi_ad, u_ad, v_ad)

subroutine, public	a2b_ord4_adm (qin, qin_ad, qout, qout_ad, geom, npx, npy, is, ie, js, je, ng)

subroutine, public	extrap_corner_adm (p0, p1, p2, q1, q1_ad, q2, q2_ad, extrap_corner_ad)

subroutine, public	a2d (geom, ua, va, ud, vd)

subroutine, public	a2d_ad (geom, ua_ad, va_ad, ud_ad, vd_ad)

subroutine, public	d2a (geom, u, v, ua, va)

subroutine, public	d2a_ad (geom, u_ad, v_ad, ua_ad, va_ad)

Detailed Description

Variable transforms on wind variables for fv3-jedi Daniel Holdaway, NASA/JCSDA.

Function/Subroutine Documentation

◆ a2b_ord4()

subroutine, public wind_vt_mod::a2b_ord4	(	real(kind=kind_real), dimension(is-ng:ie+ng,js-ng:je+ng), intent(in)	qin,
		real(kind=kind_real), dimension(is-ng:ie+ng,js-ng:je+ng), intent(out)	qout,
		type(fv3jedi_geom), intent(in), target	geom,
		integer, intent(in)	npx,
		integer, intent(in)	npy,
		integer, intent(in)	is,
		integer, intent(in)	ie,
		integer, intent(in)	js,
		integer, intent(in)	je,
		integer, intent(in)	ng
	)

Definition at line 926 of file wind_variables_mod.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ a2b_ord4_adm()

subroutine, public wind_vt_mod::a2b_ord4_adm	(	real(kind=kind_real), dimension(is-ng:ie+ng, js-ng:je+ng), intent(in)	qin,
		real(kind=kind_real), dimension(is-ng:ie+ng, js-ng:je+ng)	qin_ad,
		real(kind=kind_real), dimension(is-ng:ie+ng, js-ng:je+ng)	qout,
		real(kind=kind_real), dimension(is-ng:ie+ng, js-ng:je+ng)	qout_ad,
		type(fv3jedi_geom), intent(in), target	geom,
		integer, intent(in)	npx,
		integer, intent(in)	npy,
		integer, intent(in)	is,
		integer, intent(in)	ie,
		integer, intent(in)	js,
		integer, intent(in)	je,
		integer, intent(in)	ng
	)

Definition at line 1239 of file wind_variables_mod.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ a2d()

subroutine, public wind_vt_mod::a2d	(	type(fv3jedi_geom), intent(inout)	geom,
		real(kind=kind_real), dimension(geom%isc:geom%iec,geom%jsc:geom%jec,geom%npz), intent(in)	ua,
		real(kind=kind_real), dimension(geom%isc:geom%iec,geom%jsc:geom%jec,geom%npz), intent(in)	va,
		real(kind=kind_real), dimension(geom%isc:geom%iec ,geom%jsc:geom%jec+1,geom%npz), intent(inout)	ud,
		real(kind=kind_real), dimension(geom%isc:geom%iec+1,geom%jsc:geom%jec ,geom%npz), intent(inout)	vd
	)

Definition at line 1950 of file wind_variables_mod.f90.

Here is the caller graph for this function:

◆ a2d_ad()

subroutine, public wind_vt_mod::a2d_ad	(	type(fv3jedi_geom), intent(inout)	geom,
		real(kind=kind_real), dimension(geom%isc:geom%iec, geom%jsc:geom%jec, geom%npz), intent(inout)	ua_ad,
		real(kind=kind_real), dimension(geom%isc:geom%iec, geom%jsc:geom%jec, geom%npz), intent(inout)	va_ad,
		real(kind=kind_real), dimension(geom%isc:geom%iec , geom%jsc:geom%jec+1, geom%npz), intent(inout)	ud_ad,
		real(kind=kind_real), dimension(geom%isc:geom%iec+1, geom%jsc:geom%jec , geom%npz), intent(inout)	vd_ad
	)

Definition at line 2123 of file wind_variables_mod.f90.

Here is the caller graph for this function:

◆ d2a()

subroutine, public wind_vt_mod::d2a	(	type(fv3jedi_geom), intent(inout)	geom,
		real(kind=kind_real), dimension(geom%isd:geom%ied ,geom%jsd:geom%jed+1,geom%npz), intent(inout)	u,
		real(kind=kind_real), dimension(geom%isd:geom%ied+1,geom%jsd:geom%jed ,geom%npz), intent(inout)	v,
		real(kind=kind_real), dimension(geom%isd:geom%ied ,geom%jsd:geom%jed ,geom%npz), intent(inout)	ua,
		real(kind=kind_real), dimension(geom%isd:geom%ied ,geom%jsd:geom%jed ,geom%npz), intent(inout)	va
	)

Definition at line 2387 of file wind_variables_mod.f90.

Here is the caller graph for this function:

◆ d2a2c_vect()

subroutine, public wind_vt_mod::d2a2c_vect	(	type(fv3jedi_geom), intent(in), target	geom,
		real(kind=kind_real), dimension(geom%isd:geom%ied ,geom%jsd:geom%jed+1), intent(in)	u,
		real(kind=kind_real), dimension(geom%isd:geom%ied+1,geom%jsd:geom%jed), intent(in)	v,
		real(kind=kind_real), dimension(geom%isd:geom%ied ,geom%jsd:geom%jed ), intent(out)	ua,
		real(kind=kind_real), dimension(geom%isd:geom%ied ,geom%jsd:geom%jed ), intent(out)	va,
		real(kind=kind_real), dimension(geom%isd:geom%ied+1,geom%jsd:geom%jed ), intent(out)	uc,
		real(kind=kind_real), dimension(geom%isd:geom%ied ,geom%jsd:geom%jed+1), intent(out)	vc,
		real(kind=kind_real), dimension(geom%isd:geom%ied ,geom%jsd:geom%jed ), intent(out)	ut,
		real(kind=kind_real), dimension(geom%isd:geom%ied ,geom%jsd:geom%jed ), intent(out)	vt,
		logical, intent(in)	dord4
	)

Definition at line 534 of file wind_variables_mod.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ d2a_ad()

subroutine, public wind_vt_mod::d2a_ad	(	type(fv3jedi_geom), intent(inout)	geom,
		real(kind=kind_real), dimension(geom%isd:geom%ied, geom% jsd:geom%jed+1, geom%npz), intent(inout)	u_ad,
		real(kind=kind_real), dimension(geom%isd:geom%ied+1, geom%jsd:geom%jed, geom%npz), intent(inout)	v_ad,
		real(kind=kind_real), dimension(geom%isd:geom%ied, geom %jsd:geom%jed, geom%npz), intent(inout)	ua_ad,
		real(kind=kind_real), dimension(geom%isd:geom%ied, geom %jsd:geom%jed, geom%npz), intent(inout)	va_ad
	)

Definition at line 2505 of file wind_variables_mod.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ d_to_ac()

subroutine, public wind_vt_mod::d_to_ac	(	type(fv3jedi_geom), intent(inout)	geom,
		real(kind=kind_real), dimension(geom%isd:geom%ied ,geom%jsd:geom%jed+1,1:geom%npz), intent(inout)	u,
		real(kind=kind_real), dimension(geom%isd:geom%ied+1,geom%jsd:geom%jed ,1:geom%npz), intent(inout)	v,
		real(kind=kind_real), dimension(geom%isd:geom%ied ,geom%jsd:geom%jed ,1:geom%npz), intent(inout)	ua,
		real(kind=kind_real), dimension(geom%isd:geom%ied ,geom%jsd:geom%jed ,1:geom%npz), intent(inout)	va,
		real(kind=kind_real), dimension(geom%isd:geom%ied+1,geom%jsd:geom%jed ,1:geom%npz), intent(inout), optional	uc,
		real(kind=kind_real), dimension(geom%isd:geom%ied ,geom%jsd:geom%jed+1,1:geom%npz), intent(inout), optional	vc
	)

Definition at line 457 of file wind_variables_mod.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ divergence_corner()

subroutine, public wind_vt_mod::divergence_corner	(	type(fv3jedi_geom), intent(in)	geom,
		real(kind=kind_real), dimension(geom%isd:geom%ied, geom%jsd:geom%jed+1), intent(in)	u,
		real(kind=kind_real), dimension(geom%isd:geom%ied+1,geom%jsd:geom%jed ), intent(in)	v,
		real(kind=kind_real), dimension(geom%isd:geom%ied ,geom%jsd:geom%jed ), intent(in)	ua,
		real(kind=kind_real), dimension(geom%isd:geom%ied ,geom%jsd:geom%jed ), intent(in)	va,
		real(kind=kind_real), dimension(geom%isd:geom%ied+1,geom%jsd:geom%jed+1), intent(out)	divg_d
	)

Parameters

[in] geom Divergence on the B-Grid from D and A grid winds

Definition at line 846 of file wind_variables_mod.f90.

◆ edge_interpolate4()

real(kind=kind_real) function wind_vt_mod::edge_interpolate4	(	real(kind=kind_real), dimension(4), intent(in)	ua,
		real(kind=kind_real), dimension(4), intent(in)	dxa
	)

private

Definition at line 828 of file wind_variables_mod.f90.

Here is the caller graph for this function:

◆ extrap_corner()

real(kind=kind_real) function wind_vt_mod::extrap_corner	(	real(kind=kind_real), dimension(2), intent(in)	p0,
		real(kind=kind_real), dimension(2), intent(in)	p1,
		real(kind=kind_real), dimension(2), intent(in)	p2,
		real(kind=kind_real), intent(in)	q1,
		real(kind=kind_real), intent(in)	q2
	)

private

Definition at line 1116 of file wind_variables_mod.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ extrap_corner_adm()

subroutine, public wind_vt_mod::extrap_corner_adm	(	real(kind=kind_real), dimension(2), intent(in)	p0,
		real(kind=kind_real), dimension(2), intent(in)	p1,
		real(kind=kind_real), dimension(2), intent(in)	p2,
		real(kind=kind_real), intent(in)	q1,
		real(kind=kind_real)	q1_ad,
		real(kind=kind_real), intent(in)	q2,
		real(kind=kind_real)	q2_ad,
		real(kind=kind_real)	extrap_corner_ad
	)

Definition at line 1932 of file wind_variables_mod.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ gauss_seidel()

subroutine, public wind_vt_mod::gauss_seidel	(	type(fv3jedi_geom), intent(inout)	geom,
		real(kind=kind_real), dimension(geom%isd:geom%ied,geom%jsd:geom%jed,1:geom%npz), intent(inout)	x,
		real(kind=kind_real), dimension(geom%isd:geom%ied,geom%jsd:geom%jed,1:geom%npz), intent(in)	b
	)

Definition at line 239 of file wind_variables_mod.f90.

Here is the caller graph for this function:

◆ great_circle_dist()

real(kind=kind_real) function wind_vt_mod::great_circle_dist	(	real(kind=kind_real), dimension(2), intent(in)	q1,
		real(kind=kind_real), dimension(2), intent(in)	q2
	)

private

Definition at line 1132 of file wind_variables_mod.f90.

Here is the caller graph for this function:

◆ psichi_to_uava()

subroutine, public wind_vt_mod::psichi_to_uava	(	type(fv3jedi_geom), intent(inout)	geom,
		real(kind=kind_real), dimension(geom%isd:geom%ied,geom%jsd:geom%jed,1:geom%npz), intent(inout)	psi,
		real(kind=kind_real), dimension(geom%isd:geom%ied,geom%jsd:geom%jed,1:geom%npz), intent(inout)	chi,
		real(kind=kind_real), dimension(geom%isc:geom%iec,geom%jsc:geom%jec,1:geom%npz), intent(out)	ua,
		real(kind=kind_real), dimension(geom%isc:geom%iec,geom%jsc:geom%jec,1:geom%npz), intent(out)	va
	)

Definition at line 301 of file wind_variables_mod.f90.

Here is the caller graph for this function:

◆ psichi_to_uava_adm()

subroutine, public wind_vt_mod::psichi_to_uava_adm	(	type(fv3jedi_geom), intent(inout)	geom,
		real(kind=kind_real), dimension(geom%isd:geom%ied,geom%jsd:geom%jed,1:geom%npz), intent(inout)	psi_ad,
		real(kind=kind_real), dimension(geom%isd:geom%ied,geom%jsd:geom%jed,1:geom%npz), intent(inout)	chi_ad,
		real(kind=kind_real), dimension(geom%isc:geom%iec,geom%jsc:geom%jec,1:geom%npz), intent(inout)	ua_ad,
		real(kind=kind_real), dimension(geom%isc:geom%iec,geom%jsc:geom%jec,1:geom%npz), intent(inout)	va_ad
	)

Definition at line 345 of file wind_variables_mod.f90.

Here is the caller graph for this function:

◆ psichi_to_udvd()

subroutine, public wind_vt_mod::psichi_to_udvd	(	type(fv3jedi_geom), intent(inout)	geom,
		real(kind=kind_real), dimension(geom%isd:geom%ied ,geom%jsd:geom%jed ,1:geom%npz), intent(inout)	psi,
		real(kind=kind_real), dimension(geom%isd:geom%ied ,geom%jsd:geom%jed ,1:geom%npz), intent(inout)	chi,
		real(kind=kind_real), dimension(geom%isd:geom%ied ,geom%jsd:geom%jed+1,1:geom%npz), intent(out)	u,
		real(kind=kind_real), dimension(geom%isd:geom%ied+1,geom%jsd:geom%jed ,1:geom%npz), intent(out)	v
	)

Definition at line 404 of file wind_variables_mod.f90.

Here is the call graph for this function:

◆ psichi_to_udvd_adm()

subroutine, public wind_vt_mod::psichi_to_udvd_adm	(	type(fv3jedi_geom), intent(inout)	geom,
		real(kind=kind_real), dimension(geom%isd:geom% ied, geom%jsd:geom%jed, geom%npz), intent(inout)	psi_ad,
		real(kind=kind_real), dimension(geom%isd:geom% ied, geom%jsd:geom%jed, geom%npz), intent(inout)	chi_ad,
		real(kind=kind_real), dimension(geom%isd:geom%ied, geom%jsd: geom%jed+1, geom%npz)	u_ad,
		real(kind=kind_real), dimension(geom%isd:geom%ied+1, geom%jsd: geom%jed, geom%npz)	v_ad
	)

Definition at line 1152 of file wind_variables_mod.f90.

Here is the call graph for this function:

◆ sfc_10m_winds()

subroutine, public wind_vt_mod::sfc_10m_winds	(	type(fv3jedi_geom), intent(in)	geom,
		real(kind=kind_real), dimension(geom%isc:geom%iec,geom%jsc:geom%jec), intent(in)	usrf,
		real(kind=kind_real), dimension(geom%isc:geom%iec,geom%jsc:geom%jec), intent(in)	vsrf,
		real(kind=kind_real), dimension(geom%isc:geom%iec,geom%jsc:geom%jec), intent(in)	f10r,
		real(kind=kind_real), dimension(geom%isc:geom%iec,geom%jsc:geom%jec), intent(out)	spd10m,
		real(kind=kind_real), dimension(geom%isc:geom%iec,geom%jsc:geom%jec), intent(out)	dir10m
	)

Definition at line 44 of file wind_variables_mod.f90.

◆ uv_to_vortdivg()

subroutine, public wind_vt_mod::uv_to_vortdivg	(	type(fv3jedi_geom), intent(inout)	geom,
		real(kind=kind_real), dimension(geom%isd:geom%ied ,geom%jsd:geom%jed+1,1:geom%npz), intent(inout)	u,
		real(kind=kind_real), dimension(geom%isd:geom%ied+1,geom%jsd:geom%jed ,1:geom%npz), intent(inout)	v,
		real(kind=kind_real), dimension(geom%isd:geom%ied ,geom%jsd:geom%jed ,1:geom%npz), intent(inout)	ua,
		real(kind=kind_real), dimension(geom%isd:geom%ied ,geom%jsd:geom%jed ,1:geom%npz), intent(inout)	va,
		real(kind=kind_real), dimension(geom%isd:geom%ied ,geom%jsd:geom%jed ,1:geom%npz), intent(inout)	vort,
		real(kind=kind_real), dimension(geom%isd:geom%ied ,geom%jsd:geom%jed ,1:geom%npz), intent(inout)	divg
	)

Definition at line 105 of file wind_variables_mod.f90.

Here is the call graph for this function:

◆ vortdivg_to_psichi()

subroutine, public wind_vt_mod::vortdivg_to_psichi	(	type(fv3jedi_geom), intent(inout)	geom,
		real(kind=kind_real), dimension(geom%isd:geom%ied,geom%jsd:geom%jed,1:geom%npz), intent(in)	vort,
		real(kind=kind_real), dimension(geom%isd:geom%ied,geom%jsd:geom%jed,1:geom%npz), intent(in)	divg,
		real(kind=kind_real), dimension (geom%isd:geom%ied,geom%jsd:geom%jed,1:geom%npz), intent(out)	psi,
		real(kind=kind_real), dimension (geom%isd:geom%ied,geom%jsd:geom%jed,1:geom%npz), intent(out)	chi
	)

Definition at line 204 of file wind_variables_mod.f90.

Here is the call graph for this function:

Functions/Subroutines

Detailed Description

Function/Subroutine Documentation

◆ a2b_ord4()

◆ a2b_ord4_adm()

◆ a2d()

◆ a2d_ad()

◆ d2a()

◆ d2a2c_vect()

◆ d2a_ad()

◆ d_to_ac()

◆ divergence_corner()

◆ edge_interpolate4()

◆ extrap_corner()

◆ extrap_corner_adm()

◆ gauss_seidel()

◆ great_circle_dist()

◆ psichi_to_uava()

◆ psichi_to_uava_adm()

◆ psichi_to_udvd()

◆ psichi_to_udvd_adm()

◆ sfc_10m_winds()

◆ uv_to_vortdivg()

◆ vortdivg_to_psichi()