diff options
Diffstat (limited to 'src/complex')
68 files changed, 544 insertions, 0 deletions
diff --git a/src/complex/__cexp.c b/src/complex/__cexp.c index 003d20af..2c97581a 100644 --- a/src/complex/__cexp.c +++ b/src/complex/__cexp.c @@ -85,3 +85,11 @@ double complex __ldexp_cexp(double complex z, int expt) return CMPLX(cos(y) * exp_x * scale1 * scale2, sin(y) * exp_x * scale1 * scale2); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/__cexpf.c b/src/complex/__cexpf.c index ee5ff2bc..1b801dfe 100644 --- a/src/complex/__cexpf.c +++ b/src/complex/__cexpf.c @@ -66,3 +66,11 @@ float complex __ldexp_cexpf(float complex z, int expt) return CMPLXF(cosf(y) * exp_x * scale1 * scale2, sinf(y) * exp_x * scale1 * scale2); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/cabs.c b/src/complex/cabs.c index c5ad58ab..29a8b616 100644 --- a/src/complex/cabs.c +++ b/src/complex/cabs.c @@ -4,3 +4,11 @@ double cabs(double complex z) { return hypot(creal(z), cimag(z)); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/cabsf.c b/src/complex/cabsf.c index 619f28d3..7e6a895c 100644 --- a/src/complex/cabsf.c +++ b/src/complex/cabsf.c @@ -4,3 +4,11 @@ float cabsf(float complex z) { return hypotf(crealf(z), cimagf(z)); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/cabsl.c b/src/complex/cabsl.c index d37e3f2e..cc1c2ac1 100644 --- a/src/complex/cabsl.c +++ b/src/complex/cabsl.c @@ -11,3 +11,11 @@ long double cabsl(long double complex z) return hypotl(creall(z), cimagl(z)); } #endif + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/cacos.c b/src/complex/cacos.c index c39d257b..3d97fb80 100644 --- a/src/complex/cacos.c +++ b/src/complex/cacos.c @@ -9,3 +9,11 @@ double complex cacos(double complex z) z = casin(z); return CMPLX(M_PI_2 - creal(z), -cimag(z)); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/cacosf.c b/src/complex/cacosf.c index ed8acf0f..401372c1 100644 --- a/src/complex/cacosf.c +++ b/src/complex/cacosf.c @@ -9,3 +9,11 @@ float complex cacosf(float complex z) z = casinf(z); return CMPLXF(float_pi_2 - crealf(z), -cimagf(z)); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/cacosh.c b/src/complex/cacosh.c index 76127f75..0fd5e7f2 100644 --- a/src/complex/cacosh.c +++ b/src/complex/cacosh.c @@ -10,3 +10,11 @@ double complex cacosh(double complex z) if (zineg) return CMPLX(cimag(z), -creal(z)); else return CMPLX(-cimag(z), creal(z)); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/cacoshf.c b/src/complex/cacoshf.c index 8bd80581..8889c1bd 100644 --- a/src/complex/cacoshf.c +++ b/src/complex/cacoshf.c @@ -8,3 +8,11 @@ float complex cacoshf(float complex z) if (zineg) return CMPLXF(cimagf(z), -crealf(z)); else return CMPLXF(-cimagf(z), crealf(z)); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/cacoshl.c b/src/complex/cacoshl.c index 3a284be9..1a615123 100644 --- a/src/complex/cacoshl.c +++ b/src/complex/cacoshl.c @@ -15,3 +15,11 @@ long double complex cacoshl(long double complex z) else return CMPLXL(-cimagl(z), creall(z)); } #endif + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/cacosl.c b/src/complex/cacosl.c index cc20dcd7..18f136ec 100644 --- a/src/complex/cacosl.c +++ b/src/complex/cacosl.c @@ -14,3 +14,11 @@ long double complex cacosl(long double complex z) return CMPLXL(PI_2 - creall(z), -cimagl(z)); } #endif + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/carg.c b/src/complex/carg.c index dfe9b97a..c0675224 100644 --- a/src/complex/carg.c +++ b/src/complex/carg.c @@ -4,3 +4,11 @@ double carg(double complex z) { return atan2(cimag(z), creal(z)); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/cargf.c b/src/complex/cargf.c index 9a6c19b6..da4ab652 100644 --- a/src/complex/cargf.c +++ b/src/complex/cargf.c @@ -4,3 +4,11 @@ float cargf(float complex z) { return atan2f(cimagf(z), crealf(z)); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/cargl.c b/src/complex/cargl.c index 88f95f96..153bdd28 100644 --- a/src/complex/cargl.c +++ b/src/complex/cargl.c @@ -11,3 +11,11 @@ long double cargl(long double complex z) return atan2l(cimagl(z), creall(z)); } #endif + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/casin.c b/src/complex/casin.c index 3244bebb..3c936eea 100644 --- a/src/complex/casin.c +++ b/src/complex/casin.c @@ -15,3 +15,11 @@ double complex casin(double complex z) double complex r = clog(CMPLX(-y, x) + csqrt(w)); return CMPLX(cimag(r), -creal(r)); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/casinf.c b/src/complex/casinf.c index 2cda2f08..5c28ac2f 100644 --- a/src/complex/casinf.c +++ b/src/complex/casinf.c @@ -13,3 +13,11 @@ float complex casinf(float complex z) float complex r = clogf(CMPLXF(-y, x) + csqrtf(w)); return CMPLXF(cimagf(r), -crealf(r)); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/casinh.c b/src/complex/casinh.c index 50bf27ce..48bb8e1d 100644 --- a/src/complex/casinh.c +++ b/src/complex/casinh.c @@ -7,3 +7,11 @@ double complex casinh(double complex z) z = casin(CMPLX(-cimag(z), creal(z))); return CMPLX(cimag(z), -creal(z)); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/casinhf.c b/src/complex/casinhf.c index 93d82e5f..857b881a 100644 --- a/src/complex/casinhf.c +++ b/src/complex/casinhf.c @@ -5,3 +5,11 @@ float complex casinhf(float complex z) z = casinf(CMPLXF(-cimagf(z), crealf(z))); return CMPLXF(cimagf(z), -crealf(z)); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/casinhl.c b/src/complex/casinhl.c index 68ba3ddf..176f916d 100644 --- a/src/complex/casinhl.c +++ b/src/complex/casinhl.c @@ -12,3 +12,11 @@ long double complex casinhl(long double complex z) return CMPLXL(cimagl(z), -creall(z)); } #endif + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/casinl.c b/src/complex/casinl.c index 072adc45..1412b2ac 100644 --- a/src/complex/casinl.c +++ b/src/complex/casinl.c @@ -19,3 +19,11 @@ long double complex casinl(long double complex z) return CMPLXL(cimagl(r), -creall(r)); } #endif + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/catan.c b/src/complex/catan.c index ccc2fb53..d09a3bc2 100644 --- a/src/complex/catan.c +++ b/src/complex/catan.c @@ -105,3 +105,11 @@ double complex catan(double complex z) w = CMPLX(w, 0.25 * log(a)); return w; } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/catanf.c b/src/complex/catanf.c index 1d569f2d..5a397153 100644 --- a/src/complex/catanf.c +++ b/src/complex/catanf.c @@ -103,3 +103,11 @@ float complex catanf(float complex z) w = CMPLXF(w, 0.25f * logf(a)); return w; } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/catanh.c b/src/complex/catanh.c index c324c7f2..e790ce9e 100644 --- a/src/complex/catanh.c +++ b/src/complex/catanh.c @@ -7,3 +7,11 @@ double complex catanh(double complex z) z = catan(CMPLX(-cimag(z), creal(z))); return CMPLX(cimag(z), -creal(z)); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/catanhf.c b/src/complex/catanhf.c index b0505f60..3a5cdc82 100644 --- a/src/complex/catanhf.c +++ b/src/complex/catanhf.c @@ -5,3 +5,11 @@ float complex catanhf(float complex z) z = catanf(CMPLXF(-cimagf(z), crealf(z))); return CMPLXF(cimagf(z), -crealf(z)); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/catanhl.c b/src/complex/catanhl.c index 6025c414..8660a606 100644 --- a/src/complex/catanhl.c +++ b/src/complex/catanhl.c @@ -12,3 +12,11 @@ long double complex catanhl(long double complex z) return CMPLXL(cimagl(z), -creall(z)); } #endif + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/catanl.c b/src/complex/catanl.c index e62526c0..95bb4bd6 100644 --- a/src/complex/catanl.c +++ b/src/complex/catanl.c @@ -112,3 +112,11 @@ long double complex catanl(long double complex z) return w; } #endif + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/ccos.c b/src/complex/ccos.c index f32e1fad..3a083ed1 100644 --- a/src/complex/ccos.c +++ b/src/complex/ccos.c @@ -6,3 +6,11 @@ double complex ccos(double complex z) { return ccosh(CMPLX(-cimag(z), creal(z))); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/ccosf.c b/src/complex/ccosf.c index 490be9b3..70a52131 100644 --- a/src/complex/ccosf.c +++ b/src/complex/ccosf.c @@ -4,3 +4,11 @@ float complex ccosf(float complex z) { return ccoshf(CMPLXF(-cimagf(z), crealf(z))); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/ccosh.c b/src/complex/ccosh.c index c995da7b..4ede6be9 100644 --- a/src/complex/ccosh.c +++ b/src/complex/ccosh.c @@ -138,3 +138,11 @@ double complex ccosh(double complex z) */ return CMPLX((x * x) * (y - y), (x + x) * (y - y)); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/ccoshf.c b/src/complex/ccoshf.c index 189ce946..63ec62b7 100644 --- a/src/complex/ccoshf.c +++ b/src/complex/ccoshf.c @@ -88,3 +88,11 @@ float complex ccoshf(float complex z) return CMPLXF((x * x) * (y - y), (x + x) * (y - y)); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/ccoshl.c b/src/complex/ccoshl.c index ffb4d8a1..c0a588a8 100644 --- a/src/complex/ccoshl.c +++ b/src/complex/ccoshl.c @@ -5,3 +5,11 @@ long double complex ccoshl(long double complex z) { return ccosh(z); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/ccosl.c b/src/complex/ccosl.c index 2530006b..9b1376af 100644 --- a/src/complex/ccosl.c +++ b/src/complex/ccosl.c @@ -11,3 +11,11 @@ long double complex ccosl(long double complex z) return ccoshl(CMPLXL(-cimagl(z), creall(z))); } #endif + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/cexp.c b/src/complex/cexp.c index 7fb489bb..2f26454c 100644 --- a/src/complex/cexp.c +++ b/src/complex/cexp.c @@ -81,3 +81,11 @@ double complex cexp(double complex z) return CMPLX(exp_x * cos(y), exp_x * sin(y)); } } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/cexpf.c b/src/complex/cexpf.c index 00d258f3..05801b46 100644 --- a/src/complex/cexpf.c +++ b/src/complex/cexpf.c @@ -81,3 +81,11 @@ float complex cexpf(float complex z) return CMPLXF(exp_x * cosf(y), exp_x * sinf(y)); } } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/cexpl.c b/src/complex/cexpl.c index d4df950e..68c18169 100644 --- a/src/complex/cexpl.c +++ b/src/complex/cexpl.c @@ -5,3 +5,11 @@ long double complex cexpl(long double complex z) { return cexp(z); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/cimag.c b/src/complex/cimag.c index d6b0e683..ae6b63f0 100644 --- a/src/complex/cimag.c +++ b/src/complex/cimag.c @@ -4,3 +4,11 @@ double (cimag)(double complex z) { return cimag(z); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/cimagf.c b/src/complex/cimagf.c index b7166dcf..cf7ac566 100644 --- a/src/complex/cimagf.c +++ b/src/complex/cimagf.c @@ -4,3 +4,11 @@ float (cimagf)(float complex z) { return cimagf(z); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/cimagl.c b/src/complex/cimagl.c index 4db77f20..12526442 100644 --- a/src/complex/cimagl.c +++ b/src/complex/cimagl.c @@ -4,3 +4,11 @@ long double (cimagl)(long double complex z) { return cimagl(z); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/clog.c b/src/complex/clog.c index b587c291..baa1dff1 100644 --- a/src/complex/clog.c +++ b/src/complex/clog.c @@ -12,3 +12,11 @@ double complex clog(double complex z) phi = carg(z); return CMPLX(log(r), phi); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/clogf.c b/src/complex/clogf.c index 0389d472..7f6db1c6 100644 --- a/src/complex/clogf.c +++ b/src/complex/clogf.c @@ -10,3 +10,11 @@ float complex clogf(float complex z) phi = cargf(z); return CMPLXF(logf(r), phi); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/clogl.c b/src/complex/clogl.c index 88e83e87..1258ffc5 100644 --- a/src/complex/clogl.c +++ b/src/complex/clogl.c @@ -16,3 +16,11 @@ long double complex clogl(long double complex z) return CMPLXL(logl(r), phi); } #endif + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/conj.c b/src/complex/conj.c index a3b19a4a..14eda7a0 100644 --- a/src/complex/conj.c +++ b/src/complex/conj.c @@ -4,3 +4,11 @@ double complex conj(double complex z) { return CMPLX(creal(z), -cimag(z)); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/conjf.c b/src/complex/conjf.c index b2195c84..aa8ccb1c 100644 --- a/src/complex/conjf.c +++ b/src/complex/conjf.c @@ -4,3 +4,11 @@ float complex conjf(float complex z) { return CMPLXF(crealf(z), -cimagf(z)); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/conjl.c b/src/complex/conjl.c index 87a4ebec..6433ee41 100644 --- a/src/complex/conjl.c +++ b/src/complex/conjl.c @@ -4,3 +4,11 @@ long double complex conjl(long double complex z) { return CMPLXL(creall(z), -cimagl(z)); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/cpow.c b/src/complex/cpow.c index 1137d391..ff613b82 100644 --- a/src/complex/cpow.c +++ b/src/complex/cpow.c @@ -6,3 +6,11 @@ double complex cpow(double complex z, double complex c) { return cexp(c * clog(z)); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/cpowf.c b/src/complex/cpowf.c index f3fd4b7b..9ffe222e 100644 --- a/src/complex/cpowf.c +++ b/src/complex/cpowf.c @@ -4,3 +4,11 @@ float complex cpowf(float complex z, float complex c) { return cexpf(c * clogf(z)); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/cpowl.c b/src/complex/cpowl.c index be36f046..40aa34ee 100644 --- a/src/complex/cpowl.c +++ b/src/complex/cpowl.c @@ -11,3 +11,11 @@ long double complex cpowl(long double complex z, long double complex c) return cexpl(c * clogl(z)); } #endif + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/cproj.c b/src/complex/cproj.c index d2b8f5a9..6710dba3 100644 --- a/src/complex/cproj.c +++ b/src/complex/cproj.c @@ -6,3 +6,11 @@ double complex cproj(double complex z) return CMPLX(INFINITY, copysign(0.0, cimag(z))); return z; } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/cprojf.c b/src/complex/cprojf.c index 15a874bb..9deb4e11 100644 --- a/src/complex/cprojf.c +++ b/src/complex/cprojf.c @@ -6,3 +6,11 @@ float complex cprojf(float complex z) return CMPLXF(INFINITY, copysignf(0.0, cimagf(z))); return z; } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/cprojl.c b/src/complex/cprojl.c index 531ffa1c..bd170d28 100644 --- a/src/complex/cprojl.c +++ b/src/complex/cprojl.c @@ -13,3 +13,11 @@ long double complex cprojl(long double complex z) return z; } #endif + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/creal.c b/src/complex/creal.c index f6703040..dc7dbe4b 100644 --- a/src/complex/creal.c +++ b/src/complex/creal.c @@ -4,3 +4,11 @@ double (creal)(double complex z) { return creal(z); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/crealf.c b/src/complex/crealf.c index 5dc3ff1d..51cf938e 100644 --- a/src/complex/crealf.c +++ b/src/complex/crealf.c @@ -4,3 +4,11 @@ float (crealf)(float complex z) { return crealf(z); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/creall.c b/src/complex/creall.c index fd9dc347..498313c7 100644 --- a/src/complex/creall.c +++ b/src/complex/creall.c @@ -4,3 +4,11 @@ long double (creall)(long double complex z) { return creall(z); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/csin.c b/src/complex/csin.c index 535c4bf8..a3427841 100644 --- a/src/complex/csin.c +++ b/src/complex/csin.c @@ -7,3 +7,11 @@ double complex csin(double complex z) z = csinh(CMPLX(-cimag(z), creal(z))); return CMPLX(cimag(z), -creal(z)); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/csinf.c b/src/complex/csinf.c index 69f5164e..89b63b22 100644 --- a/src/complex/csinf.c +++ b/src/complex/csinf.c @@ -5,3 +5,11 @@ float complex csinf(float complex z) z = csinhf(CMPLXF(-cimagf(z), crealf(z))); return CMPLXF(cimagf(z), -crealf(z)); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/csinh.c b/src/complex/csinh.c index eda0ab59..246e0245 100644 --- a/src/complex/csinh.c +++ b/src/complex/csinh.c @@ -139,3 +139,11 @@ double complex csinh(double complex z) */ return CMPLX((x * x) * (y - y), (x + x) * (y - y)); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/csinhf.c b/src/complex/csinhf.c index eb1d98c5..1aefb69c 100644 --- a/src/complex/csinhf.c +++ b/src/complex/csinhf.c @@ -88,3 +88,11 @@ float complex csinhf(float complex z) return CMPLXF((x * x) * (y - y), (x + x) * (y - y)); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/csinhl.c b/src/complex/csinhl.c index 09fd18f9..1983c3ba 100644 --- a/src/complex/csinhl.c +++ b/src/complex/csinhl.c @@ -5,3 +5,11 @@ long double complex csinhl(long double complex z) { return csinh(z); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/csinl.c b/src/complex/csinl.c index 90a4eb37..34d729b9 100644 --- a/src/complex/csinl.c +++ b/src/complex/csinl.c @@ -12,3 +12,11 @@ long double complex csinl(long double complex z) return CMPLXL(cimagl(z), -creall(z)); } #endif + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/csqrt.c b/src/complex/csqrt.c index c36de001..4aa6c533 100644 --- a/src/complex/csqrt.c +++ b/src/complex/csqrt.c @@ -98,3 +98,11 @@ double complex csqrt(double complex z) result *= 2; return result; } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/csqrtf.c b/src/complex/csqrtf.c index a6163974..cde2210a 100644 --- a/src/complex/csqrtf.c +++ b/src/complex/csqrtf.c @@ -80,3 +80,11 @@ float complex csqrtf(float complex z) return CMPLXF(fabsf(b) / (2.0 * t), copysignf(t, b)); } } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/csqrtl.c b/src/complex/csqrtl.c index 22539379..0c47d7f9 100644 --- a/src/complex/csqrtl.c +++ b/src/complex/csqrtl.c @@ -5,3 +5,11 @@ long double complex csqrtl(long double complex z) { return csqrt(z); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/ctan.c b/src/complex/ctan.c index 918717bf..e18cb5ed 100644 --- a/src/complex/ctan.c +++ b/src/complex/ctan.c @@ -7,3 +7,11 @@ double complex ctan(double complex z) z = ctanh(CMPLX(-cimag(z), creal(z))); return CMPLX(cimag(z), -creal(z)); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/ctanf.c b/src/complex/ctanf.c index 04c3ff19..9aed39cc 100644 --- a/src/complex/ctanf.c +++ b/src/complex/ctanf.c @@ -5,3 +5,11 @@ float complex ctanf(float complex z) z = ctanhf(CMPLXF(-cimagf(z), crealf(z))); return CMPLXF(cimagf(z), -crealf(z)); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/ctanh.c b/src/complex/ctanh.c index 54004cd7..8b2843f0 100644 --- a/src/complex/ctanh.c +++ b/src/complex/ctanh.c @@ -127,3 +127,11 @@ double complex ctanh(double complex z) denom = 1 + beta * s * s; return CMPLX((beta * rho * s) / denom, t / denom); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/ctanhf.c b/src/complex/ctanhf.c index 7f422ba7..56e33e5b 100644 --- a/src/complex/ctanhf.c +++ b/src/complex/ctanhf.c @@ -64,3 +64,11 @@ float complex ctanhf(float complex z) denom = 1 + beta * s * s; return CMPLXF((beta * rho * s) / denom, t / denom); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/ctanhl.c b/src/complex/ctanhl.c index 45d5862c..c7d788f1 100644 --- a/src/complex/ctanhl.c +++ b/src/complex/ctanhl.c @@ -5,3 +5,11 @@ long double complex ctanhl(long double complex z) { return ctanh(z); } + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif diff --git a/src/complex/ctanl.c b/src/complex/ctanl.c index 4b87420d..f6d2dac0 100644 --- a/src/complex/ctanl.c +++ b/src/complex/ctanl.c @@ -12,3 +12,11 @@ long double complex ctanl(long double complex z) return CMPLXL(cimagl(z), -creall(z)); } #endif + + +#ifdef TEST +int +main(void) { + return 0; +} +#endif |