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... | |
Defines commonly used constants as parameters for global use.
Definition in file constants.F90.