DAMASK_EICMD/src/constants.f90

17 lines
892 B
Fortran
Raw Normal View History

2021-11-25 10:51:56 +05:30
!--------------------------------------------------------------------------------------------------
!> @author Martin Diehl, KU Leuven
!> @brief physical constants
!--------------------------------------------------------------------------------------------------
module constants
use prec
implicit none(type,external)
2021-11-25 10:51:56 +05:30
public
real(pREAL), parameter :: &
T_ROOM = 293.15_pREAL, & !< Room temperature (20°C) in K (https://en.wikipedia.org/wiki/ISO_1)
K_B = 1.380649e-23_pREAL, & !< Boltzmann constant in J/Kelvin (https://doi.org/10.1351/goldbook)
N_A = 6.02214076e23_pREAL !< Avogadro constant in 1/mol (https://doi.org/10.1351/goldbook)
2021-11-25 10:51:56 +05:30
end module constants