* power::info(): Unpolynomialize sin(x)^2 (by Chris Dams).

diff --git a/ginac/power.cpp b/ginac/power.cpp
index 309d529a69cffebb3825f96e2d1bcd13e6ff0916..f2c3731a9ee2b505850d7c499a4794931482ac0d 100644 (file)
--- a/ginac/power.cpp
+++ b/ginac/power.cpp
@@ -222,12 +222,14 @@ bool power::info(unsigned inf) const
                case info_flags::cinteger_polynomial:
                case info_flags::rational_polynomial:
                case info_flags::crational_polynomial:
-                       return exponent.info(info_flags::nonnegint);
+                       return exponent.info(info_flags::nonnegint) &&
+                              basis.info(inf);
                case info_flags::rational_function:
-                       return exponent.info(info_flags::integer);
+                       return exponent.info(info_flags::integer) &&
+                              basis.info(inf);
                case info_flags::algebraic:
-                       return (!exponent.info(info_flags::integer) ||
-                                       basis.info(inf));
+                       return !exponent.info(info_flags::integer) ||
+                              basis.info(inf);
        }
        return inherited::info(inf);
 }