From: Jens Vollinga <vollinga@thep.physik.uni-mainz.de>
Date: Fri, 19 Dec 2003 17:40:08 +0000 (+0000)
Subject: Removed debugging code.
X-Git-Tag: release_1-2-0~37
X-Git-Url: https://www.ginac.de/ginac.git//ginac.git?p=ginac.git;a=commitdiff_plain;h=c1285bb62f3a86454ca26260cf8b4352238a1fc5;ds=inline

Removed debugging code.
---

diff --git a/ginac/inifcns_nstdsums.cpp b/ginac/inifcns_nstdsums.cpp
index 4fe91ad3..55520e34 100644
--- a/ginac/inifcns_nstdsums.cpp
+++ b/ginac/inifcns_nstdsums.cpp
@@ -2033,25 +2033,25 @@ static ex H_eval(const ex& m_, const ex& x)
 	if ((x == _ex1) && (*(--m.end()) != _ex0)) {
 		return convert_H_to_zeta(m);
 	}
-//	if (step == 0) {
-//		if (pos1 == _ex0) {
-//			// all zero
-//			if (x == _ex0) {
-//				return H(m_, x).hold();
-//			}
-//			return pow(log(x), m.nops()) / factorial(m.nops());
-//		} else {
-//			// all (minus) one
-//			return pow(-pos1*log(1-pos1*x), m.nops()) / factorial(m.nops());
-//		}
-//	} else if ((step == 1) && (pos1 == _ex0)){
-//		// convertible to S
-//		if (pos2 == _ex1) {
-//			return S(n, p, x);
-//		} else {
-//			return pow(-1, p) * S(n, p, -x);
-//		}
-//	}
+	if (step == 0) {
+		if (pos1 == _ex0) {
+			// all zero
+			if (x == _ex0) {
+				return H(m_, x).hold();
+			}
+			return pow(log(x), m.nops()) / factorial(m.nops());
+		} else {
+			// all (minus) one
+			return pow(-pos1*log(1-pos1*x), m.nops()) / factorial(m.nops());
+		}
+	} else if ((step == 1) && (pos1 == _ex0)){
+		// convertible to S
+		if (pos2 == _ex1) {
+			return S(n, p, x);
+		} else {
+			return pow(-1, p) * S(n, p, -x);
+		}
+	}
 	if (x == _ex0) {
 		return _ex0;
 	}