8.0
general documentation
cstphy.f90 File Reference

Module for physical constants. More...

Modules

module  cstphy
 

Functions/Subroutines

subroutine physical_constants_init
 Initialize Fortran physical constants API. This maps Fortran pointers to global C structure members. More...
 
subroutine fluid_properties_init
 Initialize Fortran fluid properties API. This maps Fortran pointers to global C structure members. More...
 
subroutine turb_reference_values_init
 Initialize Fortran RANS turbulence model API. This maps Fortran pointers to global C structure members. More...
 
subroutine turb_model_constants_init
 Initialize Fortran turbulence model constants. This maps Fortran pointers to global C real numbers. More...
 

Variables

double precision tkelvi
 Temperature in Kelvin correponding to 0 degrees Celsius (= +273,15) More...
 
double precision xcal2j
 Calories (1 cvar_al = xcal2j J) More...
 
double precision stephn
 Stephan constant for the radiative module $\sigma$ in $W.m^{-2}.K^{-4}$. More...
 
real(c_double), pointer, save rair
 Perfect gas constant for air (mixture) More...
 
real(c_double), pointer, save rvsra
 ratio gaz constant h2o/ dry air More...
 
real(c_double), pointer, save clatev
 latent heat of evaporation More...
 
double precision kboltz
 Boltzmann constant ( $J.K^{-1}$) More...
 
double precision cs_physical_constants_r
 Ideal gas constant ( $J.mol^{-1}.K^{-1}$) More...
 
real(c_double), pointer, save gx
 Gravity. More...
 
real(c_double), pointer, save gy
 
real(c_double), pointer, save gz
 
integer(c_int), pointer, save icorio
 Coriolis effects. More...
 
integer(c_int), pointer, save ixyzp0
 Physical constants of the fluid filling xyzp0 indicator. More...
 
integer(c_int), pointer, save icp
 indicates if the isobaric specific heat $C_p$ is variable: More...
 
integer(c_int), pointer, save icv
 isochoric specific heat $ C_v $ More...
 
integer(c_int), pointer, save irovar
 variable density field $ \rho $: More...
 
integer(c_int), pointer, save ivivar
 variable viscosity field $ \mu $: More...
 
integer(c_int), pointer, save ivsuth
 Sutherland law for laminar viscosity and thermal conductivity Only useful in gas mix (igmix) specific physics. More...
 
real(c_double), pointer, save ro0
 reference density.
More...
 
real(c_double), pointer, save viscl0
 reference molecular dynamic viscosity.
More...
 
real(c_double), pointer, save p0
 reference pressure for the total pressure.
More...
 
real(c_double), pointer, save pred0
 reference value for the reduced pressure $P^*$ (see ro0).
More...
 
real(c_double), dimension(:), pointer, save xyzp0
 coordinates of the reference point $\vect{x}_0$ for the total pressure. More...
 
real(c_double), pointer, save t0
 reference temperature. More...
 
double precision, save eint0
 Reference internal energy for the barotropic compressible module. More...
 
real(c_double), pointer, save cp0
 reference specific heat. More...
 
real(c_double), pointer, save cv0
 Reference isochoric specific heat. More...
 
real(c_double), pointer, save lambda0
 Reference thermal conductivity. More...
 
real(c_double), pointer, save xmasmr
 Molar mass of the perfect gas in $ kg/mol $ (if ieos=1) More...
 
integer(c_int), pointer, save ipthrm
 Uniform variable thermodynamic pressure for the low-Mach algorithm. More...
 
real(c_double), pointer, save pther
 Thermodynamic pressure for the current time step. More...
 
real(c_double), pointer, save pthera
 Thermodynamic pressure for the previous time step. More...
 
real(c_double), pointer, save pthermax
 pthermax: Thermodynamic maximum pressure for user clipping, used to model a venting effect More...
 
real(c_double), pointer, save sleak
 Leak surface. More...
 
