FV3-JEDI
wind_vt_mod Module Reference

Functions/Subroutines

subroutine, public sfc_10m_winds (geom, usrf, vsrf, f10r, spd10m, dir10m)
 
subroutine, public psichi_to_uava (geom, psi, chi, ua, va)
 
subroutine, public psichi_to_udvd (geom, psi, chi, u, v)
 
subroutine, public psichi_to_uava_adm (geom, psi_ad, chi_ad, ua_ad, va_ad)
 
subroutine, public udvd_to_psichi (geom, grid, oprs, u_in, v_in, psi, chi, lsize, lev_start, lev_final, vor_out, div_out)
 
subroutine, public psichi_to_vortdivg (geom, grid, oprs, psi, chi, lsize, lev_start, lev_final, vor, div)
 
subroutine udvd_to_ucvc (geom, u, v, uc, vc, ua_out, va_out)
 
real(kind=kind_real) function edge_interpolate4 (ua, dxa)
 
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_comp, v_comp, ua_comp, va_comp)
 
subroutine, public d2a_ad (geom, u_ad_comp, v_ad_comp, ua_ad_comp, va_ad_comp)
 
subroutine fill_dgrid_winds (geom, u, v, fillhalo)
 
subroutine fill_cgrid_winds (geom, uc, vc, fillhalo)
 
subroutine compute_utvt (geom, uc, vc, ut, vt, dt)
 
subroutine ctoa (geom, uc, vc, ua, va)
 
subroutine atod (geom, ua, va, u, v)
 
subroutine interp_left_edge_1d (ifirst, ilast, qin, qout)
 

Function/Subroutine Documentation

◆ 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 1022 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 1193 of file wind_variables_mod.f90.

Here is the caller graph for this function:

◆ atod()

subroutine wind_vt_mod::atod ( type(fv3jedi_geom), intent(in)  geom,
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 ,geom%jsd:geom%jed+1), intent(out)  u,
real(kind=kind_real), dimension(geom%isd:geom%ied+1,geom%jsd:geom%jed ), intent(out)  v 
)
private

Definition at line 2271 of file wind_variables_mod.f90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ compute_utvt()

subroutine wind_vt_mod::compute_utvt ( type(fv3jedi_geom), intent(inout)  geom,
real(kind=kind_real), dimension(geom%isd:geom%ied+1,geom%jsd:geom%jed ), intent(in)  uc,
real(kind=kind_real), dimension(geom%isd:geom%ied ,geom%jsd:geom%jed+1), intent(in)  vc,
real(kind=kind_real), dimension(geom%isd:geom%ied+1,geom%jsd:geom%jed ), intent(inout)  ut,
real(kind=kind_real), dimension(geom%isd:geom%ied ,geom%jsd:geom%jed+1), intent(inout)  vt,
real(kind=kind_real), intent(in)  dt 
)
private

Definition at line 2018 of file wind_variables_mod.f90.

Here is the caller graph for this function:

◆ ctoa()

subroutine wind_vt_mod::ctoa ( type(fv3jedi_geom), intent(in)  geom,
real(kind=kind_real), dimension(geom%isd:geom%ied+1,geom%jsd:geom%jed ), intent(in)  uc,
real(kind=kind_real), dimension(geom%isd:geom%ied ,geom%jsd:geom%jed+1), intent(in)  vc,
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 
)
private

Definition at line 2238 of file wind_variables_mod.f90.

Here is the call graph for this function:
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%isc:geom%iec ,geom%jsc:geom%jec+1,geom%npz), intent(inout)  u_comp,
real(kind=kind_real), dimension(geom%isc:geom%iec+1,geom%jsc:geom%jec ,geom%npz), intent(inout)  v_comp,
real(kind=kind_real), dimension(geom%isc:geom%iec ,geom%jsc:geom%jec ,geom%npz), intent(inout)  ua_comp,
real(kind=kind_real), dimension(geom%isc:geom%iec ,geom%jsc:geom%jec ,geom%npz), intent(inout)  va_comp 
)

Definition at line 1455 of file wind_variables_mod.f90.

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%isc:geom%iec, geom%jsc:geom%jec+1,1:geom%npz), intent(inout)  u_ad_comp,
real(kind=kind_real), dimension(geom%isc:geom%iec+1,geom%jsc:geom%jec, 1:geom%npz), intent(inout)  v_ad_comp,
real(kind=kind_real), dimension(geom%isc:geom%iec, geom%jsc:geom%jec, 1:geom%npz), intent(inout)  ua_ad_comp,
real(kind=kind_real), dimension(geom%isc:geom%iec, geom%jsc:geom%jec, 1:geom%npz), intent(inout)  va_ad_comp 
)

Definition at line 1606 of file wind_variables_mod.f90.

Here is the caller graph for this function:

◆ 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 1005 of file wind_variables_mod.f90.

Here is the caller graph for this function:

