Re: Simplify
- To: mathgroup at smc.vnet.net
- Subject: [mg58676] Re: [mg58669] Simplify
- From: Bob Hanlon <hanlonr at cox.net>
- Date: Thu, 14 Jul 2005 02:49:01 -0400 (EDT)
- Reply-to: hanlonr at cox.net
- Sender: owner-wri-mathgroup at wolfram.com
poly=p (p-1) b^2+s^2;
prod=Sqrt[poly] Sqrt[1/poly];
Since 0<p<1 then (p-1) is negative and poly can be negative. Restrict poly to
being positive
Simplify[prod, poly>0]
1
Equivalently,
PowerExpand[prod]
1
Bob Hanlon
>
> From: "paulvonhippel at yahoo" <paulvonhippel at yahoo.com>
To: mathgroup at smc.vnet.net
> Date: 2005/07/13 Wed AM 03:29:00 EDT
> Subject: [mg58676] [mg58669] Simplify
>
> I'm having some trouble getting an expression to simplify in an obvious
> way. (There seems to be a long tradition of users posting to this group
> with similar troubles.)
>
> The expression is
>
> poly = p (p - 1) b^2 + s^2
> prod = Sqrt [poly] Sqrt[1/poly]
> Simplify[prod, {0 < p < 1, s > 0, bϵReals}]
>
> which should return one, I think, but doesn't.
>
> I'd be grateful for suggestions.
>
> Thanks!
> Paul
>
>