summaryrefslogtreecommitdiffstats
path: root/winsup/mingw/mingwex/complex/cprojl.c
diff options
context:
space:
mode:
Diffstat (limited to 'winsup/mingw/mingwex/complex/cprojl.c')
-rwxr-xr-xwinsup/mingw/mingwex/complex/cprojl.c22
1 files changed, 0 insertions, 22 deletions
diff --git a/winsup/mingw/mingwex/complex/cprojl.c b/winsup/mingw/mingwex/complex/cprojl.c
deleted file mode 100755
index 224d26fd6..000000000
--- a/winsup/mingw/mingwex/complex/cprojl.c
+++ /dev/null
@@ -1,22 +0,0 @@
-/*
- cprojl.c
- Contributed by Danny Smith
- 2005-01-04
-*/
-
-#include <math.h>
-#include <complex.h>
-
-/* Return the value of the projection onto the Riemann sphere.*/
-
-long double complex cprojl (long double complex Z)
-{
- complex long double Res = Z;
- if (isinf (__real__ Z) || isinf (__imag__ Z))
- {
- __real__ Res = HUGE_VALL;
- __imag__ Res = copysignl (0.0L, __imag__ Z);
- }
- return Res;
-}
-