source: azure_iot_hub/trunk/musl-1.1.18/src/complex/ctan.c@ 389

Last change on this file since 389 was 389, checked in by coas-nagasima, 5 years ago

ビルドが通るよう更新
  • Property svn:eol-style set to native
  • Property svn:mime-type set to text/x-csrc;charset=UTF-8
File size: 166 bytes
RevLine 
[388]1#include "libm.h"
2
3/* tan(z) = -i tanh(i z) */
4
5double complex ctan(double complex z)
6{
7 z = ctanh(CMPLX(-cimag(z), creal(z)));
8 return CMPLX(cimag(z), -creal(z));
9}
Note: See TracBrowser for help on using the repository browser.