1 files changed, 27 insertions, 0 deletions
diff --git a/src/complex/cproj.c b/src/complex/cproj.c
new file mode 100644
index 00000000..406ff812
--- /dev/null
+++ b/src/complex/cproj.c
@@ -0,0 +1,27 @@
+# define TGSOURCE "cproj.c"
+#include "nonstd/tgmath.h"
+
+#include <complex.h>
+
+TYPE complex TGFN(cproj)(TYPE complex z)
+{
+	return 0.0;
+}
+
+/*d
+The cproj functions compute a projection of z onto the Riemann sphere: z projects to
+z except that all complex infinities (even those with one infinite part and one NaN part)
+project to positive infinity on the real axis. If z has an infinite part, then cproj(z) is
+equivalent to
+INFINITY + I * copysign(0.0, cimag(z))
+d*/
+
+/*r
+The cproj functions return the value of the projection onto the Riemann sphere.
+r*/
+
+/*
+STDC(199901)
+LINK(m)
+*/
+