◆ fill_cgrid_winds()

subroutine wind_vt_mod::fill_cgrid_winds ( type(fv3jedi_geom), intent(inout)  geom,
real(kind=kind_real), dimension(geom%isd:geom%ied+1,geom%jsd:geom%jed ,1:geom%npz), intent(inout)  uc,
real(kind=kind_real), dimension(geom%isd:geom%ied ,geom%jsd:geom%jed+1,1:geom%npz), intent(inout)  vc,
logical, intent(in), optional  fillhalo 
)
private

Definition at line 1960 of file wind_variables_mod.f90.

Here is the caller graph for this function:

◆ fill_dgrid_winds()

subroutine wind_vt_mod::fill_dgrid_winds ( 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,
logical, intent(in), optional  fillhalo 
)
private

Definition at line 1901 of file wind_variables_mod.f90.

Here is the caller graph for this function:

◆ interp_left_edge_1d()

subroutine wind_vt_mod::interp_left_edge_1d ( integer, intent(in)  ifirst,
integer, intent(in)  ilast,
real(kind=kind_real), dimension(ifirst:ilast), intent(in)  qin,
real(kind=kind_real), dimension(ifirst:ilast), intent(out)  qout 
)
private

Definition at line 2303 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 110 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 263 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%isc:geom%iec ,geom%jsc:geom%jec ,1:geom%npz), intent(in)  psi,
real(kind=kind_real), dimension(geom%isc:geom%iec ,geom%jsc:geom%jec ,1:geom%npz), intent(in)  chi,
real(kind=kind_real), dimension(geom%isc:geom%iec ,geom%jsc:geom%jec+1,1:geom%npz), intent(out)  u,
real(kind=kind_real), dimension(geom%isc:geom%iec+1,geom%jsc:geom%jec ,1:geom%npz), intent(out)  v 
)

Definition at line 152 of file wind_variables_mod.f90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ psichi_to_vortdivg()

subroutine, public wind_vt_mod::psichi_to_vortdivg ( type(fv3jedi_geom), intent(inout)  geom,
type(fempsgrid), intent(in)  grid,
type(fempsoprs), intent(in)  oprs,
real(kind=kind_real), dimension(geom%isc:geom%iec,geom%jsc:geom%jec,1:geom%npz), intent(in)  psi,
real(kind=kind_real), dimension(geom%isc:geom%iec,geom%jsc:geom%jec,1:geom%npz), intent(in)  chi,
integer, intent(in)  lsize,
integer, dimension(lsize), intent(in)  lev_start,
integer, dimension(lsize), intent(in)  lev_final,
real(kind=kind_real), dimension(geom%isc:geom%iec,geom%jsc:geom%jec,1:geom%npz), intent(out), optional  vor,
real(kind=kind_real), dimension(geom%isc:geom%iec,geom%jsc:geom%jec,1:geom%npz), intent(out), optional  div 
)

Definition at line 521 of file wind_variables_mod.f90.

Here is the call graph for this function:
Here is the caller 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 47 of file wind_variables_mod.f90.

◆ udvd_to_psichi()

subroutine, public wind_vt_mod::udvd_to_psichi ( type(fv3jedi_geom), intent(inout)  geom,
type(fempsgrid), intent(in)  grid,
type(fempsoprs), intent(in)  oprs,
real(kind=kind_real), dimension(geom%isc:geom%iec ,geom%jsc:geom%jec+1,1:geom%npz), intent(inout)  u_in,
real(kind=kind_real), dimension(geom%isc:geom%iec+1,geom%jsc:geom%jec ,1:geom%npz), intent(inout)  v_in,
real(kind=kind_real), dimension(geom%isc:geom%iec ,geom%jsc:geom%jec ,1:geom%npz), intent(out)  psi,
real(kind=kind_real), dimension(geom%isc:geom%iec ,geom%jsc:geom%jec ,1:geom%npz), intent(out)  chi,
integer, intent(in)  lsize,
integer, dimension(lsize), intent(in)  lev_start,
integer, dimension(lsize), intent(in)  lev_final,
real(kind=kind_real), dimension(geom%isc:geom%iec,geom%jsc:geom%jec,1:geom%npz), intent(out), optional  vor_out,
real(kind=kind_real), dimension(geom%isc:geom%iec,geom%jsc:geom%jec,1:geom%npz), intent(out), optional  div_out 
)

Definition at line 320 of file wind_variables_mod.f90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ udvd_to_ucvc()

subroutine wind_vt_mod::udvd_to_ucvc ( type(fv3jedi_geom), intent(inout), 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+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), optional  ua_out,
real(kind=kind_real), dimension(geom%isd:geom%ied ,geom%jsd:geom%jed), intent(out), optional  va_out 
)
private

Definition at line 628 of file wind_variables_mod.f90.

Here is the call graph for this function:
Here is the caller graph for this function: