*     -*-fortran-*-

      double precision pi
      double precision emc,zeta2,zeta3,zeta4,zeta5
*
      parameter(pi    = 3.1415926535897932385d0)
      parameter(emc   = 0.5772156649d0)
      parameter(zeta2 = 1.644934067d0)
      parameter(zeta3 = 1.2020569031d0)
      parameter(zeta4 = 1.0823232337d0)
      parameter(zeta5 = 1.0369277551d0)