MathGroup Archive 2011

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

Search the Archive

Re: help with integration

  • To: mathgroup at smc.vnet.net
  • Subject: [mg121652] Re: help with integration
  • From: Bob Hanlon <hanlonr at cox.net>
  • Date: Sat, 24 Sep 2011 22:32:13 -0400 (EDT)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com
  • Reply-to: hanlonr at cox.net

Integrate[
  r^2*ArcCos[x/r] - x*Sqrt[r^2 - x^2], {x, Sqrt[3] y, 
   Sqrt[r^2 - y^2]}, Assumptions -> {y > 0, r > 2 y}] // Simplify

y^3/3 + (2/3)*r^2*Sqrt[r^2 - 3*y^2] + y^2*Sqrt[r^2 - 3*y^2] - 
   r^2*y*(1 + Sqrt[3]*ArcCos[(Sqrt[3]*y)/r]) + r^2*Sqrt[r^2 - y^2]*
     ArcSec[r/Sqrt[r^2 - y^2]]

Assuming[{y > 0, r > 2 y}, 
 Integrate[
   r^2*ArcCos[x/r] - x*Sqrt[r^2 - x^2], {x, Sqrt[3] y, 
    Sqrt[r^2 - y^2]}] // Simplify]

y^3/3 + (2/3)*r^2*Sqrt[r^2 - 3*y^2] + y^2*Sqrt[r^2 - 3*y^2] - 
   r^2*y*(1 + Sqrt[3]*ArcCos[(Sqrt[3]*y)/r]) + r^2*Sqrt[r^2 - y^2]*
     ArcSec[r/Sqrt[r^2 - y^2]]

% === %%

True


Bob Hanlon

---- Salman Durrani <dsalman96 at yahoo.com> wrote: 

=============
I am trying to do the following integration:

Integrate[r^2*ArcCos[x/r] - x*Sqrt[r^2 - x^2], {x, Sqrt[3] y, Sqrt[r^2 - y^2]} ]

When I try, Mathematica comes back to be with a very long conditional expression.

How do I tell mathematica that r is positive, real in the above equation not complex.

Thanks

Kahless






  • Prev by Date: Re: 1-liner wanted
  • Next by Date: A fast way to compare two vectors
  • Previous by thread: Re: help with integration
  • Next by thread: Arbitrary vector