2
* This file has no copyright assigned and is placed in the Public Domain.
3
* This file is part of the w64 mingw-runtime package.
4
* No warranty is given; refer to the file DISCLAIMER.PD within this package.
8
Contributed by Danny Smith
12
/* clog (x + I * y) = log (hypot (x, y)) + I * atan2 (y, x) */
17
float complex clogf (float complex Z)
20
__real__ Res = logf (_hypot (__real__ Z, __imag__ Z));
21
__imag__ Res = cargf (Z);
2
* This file has no copyright assigned and is placed in the Public Domain.
3
* This file is part of the w64 mingw-runtime package.
4
* No warranty is given; refer to the file DISCLAIMER.PD within this package.
8
Contributed by Danny Smith
12
/* clog (x + I * y) = log (hypot (x, y)) + I * atan2 (y, x) */
17
float complex clogf (float complex Z)
20
__real__ Res = logf (_hypot (__real__ Z, __imag__ Z));
21
__imag__ Res = cargf (Z);