aboutsummaryrefslogtreecommitdiffstats
path: root/libtellurian_meridan_radius_radians.c
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--libtellurian_meridan_radius_radians.c14
1 files changed, 0 insertions, 14 deletions
diff --git a/libtellurian_meridan_radius_radians.c b/libtellurian_meridan_radius_radians.c
deleted file mode 100644
index 0a832e5..0000000
--- a/libtellurian_meridan_radius_radians.c
+++ /dev/null
@@ -1,14 +0,0 @@
-/* See LICENSE file for copyright and license details. */
-#include "common.h"
-
-
-double
-libtellurian_meridan_radius_radians(double latitude)
-{
- double a = LIBTELLURIAN_EQUATORIAL_RADIUS;
- double b = LIBTELLURIAN_POLAR_RADIUS;
- double f = 1.0 - b / a;
- double neg_e2 = (f - 2.0) * f;
- double s = sin(latitude);
- return fma(a, neg_e2, a) / pow(fma(neg_e2, s * s, 1.0), 1.5);
-}