real(c_double), pointer, save kleak
 Leak head loss (2.9 by default, from Idelcick) More...
 
real(c_double), pointer, save roref
 Initial reference density. More...
 
double precision, save xkappa = 0.42d0
 $ \kappa $ Karman constant. (= 0.42) Useful if and only if iturb >= 10. (mixing length, $k-\varepsilon$, $R_{ij}-\varepsilon$, LES, v2f or $k-\omega$) More...
 
double precision, save cstlog = 5.2d0
 constant of logarithmic law function: $ \dfrac{1}{\kappa} \ln(y^+) + cstlog $ ( $ cstlog = 5.2 $) constant of the logarithmic wall function. Useful if and only if iturb >= 10 (mixing length, $k-\varepsilon$, $R_{ij}-\varepsilon$, LES, v2f or $k-\omega$) More...
 
real(c_double), pointer, save ypluli
 limit value of $y^+$ for the viscous sublayer. ypluli depends on the chosen wall function: it is initialized to 10.88 for the scalable wall function (iwallf=4), otherwise it is initialized to $1/\kappa\approx 2,38$. In LES, ypluli is taken by default to be 10.88. More...
 
double precision, pointer, save apow
 Werner and Wengle coefficient. More...
 
double precision, pointer, save bpow
 Werner and Wengle coefficient. More...
 
real(c_double), pointer, save cmu
 constant $C_\mu$ for all the RANS turbulence models Warning, different values for the v2f model Useful if and only if iturb = 20, 21, 30, 31, 50, 51 or 60 ( $k-\varepsilon$, $R_{ij}-\varepsilon$ or $k-\omega$) More...
 
real(c_double), pointer, save cmu025
 $ C_\mu^\frac{1}{4} $ More...
 
real(c_double), pointer, save crij1
 Coefficient of interfacial coefficient in k-eps, used in Lagrange treatment. More...
 
real(c_double), pointer, save crij2
 constant $C_2$ for the $R_{ij}-\varepsilon$ LRR model. Useful if and only if iturb=30 ( $R_{ij}-\varepsilon$ LRR) More...
 
real(c_double), pointer, save crij3
 constant $C_3$ for the buoyant production term $R_{ij}-\varepsilon$ models. More...
 
real(c_double), pointer, save csrij
 constant $C_s$ for the $R_{ij}-\varepsilon$ models. More...
 
double precision, save xcl = 0.122d0
 constant of the Rij-epsilon EBRSM More...
 
double precision, save xa1 = 0.1d0
 constant in the expression of Ce1' for the Rij-epsilon EBRSM More...
 
double precision, save xct = 6.d0
 constant of the Rij-epsilon EBRSM More...
 
double precision, save xceta = 80.d0
 constant of the Rij-epsilon EBRSM More...
 
double precision, save ckwsk1 = 1.d0/0.85d0
 constant $\sigma_{k1}$ for the $k-\omega$ SST model. Useful if and only if iturb=60 More...
 
double precision, save ckwsk2 = 1.d0
 constant $\sigma_{k2}$ for the $k-\omega$ SST model. Useful if and only if iturb=60 More...
 
double precision, save ckwsw1 = 2.d0
 constant $\sigma_{\omega 1}$ for the $k-\omega$ SST model. Useful if and only if iturb=60 ( $k-\omega$ SST) More...
 
double precision, save ckwsw2 = 1.d0/0.856d0
 constant $\sigma_{\omega 2}$ for the $k-\omega$ SST model. Useful if and only if iturb=60 ( $k-\omega$ SST) More...
 
double precision, save ckwbt1 = 0.075d0
 constant $\beta_1$ for the $k-\omega$ SST model. Useful if and only if iturb=60 ( $k-\omega$ SST) More...
 
double precision, save ckwbt2 = 0.0828d0
 constant $\beta_2$ for the $k-\omega$ SST model. Useful if and only if iturb=60 ( $k-\omega$ SST) More...
 
