Add haversine and inverse

paulmasson · Jun 18, 2021 · 14c364a · 14c364a
1 parent 5559263
commit 14c364a
Show file tree

Hide file tree

Showing 3 changed files with 12 additions and 0 deletions.
diff --git a/build/math.js b/build/math.js
@@ -3674,6 +3674,10 @@ function sinc( x ) {
 
 }
 
+function haversine( x ) { return div( sub( 1, cos(x) ), 2 ); }
+
+function inverseHaversine( x ) { return arccos( sub( 1, mul(2,x) ) ); }
+
 
 // analyticphysics.com / The Complex Gudermannian Function
 

diff --git a/docs/functions.html b/docs/functions.html
@@ -70,6 +70,10 @@ <h1>Circular Functions</h1>
 
 <p><a href="functions/sinc.html"><b>sinc( <i>x</i> )</b></a> &mdash; cardinal sine of a real or complex number</p>
 
+<p><b>haversine( <i>x</i> )</b> &mdash; haversine of a real or complex number</p>
+
+<p><b>inverseHaversine( <i>x</i> )</b> &mdash; inverse haversine of a real or complex number</p>
+
 <br id="hyperbolic"/>
 <h1>Hyperbolic Functions</h1>
 

diff --git a/src/functions/trigonometry.js b/src/functions/trigonometry.js
@@ -359,6 +359,10 @@ function sinc( x ) {
 
 }
 
+function haversine( x ) { return div( sub( 1, cos(x) ), 2 ); }
+
+function inverseHaversine( x ) { return arccos( sub( 1, mul(2,x) ) ); }
+
 
 // analyticphysics.com / The Complex Gudermannian Function