Mathematica 9 is now available
Services & Resources / Wolfram Forums
MathGroup Archive
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2000

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

Search the Archive

Re: a question about complex variable

  • To: mathgroup at
  • Subject: [mg21672] Re: [mg21620] a question about complex variable
  • From: Andrzej Kozlowski <andrzej at>
  • Date: Sat, 22 Jan 2000 02:52:25 -0500 (EST)
  • Sender: owner-wri-mathgroup at

First of all the answer you say you want to get is not always true. The
correct answer depends on the values of A and P. Take the simple case A =
3Pi/4 and P=Pi. Then your c will become I, its argument Pi/2 and absolute
value 1. On the other hand -2(P+Pi/4) is -10Pi/4 and Tan[A] is -1.
Mathematica however, can give you correct answers:

c = (-I* Cos[2 P] - Sin[2 P]) Tan[A];

argc = FullSimplify[ComplexExpand[Arg[c], TargetFunctions -> {Re, Im}],
    A \[Element] Reals && P \[Element] Reals]
ArcTan[-Sin[2 A] Sin[2 P], -Cos[2 P] Sin[2 A]]

absc = FullSimplify[ComplexExpand[Abs[c], TargetFunctions -> {Re, Im}]]
Sqrt[Tan[A] ]

This is the best you can do without more information about A and P.
For example, if you know that Tan[A]>0 you can now use:
Simplify[absc, Tan[A] > 0]
Again,  if, for example, you know that A lies between 0 and Pi/2 (first
quarter) you can further get:

Simplify[argc, 0 < A < Pi/2]
ArcTan[-Sin[2 P], -Cos[2 P]]

This means that the argument of c has tangent equal to Cot[2P] and also
tells you the quadrant in which it lies.

Andrzej Kozlowski
Toyama International University

> From: ZHU Xiaopeng <xpzhu at>
To: mathgroup at
> Date: Tue, 18 Jan 2000 02:35:10 -0500 (EST)
> To: mathgroup at
> Subject: [mg21672] [mg21620] a question about complex variable
> In my algebra computation, I obtain a expression:
> C = (- I Cos[2 P] - Sin[2 P]) Tan[A]
> P,A are real variables. Apperently, the argument of C is -2(P+Pi/4) and the
> absolute value of C is Tan[A]. But when I use Arg[C] and Abs[C], Mathematica
> tells me:
> Out[41]=Abs[(-I Cos[2 P] - Sin[2 P]) Tan[A]]
> Out[42]=Arg[(-I Cos[2 P] - Sin[2 P]) Tan[A]]
> This problem appeared at beginning of the computation. I have no idea to deal
> with it, so the expressions become longer and longer during the computation.
> Can somebody help me?

  • Prev by Date: Re: Fast Fourier Transforms
  • Next by Date: Strange behaviour
  • Previous by thread: Re: a question about complex variable
  • Next by thread: Crash after Abort Evaluation