       Re: How to get an answer as a Root object?

• To: mathgroup at smc.vnet.net
• Subject: [mg57145] Re: How to get an answer as a Root object?
• From: "Valeri Astanoff" <astanoff at yahoo.fr>
• Date: Thu, 19 May 2005 03:08:12 -0400 (EDT)
• References: <d6bv8r\$pcu\$1@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

```The trouble is the derivative being infinite at the solution.
I use that trouble to find the solution :

In:=f[s_]:=
(-1+Sqrt-Sqrt[(1+2*Sqrt-s)*(-1+s)]+s)*(-1-Sqrt+Sqrt*s-
Sqrt[-1-2*Sqrt+2*(2+Sqrt-s)*s])-(-1-Sqrt+Sqrt*s+
Sqrt[-1-2*Sqrt+2*(2+Sqrt-s)*s])*(-2-2*Sqrt+2*s+2*

Sqrt[1-(1/4)*(-1-Sqrt+Sqrt[(1+2*Sqrt-s)*(-1+s)]+s)^2])

In:=Select[s /. Solve[Numerator[Together[1/f'[s]]] == 0], 2 < # < 3
&] // Simplify

Out= 2 + 1/Sqrt

In:= % // N

Out= 2.70711

That's not what you asked for but that's all I can do!

v.a.

```

• Prev by Date: Re: Visualization
• Next by Date: Re: Beginner : how to convert .bmp or .jpeg for digital processing
• Previous by thread: Re: How to get an answer as a Root object?
• Next by thread: Re: How to get an answer as a Root object?