WAVEWATCH III  beta 0.0.1
constants.F90 File Reference

Defines commonly used constants as parameters for global use. More...

Go to the source code of this file.

Modules

module  constants
 Define some much-used constants for global use (all defined as PARAMETER).
 

Functions/Subroutines

subroutine constants::tabu_fw
 Estimate friction coefficients in oscillatory boundary layers using tabulation on Kelvin functions. More...
 
subroutine constants::kzeone (X, Y, RE0, IM0, RE1, IM1)
 June 1999 adaptation to CRESTb, all tests on range of (x,y) have been bypassed, we implicitly expect X to be positive or |x,y| non zero. More...
 
subroutine constants::kerkei (X, KER, KEI)
 Computes the values of the zeroth order Kelvin function Ker and Kei. More...
 

Variables

logical, parameter constants::tstout = .FALSE.
 TSTOUT Flag for generation of test files. More...
 
real, parameter constants::grav = 9.806
 GRAV Acc. More...
 
real, parameter constants::dwat = 1000.
 DWAT Density of water (kg/m3). More...
 
real, parameter constants::dair = 1.225
 DAIR Density of air (kg/m3). More...
 
real, parameter constants::nu_air = 1.4E-5
 NU_AIR Kinematic viscosity of air (m2/s). More...
 
real, parameter constants::nu_water = 1.31E-6
 NU_WATER Kinematic viscosity of water (m2/s). More...
 
real, parameter constants::sed_sg = 2.65
 SED_SG Specific gravity of sediments (N.D.). More...
 
real, parameter constants::kappa = 0.40
 KAPPA von Karman's constant (N.D.). More...
 
real, parameter constants::pi = 3.141592653589793
 PI Value of Pi. More...
 
real, parameter constants::tpi = 2.0 * PI
 TPI 2*Pi. More...
 
real, parameter constants::hpi = 0.5 * PI
 HPI 1/2*Pi. More...
 
real, parameter constants::tpiinv = 1. / TPI
 TPIINV Inverse of 2*Pi. More...
 
real, parameter constants::hpiinv = 1. / HPI
 HPIINV Inverse of 1/2*Pi. More...
 
real, parameter constants::rade = 180. / PI
 RADE Conversion factor from radians to degrees. More...
 
real, parameter constants::dera = PI / 180.
 DERA Conversion factor from degrees to radians. More...
 
real, parameter constants::radius = 4.E7 * TPIINV
 RADIUS Radius of the earth (m). More...
 
real, parameter constants::g2pi3i = 1. / ( GRAV**2 * TPI**3 )
 G2PI3I Inverse of gravity^2 * (2*Pi)^3. More...
 
real, parameter constants::g1pi1i = 1. / ( GRAV * TPI )
 G1PI1I Inverse of gravity * 2 * Pi. More...
 
real constants::undef = -999.9
 UNDEF Value for undefined variable in output. More...
 
character(*), parameter constants::file_endian = ENDIANNESS
 FILE_ENDIAN Filled by preprocessor with 'big_endian', 'little_endian', or 'native'. More...
 
integer, parameter constants::sizefwtable =300
 SIZEFWTABLE. More...
 
real, dimension(0:sizefwtable) constants::fwtable
 FWTABLE. More...
 
real constants::delab
 DELAB. More...
 
real, parameter constants::abmin = -1.
 ABMIN. More...
 
integer, parameter constants::srce_direct = 0
 srce_direct More...
 
integer, parameter constants::srce_imp_post = 1
 srce_imp_post More...
 
integer, parameter constants::srce_imp_pre = 2
 srce_imp_pre More...
 
integer, parameter constants::debug_node = 1014
 DEBUG_NODE Node number used for debugging. More...
 
integer, parameter constants::debug_element = 50
 DEBUG_ELEMENT Element number used for debug. More...
 
logical constants::lpdlib = .FALSE.
 LPDLIB Logical for using the PDLIB library. More...
 
logical constants::lsetup = .FALSE.
 LSETUP Logical LSETUP is not used. More...
 
logical constants::is_esmf_component = .FALSE.
 IS_ESMF_COMPONENT Flag for model invoked via ESMF. More...
 

Detailed Description

Defines commonly used constants as parameters for global use.

Author
H. L. Tolman
Date
05-Jun-2018

Definition in file constants.F90.