From 8e700d53c59baa0f8c770f2326fbb7abda317f21 Mon Sep 17 00:00:00 2001
From: Jens Vollinga <vollinga@thep.physik.uni-mainz.de>
Date: Mon, 9 Aug 2004 18:32:09 +0000
Subject: [PATCH] Fixed bug in series expansion

---
 ginac/pseries.cpp | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/ginac/pseries.cpp b/ginac/pseries.cpp
index 443969c1..993eacf1 100644
--- a/ginac/pseries.cpp
+++ b/ginac/pseries.cpp
@@ -971,7 +971,12 @@ ex power::series(const relational & r, int order, unsigned options) const
 
 	// No, expand basis into series
 
-	numeric numexp = ex_to<numeric>(exponent);
+	numeric numexp;
+	if (is_a<numeric>(exponent)) {
+		numexp = ex_to<numeric>(exponent);
+	} else {
+		numexp = 0;
+	}
 	const ex& sym = r.lhs();
 	// find existing minimal degree
 	int real_ldegree = basis.expand().ldegree(sym-r.rhs());
-- 
2.49.0