1 files changed, 21 insertions, 0 deletions
diff --git a/src/PJ_mpoly.c b/src/PJ_mpoly.c
new file mode 100644
index 00000000..4b566993
--- /dev/null
+++ b/src/PJ_mpoly.c
@@ -0,0 +1,21 @@
+#ifndef lint
+static const char SCCSID[]="@(#)PJ_mpoly.c	4.1	94/05/22	GIE	REL";
+#endif
+#define PROJ_PARMS__ \
+	double	rho_0;
+#define PJ_LIB__
+#include	<projects.h>
+PROJ_HEAD(mpoly, "Modified Polyconic")
+	"\n\tPolyconic, Sph\n\tlat_1= and lat_2= lotsa";
+FORWARD(s_forward); /* spheroid */
+	return (xy);
+}
+INVERSE(s_inverse); /* ellipsoid & spheroid */
+	return (lp);
+}
+FREEUP; if (P) pj_dalloc(P); }
+ENTRY0(mpoly)
+	P->fwd = s_forward;
+	P->inv = s_inverse;
+	P->es = 0;
+ENDENTRY(P)