double precision, save ckwgm1
 $\frac{\beta_1}{C_\mu}-\frac{\kappa^2}{\sqrt{C_\mu}\sigma_{\omega 1}}$ constant $\gamma_1$ for the $k-\omega$ SST model. Useful if and only if iturb=60 ( $k-\omega$ SST) More...
 
double precision, save ckwgm2
 $\frac{\beta_2}{C_\mu}-\frac{\kappa^2}{\sqrt{C_\mu}\sigma_{\omega 2}}$ constant $\gamma_2$ for the $k-\omega$ SST model. Useful if and only if iturb=60 ( $k-\omega$ SST) More...
 
double precision, save ckwa1 = 0.31d0
 specific constant of k-omega SST constant $a_1$ for the $k-\omega$ SST model. Useful if and only if iturb=60 ( $k-\omega$ SST) More...
 
double precision, save ckwc1 = 10.d0
 constant $ c_1 $ for the $k-\omega$ SST model. Useful if and only if iturb=60 ( $k-\omega$ SST) specific constant of k-omega SST More...
 
double precision, save csab1 = 0.1355d0
 specific constant of Spalart-Allmaras More...
 
double precision, save csab2 = 0.622d0
 specific constant of Spalart-Allmaras More...
 
double precision, save csasig = 2.d0/3.d0
 specific constant of Spalart-Allmaras More...
 
double precision, save csav1 = 7.1d0
 specific constant of Spalart-Allmaras More...
 
double precision, save csaw1
 specific constant of Spalart-Allmaras More...
 
double precision, save csaw2 = 0.3d0
 specific constant of Spalart-Allmaras More...
 
double precision, save csaw3 = 2.d0
 specific constant of Spalart-Allmaras More...
 
real(c_double), pointer, save almax
 is a characteristic macroscopic length of the domain, used for the initialization of the turbulence and the potential clipping (with iclkep=1) More...
 
real(c_double), pointer, save uref
 the characteristic flow velocity, used for the initialization of the turbulence. Negative value: not initialized. More...
 
real(c_double), pointer, save xlomlg
 mixing length for the mixing length model More...
 
real(c_double), pointer, save xlesfl
 constant used in the definition of LES filtering diameter: $ \delta = \text{xlesfl} . (\text{ales} . volume)^{\text{bles}}$ xlesfl is a constant used to define, for each cell $\omega_i$, the width of the (implicit) filter: $\overline{\Delta}=xlesfl(ales*|\Omega_i|)^{bles}$
Useful if and only if iturb = 40 or 41 More...
 
real(c_double), pointer, save ales
 constant used to define, for each cell $Omega_i$, the width of the (implicit) filter: More...
 
real(c_double), pointer, save bles
 constant used to define, for each cell $Omega_i$, More...
 
real(c_double), pointer, save csmago
 Smagorinsky constant used in the Smagorinsky model for LES. The sub-grid scale viscosity is calculated by $\displaystyle\mu_{sg}= \rho C_{smago}^2\bar{\Delta}^2\sqrt{2\bar{S}_{ij}\bar{S}_{ij}}$ where $\bar{\Delta}$ is the width of the filter and $\bar{S}_{ij}$ the filtered strain rate. More...
 
real(c_double), pointer, save xlesfd
 ratio between explicit and explicit filter width for a dynamic model constant used to define, for each cell $\Omega_i$, the width of the explicit filter used in the framework of the LES dynamic model: $\widetilde{\overline{\Delta}}=xlesfd\overline{\Delta}$. More...
 
real(c_double), pointer, save cdries
 van Driest constant appearing in the van Driest damping function applied to the Smagorinsky constant: More...
 
double precision, save volmin
 minimal control volume More...
 
double precision, save volmax
 maximal control volume More...
 
double precision, save voltot
 total domain volume More...
 
double precision, save xclt = 0.305d0
 constant of EB-AFM and EB-DFM (0.122*2.5d0, See F. Dehoux thesis) More...
 

Detailed Description

Module for physical constants.