Module Prefix_Module
!-----------------------------------------------------------------------
! prefix constants.
!    exa      = 1.d+18
!    peta     = 1.d+15
!    tera     = 1.d+12
!    giga     = 1.d+9
!    mega     = 1.d+6
!    kilo     = 1.d+3
!    hecto    = 1.d+2
!    deca     = 1.d+1
!    deci     = 1.d-1
!    centi    = 1.d-2
!    milli    = 1.d-3
!    micro    = 1.d-6
!    nano     = 1.d-9
!    pico     = 1.d-12
!    femto    = 1.d-15
!    atto     = 1.d-18
!-----------------------------------------------------------------------
   USE Numeric_Kinds_Module
   IMPLICIT NONE
   SAVE
   REAL(KIND=dp) exa, peta, tera, giga, megaf, kilo, hecto, deca
   REAL(KIND=dp) deci, centi, milli, micro, nano, pico, femto, atto
END MODULE Prefix_Module