gw_common.F90 File Reference

Modules
module	gw_common

Functions/Subroutines
subroutine, public	gw_common::gw_common_init (pver_in, pgwv_in, dc_in, cref_in, do_molec_diff_in, tau_0_ubc_in, nbot_molec_in, ktop_in, kbotbg_in, fcrit2_in, kwv_in, gravit_in, rair_in, alpha_in, errstring)
subroutine, public	gw_common::gw_prof (ncol, cpair, t, pmid, pint, rhoi, ti, nm, ni)
subroutine, public	gw_common::momentum_energy_conservation (ncol, tend_level, dt, taucd, pint, pdel, u, v, dudt, dvdt, dsdt, utgw, vtgw, ttgw)
subroutine, public	gw_common::gw_drag_prof (ncol, ngwv, src_level, tend_level, do_taper, dt, lat, t, ti, pmid, pint, dpm, rdpm, piln, rhoi, nm, ni, ubm, ubi, xv, yv, effgw, c, kvtt, q, dse, tau, utgw, vtgw, ttgw, qtgw, taucd, egwdffi, gwut, dttdf, dttke)

Variables
logical, public	gw_common::orographic_only = .false.
integer, public, protected	gw_common::pver = 0
integer, public, protected	gw_common::pgwv = 0
real(r8), public, protected	gw_common::dc = huge(1._r8)
real(r8), dimension(:), allocatable, public, protected	gw_common::cref
logical, public, protected	gw_common::do_molec_diff = .false.
integer, public, protected	gw_common::nbot_molec = huge(1)
logical	gw_common::tau_0_ubc = .false.
integer, parameter, public	gw_common::west = 1
integer, parameter, public	gw_common::east = 2
integer, parameter, public	gw_common::south = 3
integer, parameter, public	gw_common::north = 4
real(r8), public, protected	gw_common::fcrit2 = huge(1._r8)
real(r8), public, protected	gw_common::kwv = huge(1._r8)
real(r8), public, protected	gw_common::gravit = huge(1._r8)
real(r8), public, protected	gw_common::rair = huge(1._r8)
integer	gw_common::ktop = huge(1)
integer	gw_common::kbotbg = huge(1)
real(r8)	gw_common::effkwv = huge(1._r8)
real(r8), parameter	gw_common::dback = 0.05_r8
real(r8)	gw_common::rog = huge(1._r8)
real(r8), dimension(:), allocatable	gw_common::alpha
real(r8), parameter	gw_common::taumin = 1.e-10_r8
real(r8)	gw_common::tndmax = huge(1._r8)
real(r8), parameter	gw_common::umcfac = 0.5_r8
real(r8), parameter	gw_common::ubmc2mn = 0.01_r8