This module define physical and numerical constant used by ROHSA
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer, | public, | parameter | :: | xp | = | REAL64 | |
real(kind=xp), | public, | parameter | :: | G | = | 6.67408e-8_xp | |
real(kind=xp), | public, | parameter | :: | c | = | 2.99792458e10_xp | |
real(kind=xp), | public, | parameter | :: | pi | = | 4.0_xp*atan(1.0_xp) | |
real(kind=xp), | public, | parameter | :: | M_sun | = | 1.98855e33_xp | |
real(kind=xp), | public, | parameter | :: | cst_rad | = | 7.5657308531642009e-15_xp | |
real(kind=xp), | public, | parameter | :: | stefan | = | (c*cst_rad)/4.0_xp | |
real(kind=xp), | public, | parameter | :: | kb | = | 1.3806488e-16_xp | |
real(kind=xp), | public, | parameter | :: | R | = | 8.3144598e7_xp | |
real(kind=xp), | public, | parameter | :: | gammag | = | 5._xp/3._xp | |
real(kind=xp), | public, | parameter | :: | thomson | = | 6.6524587158e-25_xp |