function to call to evaluate the Zeta Function
R interface for Lueschers Zeta function
encapsulated against serveral includes
fixed warnings
corrected linking order