$Assumptions = Element[t, Reals] && Element[ω, Reals] && ω > 0 && t > 0; ArcTan[8.54596*10^7 (1. + 1. t^2 ω^2) (1.2214 + E^ω Cos[ 2 ArcTan[t ω]]), -1.70919*10^8 E^ω t ω] + ArcTan[8.54596*10^7 (1. + 1. t^2 ω^2) (1.2214 + E^ω Cos[2ArcTan[t ω]]),1.70919*10^8 E^ω t ω]//FullSimplify
Mathematica doesn't simplify this seemingly
I plotted the 3D-graph, it shows the expression is zero for all values of
I understand one underlying reason might be Mathematica isn't sure about the positivity of
Cos term in
x, and hence,
x. Am I right? Any ideas to simplify this term in code, instead of manually, would be very much appreciated. I'm relatively new to the language.