source:
azure_iot_hub/trunk/musl-1.1.18/src/complex/cacos.c
Last change on this file was 389, checked in by , 5 years ago | |
---|---|
|
|
File size: 266 bytes |
Line | |
---|---|
1 | #include "libm.h" |
2 | |
3 | // FIXME: Hull et al. "Implementing the complex arcsine and arccosine functions using exception handling" 1997 |
4 | |
5 | /* acos(z) = pi/2 - asin(z) */ |
6 | |
7 | double complex cacos(double complex z) |
8 | { |
9 | z = casin(z); |
10 | return CMPLX(M_PI_2 - creal(z), -cimag(z)); |
11 | } |
Note:
See TracBrowser
for help on using the repository browser.