-static ex zeta_series(ex const & x, symbol const & s, ex const & point, int order)
+unsigned zeta1_SERIAL::serial =
+ function::register_new(function_options("zeta").
+ eval_func(zeta1_eval).
+ evalf_func(zeta1_evalf).
+ derivative_func(zeta1_deriv).
+ latex_name("\\zeta").
+ overloaded(2));
+
+//////////
+// Derivatives of Riemann's Zeta-function zeta(0,x)==zeta(x)
+//////////
+
+static ex zeta2_eval(const ex & n, const ex & x)
+{
+ if (n.info(info_flags::numeric)) {
+ // zeta(0,x) -> zeta(x)
+ if (n.is_zero())
+ return zeta(x);
+ }
+
+ return zeta(n, x).hold();
+}
+
+static ex zeta2_deriv(const ex & n, const ex & x, unsigned deriv_param)