C05-1.mws

COMPLEX ANALYSIS: Maple Worksheets, 2001
(c) John H. Mathews Russell W. Howell
mathews@fullerton.edu howell@westmont.edu

Complimentary software to accompany the textbook:

COMPLEX ANALYSIS: for Mathematics & Engineering, 4th Ed, 2001, ISBN: 0-7637-1425-9
Jones and Bartlett Publishers, Inc., 40 Tall Pine Drive, Sudbury, MA 01776
Tele. (800) 832-0034; FAX: (508) 443-8000, E-mail: mkt@jbpub.com, http://www.jbpub.com/


CHAPTER 5 ELEMENTARY FUNCTIONS

Section 5.1 The Complex Exponential Function

How should complex-valued functions such as exp(z) , log(z) , sin(z) , etc., be defined? Clearly, any responsible definition should satisfy the following criteria:

i. The functions so defined must give the same values as the corresponding functions for real variables when the number z is a real number.

ii. As far as possible, the properties of these new functions must correspond with their real counterparts. For example, we would want

exp(z[1]+z[2]) = exp(z[1])*exp(z[2])

to be valid regardless of whether z[1] and z[2] were real or complex.

These requirements may seem like a tall order to fill. There is a procedure, however, that offers promising results. It is to put the expansion of the real functions exp(z) , log(z) , sin(z) , etc., as power series into complex form. This will be our stategy for the next few sections.

Recall that the real exponential function can be represented by the power series exp(x) = Sum(x^n/n!,n = 0 .. infinity) . Thus it is only natural to define the complex exponential exp(z) , also written as `exp(z)` , in the following way:

Definition 5.1: The complex exponential function

exp(z) = `exp(z)` = sum(z^n/n!,n = 0 .. infinity)

Clearly this definition agrees with that of the real exponential function when z is a real number.

Load Maple's "conformal mapping" procedure.
Make sure this is done only ONCE during a Maple session.

> with(plots):

Theorem. The exponential function is a solution to the differential equation `f '(z)` = f(z) with the initial condition f(0) = 1 .

> f:='f': z:='z': Z:='Z':
f := z -> exp(z):
f1 := z -> subs(Z=z, diff(f(Z),Z)):
`f(z) ` = f(z);
`f '(z) ` = f1(z);
`f(0) ` = f(0);

`f(z) ` = exp(z)

`f '(z) ` = exp(z)

`f(0) ` = 1

To see its real and imaginary parts, use complex expand.

> x:='x': y:='y': Z:='Z':
Z := x + I*y:
`exp(z) ` = exp(Z);
`exp(z) ` = evalc(exp(Z));

`exp(z) ` = exp(x+I*y)

`exp(z) ` = exp(x)*cos(y)+I*exp(x)*sin(y)

Now verify that the "rules of exponents" hold.

> x:='x': y:='y': z:='z':
w1 := evalc(exp(x[1]+I*y[1])):
w2 := evalc(exp(x[2]+I*y[2])):
w3 := w1*w2: exp(z[1])*exp(z[2]) = w3; ` `;
w3 := evalc(w1*w2): exp(z[1])*exp(z[2]) = w3; ` `;
w3 := expand(w3): exp(z[1])*exp(z[2]) = w3; ` `;
z4 := (x[1]+I*y[1])+(x[2]+I*y[2]):
w4 := exp(z4): exp(z[1]*z[2]) = w4; ` `;
w4 := evalc(exp(z4)): exp(z[1]*z[2]) = w4; ` `;
w4 := expand(w4, trig): exp(z[1]*z[2]) = w4; ` `;
`Does exp(z1 z2) = exp(z1) exp(z2) ?`;
w3 = w4; ` `;
evalb(expand(w3 = w4));

exp(z[1])*exp(z[2]) = (exp(x[1])*cos(y[1])+I*exp(x[1])*sin(y[1]))*(exp(x[2])*cos(y[2])+I*exp(x[2])*sin(y[2]))

` `

exp(z[1])*exp(z[2]) = exp(x[1])*cos(y[1])*exp(x[2])*cos(y[2])-exp(x[1])*sin(y[1])*exp(x[2])*sin(y[2])+I*(exp(x[1])*sin(y[1])*exp(x[2])*cos(y[2])+exp(x[1])*cos(y[1])*exp(x[2])*sin(y[2]))

` `

