module PhysicsClass use iso_fortran_env implicit none !real(real64) :: c = dble(2.99792458E+008) ! light speed !real(real64) :: Na = dble(6.02214179E+023)! Avogadro constant !real(real64) :: R = dble(8.314472)! Avogadro constant J/(K・mol) end module