RE: find argument of function inside long result?
- To: mathgroup at smc.vnet.net
- Subject: [mg31322] RE: [mg31313] find argument of function inside long result?
- From: "David Park" <djmp at earthlink.net>
- Date: Sun, 28 Oct 2001 03:07:01 -0500 (EST)
- Sender: owner-wri-mathgroup at wolfram.com
Jose,
expr = ((1 + Sqrt[a])/(2 + Sqrt[b]))*(1/Sqrt[c]);
Cases[expr, a_^b:(-1/2 | 1/2) -> a^(2*b), Infinity]
{a, b, 1/c}
There may be some question as to how you want to treat the last square root
in the denominator.
Cases[expr, Power[a_, b : (-1/2 | 1/2)] -> a, Infinity]
{a, b, c}
David Park
djmp at earthlink.net
http://home.earthlink.net/~djmp/
> From: jose flanigan [mailto:jflanigan at netzero.net]
To: mathgroup at smc.vnet.net
>
> I have a very long symbolic result that has several sqrt functions. I
> would like to extract the arguments of each of the sqrt's.
>
> How can I do this? The expression is too complicated to try and
> read it off.
>
> thanks.
>