summaryrefslogtreecommitdiff
path: root/src/3rdparty/proj/pj_phi2.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/3rdparty/proj/pj_phi2.c')
-rw-r--r--src/3rdparty/proj/pj_phi2.c25
1 files changed, 0 insertions, 25 deletions
diff --git a/src/3rdparty/proj/pj_phi2.c b/src/3rdparty/proj/pj_phi2.c
deleted file mode 100644
index 0900350e..00000000
--- a/src/3rdparty/proj/pj_phi2.c
+++ /dev/null
@@ -1,25 +0,0 @@
-/* determine latitude angle phi-2 */
-#include <projects.h>
-
-#define HALFPI 1.5707963267948966
-#define TOL 1.0e-10
-#define N_ITER 15
-
- double
-pj_phi2(double ts, double e) {
- double eccnth, Phi, con, dphi;
- int i;
-
- eccnth = .5 * e;
- Phi = HALFPI - 2. * atan (ts);
- i = N_ITER;
- do {
- con = e * sin (Phi);
- dphi = HALFPI - 2. * atan (ts * pow((1. - con) /
- (1. + con), eccnth)) - Phi;
- Phi += dphi;
- } while ( fabs(dphi) > TOL && --i);
- if (i <= 0)
- pj_errno = -18;
- return Phi;
-}