MathGroup Archive 2005

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

Search the Archive

Simplify further

  • To: mathgroup at smc.vnet.net
  • Subject: [mg61791] Simplify further
  • From: "Thomas Schmelzer" <thomas.??? at balliol.ox.ac.uk>
  • Date: Sun, 30 Oct 2005 00:43:20 -0400 (EDT)
  • Organization: Balliol College
  • Reply-to: "Thomas Schmelzer" <thomas.??? at balliol.ox.ac.uk>
  • Sender: owner-wri-mathgroup at wolfram.com

Hi experts,

Let

f[x_] := c/(x - p) + c\[Conjugate]/(x - p\[Conjugate])

I am interested in local extrema

Solve[D[f[x], x] == 0, x]

Mathematica gives me a list.

I plug those values into f again.

Using the Simplify command I get expression as

sqrt(- c conjugate c ( p - conjugate p ) ^2 )

Is there a way that Mathematica simplifies that to

4*(abs (c))^2  (Im p)^2

cheers

Thomas





  • Prev by Date: Re: GreaterEqual[x,1] shows up as Greater[x,1]
  • Next by Date: Question regarding Mathematica's treatment of whitespace
  • Previous by thread: Testing whether code is run in batch mode
  • Next by thread: Re: Simplify further