MathGroup Archive 2011

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

Search the Archive

simplification

  • To: mathgroup at smc.vnet.net
  • Subject: [mg122188] simplification
  • From: dimitris <dimmechan at yahoo.com>
  • Date: Wed, 19 Oct 2011 05:36:02 -0400 (EDT)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com

Hello to all.

I would appreciate your suggestions about simplifying further the
following lengthy expression.

ArcTan[(3*(Sqrt[3] + I*x - I*x^2)*(1 - x + x^2))/(-3 + I*Sqrt[3] - 3*x
- 3*I*Sqrt[3]*x + 3*x^2 + I*Sqrt[3]*x^2 - 6*x^3 -
      2*I*Sqrt[3]*x^4 - I*Sqrt[3*(1 - I*Sqrt[3])]*Sqrt[1 - x + x^2] +
I*Sqrt[3*(1 - I*Sqrt[3])]*x*Sqrt[1 - x + x^2] +
      I*Sqrt[3*(1 - I*Sqrt[3])]*x^2*Sqrt[1 - x + x^2] + 2*I*Sqrt[3*(1
- I*Sqrt[3])]*x^3*Sqrt[1 - x + x^2])]/
   Sqrt[3*(1 - I*Sqrt[3])] - ArcTan[(3*(Sqrt[3] - I*x + I*x^2)*(1 - x
+ x^2))/(3 + I*Sqrt[3] + 3*x - 3*I*Sqrt[3]*x - 3*x^2 +
      I*Sqrt[3]*x^2 + 6*x^3 - 2*I*Sqrt[3]*x^4 - I*Sqrt[3*(1 +
I*Sqrt[3])]*Sqrt[1 - x + x^2] +
      I*Sqrt[3*(1 + I*Sqrt[3])]*x*Sqrt[1 - x + x^2] + I*Sqrt[3*(1 +
I*Sqrt[3])]*x^2*Sqrt[1 - x + x^2] +
      2*I*Sqrt[3*(1 + I*Sqrt[3])]*x^3*Sqrt[1 - x + x^2])]/Sqrt[3*(1 +
I*Sqrt[3])] -
  (I*Log[(-I + Sqrt[3] - 2*I*x)^2*(I + Sqrt[3] + 2*I*x)^2])/
(2*Sqrt[3*(1 - I*Sqrt[3])]) +
  (I*Log[(-I + Sqrt[3] - 2*I*x)^2*(I + Sqrt[3] + 2*I*x)^2])/
(2*Sqrt[3*(1 + I*Sqrt[3])]) +
  (I*Log[(1 + x + x^2)*(11*I + 4*Sqrt[3] - 17*I*x - 4*Sqrt[3]*x +
11*I*x^2 + 4*Sqrt[3]*x^2 +
       10*I*Sqrt[1 - I*Sqrt[3]]*Sqrt[1 - x + x^2] - 8*I*Sqrt[1 -
I*Sqrt[3]]*x*Sqrt[1 - x + x^2])])/(2*Sqrt[3*(1 - I*Sqrt[3])]) -
  (I*Log[(1 + x + x^2)*(-11*I + 4*Sqrt[3] + 17*I*x - 4*Sqrt[3]*x -
11*I*x^2 + 4*Sqrt[3]*x^2 -
       10*I*Sqrt[1 + I*Sqrt[3]]*Sqrt[1 - x + x^2] + 8*I*Sqrt[1 +
I*Sqrt[3]]*x*Sqrt[1 - x + x^2])])/(2*Sqrt[3*(1 + I*Sqrt[3])])

Thanks in advance.
Dimitris



  • Prev by Date: Re: Export list to Excel without brackets
  • Next by Date: Re: Low CPU usage
  • Previous by thread: Re: simplification
  • Next by thread: Re: simplification