real(dp), parameter :: zeta2=pisq/6._dp
      real(dp), parameter :: zeta3=1.20205690315959428539973816151144_dp
      real(dp), parameter :: zeta4=pisq**2/90._dp
      real(dp), parameter :: zeta5=1.03692775514336992633136548645703_dp
      real(dp), parameter :: zeta6=pisq**3/945._dp