cpow.c File Reference

#include "prim.h"

Include dependency graph for cpow.c:

Go to the source code of this file.

Functions
complex	cpow (complex a, complex z)
	Complex number raised to a power. More...

Function Documentation

cpow()

complex cpow	(	complex	a,
		complex	z
	)

Complex number raised to a power.

Definition at line 42 of file cpow.c.

References atan2(), cabs(), cimag(), cos(), cpack(), creal(), exp(), log(), pow(), and sin().

Referenced by ComplexNumber::Raise().

{
    complex w;
    double x, y, r, theta, absa, arga;

    x = creal(z);
    y = cimag(z);
    absa = cabs(a);
    if (absa == 0.0)
    {
        return cpack(0.0, + 0.0);
    }
    arga = atan2(cimag(a), creal(a));

    r = pow(absa, x);
    theta = x * arga;
    if (y != 0.0)
    {
        r = r * exp(-y * arga);
        theta = theta + y * log(absa);
    }

    w = cpack(r * cos(theta), r * sin(theta));
    return w;
}

Here is the call graph for this function:

Here is the caller graph for this function: