From f80078edc54e88829875387c79b6adb8d791eb34 Mon Sep 17 00:00:00 2001 From: Richard Kreckel Date: Fri, 24 Sep 2004 01:46:19 +0000 Subject: [PATCH] * power::info(): Unpolynomialize sin(x)^2 (by Chris Dams). --- ginac/power.cpp | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/ginac/power.cpp b/ginac/power.cpp index 309d529a..f2c3731a 100644 --- 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); } -- 2.44.0