power::series() speedup from Chris Dams
authorChristian Bauer <Christian.Bauer@uni-mainz.de>
Wed, 21 Apr 2004 18:32:54 +0000 (18:32 +0000)
committerChristian Bauer <Christian.Bauer@uni-mainz.de>
Wed, 21 Apr 2004 18:32:54 +0000 (18:32 +0000)
ginac/pseries.cpp

index bcad8c1960df67a445832d0eb9fcbd24a4c83857..a8b820d46d073c28b81777de987a6cdf7cc4eb2e 100644 (file)
@@ -953,7 +953,7 @@ ex power::series(const relational & r, int order, unsigned options) const
        }
 
        // Is the expression of type something^(-int)?
-       if (!must_expand_basis && !exponent.info(info_flags::negint))
+       if (!must_expand_basis && !exponent.info(info_flags::negint) && !is_a<add>(basis))
                return basic::series(r, order, options);
 
        // Is the expression of type 0^something?