MathGroup Archive 2006

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

Search the Archive

Re: Trigonometric simplification

  • To: mathgroup at smc.vnet.net
  • Subject: [mg68890] Re: Trigonometric simplification
  • From: "Dana DeLouis" <dana.del at gmail.com>
  • Date: Tue, 22 Aug 2006 05:20:29 -0400 (EDT)
  • Sender: owner-wri-mathgroup at wolfram.com

>   r=Tan[a]^2/(Sec[a]^2)^(3/2)
>     simplifying that to
>   r=Cos[a]*Sin[a]^2

r = Tan[a]^2/(Sec[a]^2)^(3/2); 

Hi.  Just one of a few ways. With a Sqrt on Sec[a], try to find values of 'a
where Sec[a] is positive.
Since I've forgotten what they are...

Plot[Sec[a], {a, -Pi, Pi}, 
   Ticks -> {Range[-Pi, Pi, Pi/4], Automatic}]; 

Therefore:
Assuming[{-Pi/2 < a < Pi/2}, Simplify[r]]

Cos[a]*Sin[a]^2

-- 
HTH.  :>)
Dana DeLouis
Windows XP, Mathematica 5.2


<carlos at colorado.edu> wrote in message news:ecbnnc$r29$1 at smc.vnet.net...
> As an intermediate result of some calculations I have
> the expression
> 
>   r=Tan[a]^2/(Sec[a]^2)^(3/2)
> 
> where a is real. How can I coerce Mathematica into
> simplifying that to
> 
>   r=Cos[a]*Sin[a]^2
> 
> Both Simplify and FullSimplify with assumptions on a
> fail to get the simpler form.
>


  • Prev by Date: Re: Trigonometric simplification
  • Next by Date: Re: position lists
  • Previous by thread: Re: Re: Trigonometric simplification
  • Next by thread: Re: Trigonometric simplification