blob: 4009a7f9c218db6b17624eea97a5eec87f237597 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
# define TGSOURCE "complex/ctan.c"
#include "_tgmath.h"
#include <complex.h>
TYPE complex TGFN(ctan)(TYPE complex z)
{
return TGCMPLX(0.0, -TGFN(ctanh)(I * z));
}
/*d
The ctan functions compute the complex tangent of z.
d*/
/*r
The ctan functions return the complex tangent value.
r*/
/*
STDC(199901)
LINK(m)
*/
|
