Module MOD_CSTES ! Implicit None ! ! Units in MKSA from http://physics.nist.gov/constants ! Double Precision, parameter :: cste_c = 2.99792458D+8 ! m/s (Célérité de la lumiére) Double Precision, parameter :: cste_a0 = 5.2917720859D-11 ! m (Rayon de Bohr) Double Precision, parameter :: cste_h = 6.62606896D-34 ! Js (Constante de planck) Double Precision, parameter :: cste_k_B = 1.3806504D-23 ! J/K (Constante de Boltzman) Double Precision, parameter :: cste_m_e = 9.10938215D-31 ! kg (Masse de l'électron) Double Precision, parameter :: cste_m_p = 1.672621637D-27 ! kg (Masse du proton) Double Precision, parameter :: cste_m_u = 1.660538782D-27 ! kg (Unité de Masse Atomique) Double Precision, parameter :: cste_Ryd = 10973731.568527D0 ! 1/m (Energie de Rydberg) Double Precision, parameter :: cste_q = 1.60217653D-19 ! Charge élémentaire A.s ! ! Mahtematical constants ! Double Precision, parameter :: cste_pi = 3.14159265358979324D0 Double Precision, parameter :: cste_gam = 0.57721566490153286D0 ! End Module MOD_CSTES