MODULE constnts_Module
!----------------------------------------------------------------------
!  avagadro    This is Avagadros number in particles/mole.
!  clight      This is the speed of light in cm/sec.
!  boltzman    This is Boltzman's constant in ergs/Kelvin.
!----------------------------------------------------------------------
   USE Numeric_Kinds_Module
   IMPLICIT NONE
   SAVE
   REAL(KIND=dp) avagadro, clight, boltzman
END MODULE constnts_Module