fix gcdist, following geosphere::distMeeuws and http://www.abecedaric…

…al.com/javascript/script_greatcircle.html
edzer · Dec 8, 2016 · d8374ff7efc6735cba9a054748c602bed0672f23 · d8374ff
1 parent a4867a4
commit d8374ff7efc6735cba9a054748c602bed0672f23
Unified Split

Showing with 1 addition and 1 deletion.

+1 −1 src/gcdist.c
diff --git a/src/gcdist.c b/src/gcdist.c
@@ -111,7 +111,7 @@ void sp_gcdist(double *lon1, double *lon2, double *lat1, double *lat2,
 
     D = 2*w*a;
     H1 = ( 3*R - 1 )/( 2*C );
-    H2 = ( 3*R + 2 )/( 2*S );
+    H2 = ( 3*R + 1 )/( 2*S );
 
     dist[0] = D*( 1 + f*H1*sinF2*cosG2 - f*H2*cosF2*sinG2 );