exp(z[1])*exp(z[2]) = exp(x[1])*cos(y[1])*exp(x[2])*cos(y[2])-exp(x[1])*sin(y[1])*exp(x[2])*sin(y[2])+I*exp(x[1])*sin(y[1])*exp(x[2])*cos(y[2])+I*exp(x[1])*cos(y[1])*exp(x[2])*sin(y[2])

` `

exp(z[1]*z[2]) = exp(x[1]+I*y[1]+x[2]+I*y[2])

` `

exp(z[1]*z[2]) = exp(x[1]+x[2])*cos(y[1]+y[2])+I*exp(x[1]+x[2])*sin(y[1]+y[2])

` `

exp(z[1]*z[2]) = exp(x[1])*cos(y[1])*exp(x[2])*cos(y[2])-exp(x[1])*sin(y[1])*exp(x[2])*sin(y[2])+I*exp(x[1])*sin(y[1])*exp(x[2])*cos(y[2])+I*exp(x[1])*cos(y[1])*exp(x[2])*sin(y[2])

` `

`Does  exp(z1 z2) = exp(z1) exp(z2)  ?`

exp(x[1])*cos(y[1])*exp(x[2])*cos(y[2])-exp(x[1])*sin(y[1])*exp(x[2])*sin(y[2])+I*exp(x[1])*sin(y[1])*exp(x[2])*cos(y[2])+I*exp(x[1])*cos(y[1])*exp(x[2])*sin(y[2]) = exp(x[1])*cos(y[1])*exp(x[2])*cos(y...
exp(x[1])*cos(y[1])*exp(x[2])*cos(y[2])-exp(x[1])*sin(y[1])*exp(x[2])*sin(y[2])+I*exp(x[1])*sin(y[1])*exp(x[2])*cos(y[2])+I*exp(x[1])*cos(y[1])*exp(x[2])*sin(y[2]) = exp(x[1])*cos(y[1])*exp(x[2])*cos(y...

` `

true

Theorem 5.1 The function `exp(z)` = exp(z) is an entire function satisfying:

i. `exp'(z) = exp(z)` = exp(z) (Using Leibniz notation, Diff(exp(z),z) = exp(z) .)

ii. exp( z[1]+z[2] ) = exp( z[1] )exp( z[2] ) (That is, exp(z[1]+z[2]) = exp(z[1])*exp(z[2]) .)

iii. If theta is a real number, then exp(i*theta) = cos(theta)+i*sin(theta) .

Example 5.1, Page 164. The points z[n] = 5/4+i*(11*pi/6+2*n*pi) for
n =..., -2, -1, 0, 1, 2, ... are mapped onto a single point
w[0] = exp(z[n]) .

> Z0 := 5/4 + I*11*Pi/6:
for k from 0 to 5 do
exp(Z0+I*2*Pi*k)=evalc(exp(Z0+I*2*Pi*k));
od;

exp(5/4+11/6*I*Pi) = 1/2*exp(5/4)*sqrt(3)-1/2*I*exp(5/4)

exp(5/4+23/6*I*Pi) = 1/2*exp(5/4)*sqrt(3)-1/2*I*exp(5/4)

exp(5/4+35/6*I*Pi) = 1/2*exp(5/4)*sqrt(3)-1/2*I*exp(5/4)

exp(5/4+47/6*I*Pi) = 1/2*exp(5/4)*sqrt(3)-1/2*I*exp(5/4)

exp(5/4+59/6*I*Pi) = 1/2*exp(5/4)*sqrt(3)-1/2*I*exp(5/4)

exp(5/4+71/6*I*Pi) = 1/2*exp(5/4)*sqrt(3)-1/2*I*exp(5/4)

Example 5.2, Page 166. Show that the transformation w = exp(z) maps the rectangle
`R = {(x,y):  a <= x <= b and c <= y <= d}` onto a portion of an annular region bounded by two rays.
For illustration we use R = {(x,y): -1 <= x <= 1 and -
p /3 <= y <= p /4} .

> f:='f': z:='z':
f := z -> exp(z):
`f(z) ` = f(z);
conformal(f(z), z=-1-I*Pi/3..1+I*Pi/4,
title=`w = exp(z)`,
grid=[8,8],numxy=[50,50],
scaling=constrained,
labels=[`u`,`v `],
tickmarks=[3,5],
view=[0..2.8,-2.4..2.0]);

`f(z) ` = exp(z)

[Maple Plot]

End of Section 5.1.