summaryrefslogtreecommitdiff
path: root/src/3rdparty/proj/PJ_urm5.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/3rdparty/proj/PJ_urm5.c')
-rw-r--r--src/3rdparty/proj/PJ_urm5.c28
1 files changed, 0 insertions, 28 deletions
diff --git a/src/3rdparty/proj/PJ_urm5.c b/src/3rdparty/proj/PJ_urm5.c
deleted file mode 100644
index 70a5a1d6..00000000
--- a/src/3rdparty/proj/PJ_urm5.c
+++ /dev/null
@@ -1,28 +0,0 @@
-#define PROJ_PARMS__ \
- double m, rmn, q3, n;
-#define PJ_LIB__
-# include <projects.h>
-PROJ_HEAD(urm5, "Urmaev V") "\n\tPCyl., Sph.\n\tn= q= alphi=";
-FORWARD(s_forward); /* spheroid */
- double t;
-
- t = lp.phi = aasin(P->n * sin(lp.phi));
- xy.x = P->m * lp.lam * cos(lp.phi);
- t *= t;
- xy.y = lp.phi * (1. + t * P->q3) * P->rmn;
- return xy;
-}
-FREEUP; if (P) pj_dalloc(P); }
-ENTRY0(urm5)
- double alpha, t;
-
- P->n = pj_param(P->params, "dn").f;
- P->q3 = pj_param(P->params, "dq").f / 3.;
- alpha = pj_param(P->params, "ralpha").f;
- t = P->n * sin(alpha);
- P->m = cos(alpha) / sqrt(1. - t * t);
- P->rmn = 1. / (P->m * P->n);
- P->es = 0.;
- P->inv = 0;
- P->fwd = s_forward;
-ENDENTRY(P)