MathGroup Archive 2000

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Simplifying things

  • To: mathgroup at
  • Subject: [mg26105] Re: [mg26070] Simplifying things
  • From: BobHanlon at
  • Date: Tue, 28 Nov 2000 01:55:49 -0500 (EST)
  • Sender: owner-wri-mathgroup at

In a message dated 11/22/00 2:23:31 AM, djago at writes:

>I need to simplify looooong equations, but don't know how to get rid of
>those terms like:
>when a is a real positive variable... How can I tell Mathematica 3 to
>simplify this?

test = {Sqrt[a^2] , Sqrt[a^4], Sqrt[a^(2m)]}

{Sqrt[a^2], Sqrt[a^4], Sqrt[a^(2*m)]}

test // PowerExpand

{a, a^2, a^m}

a /: Positive[a] = True;

m /: IntegerQ[m] = True;

test /. Sqrt[(x_?Positive)^n_?(IntegerQ[#/2] &)] :> x^(n/2)

{a, a^2, a^m}

Bob Hanlon

  • Prev by Date: Re: Simplifying things
  • Next by Date: Re: Csch and 1/Sinh
  • Previous by thread: Re: Simplifying things
  • Next by thread: Re: Simplifying things