From 7c475fcadaffdbec81e8294f2733e4f38d0cda44 Mon Sep 17 00:00:00 2001
From: Don Cross <cosinekitty@gmail.com>
Date: Mon, 27 May 2024 17:07:30 -0400
Subject: [PATCH] Expanded the fix for issue #347.

I tried more distant objects like Jupiter ... Neptune.
This revealed that at increasing distances, the convergence
threshold in inverse_terra needed to increased also.
So now I use 1 AU as a baseline, and scale up linearly
for more distant objects.
---
 README.md                                     |  2 +-
 demo/browser/astronomy.browser.js             | 11 +++--
 demo/nodejs/astronomy.js                      | 11 +++--
 demo/nodejs/calendar/astronomy.ts             | 11 +++--
 demo/python/astronomy.py                      |  3 +-
 generate/template/astronomy.c                 |  7 +++-
 generate/template/astronomy.cs                |  3 +-
 generate/template/astronomy.kt                |  3 +-
 generate/template/astronomy.py                |  3 +-
 generate/template/astronomy.ts                | 11 +++--
 generate/test.js                              | 30 +++++++++-----
 source/c/astronomy.c                          |  7 +++-
 source/csharp/astronomy.cs                    |  3 +-
 source/js/astronomy.browser.js                | 11 +++--
 source/js/astronomy.browser.min.js            | 38 +++++++++---------
 source/js/astronomy.js                        | 11 +++--
 source/js/astronomy.min.js                    | 40 +++++++++----------
 source/js/astronomy.ts                        | 11 +++--
 source/js/esm/astronomy.js                    | 11 +++--
 .../github/cosinekitty/astronomy/astronomy.kt |  3 +-
 source/python/astronomy/astronomy.py          |  3 +-
 21 files changed, 140 insertions(+), 93 deletions(-)

diff --git a/README.md b/README.md
index b7c5b7b8..7e9b8410 100644
--- a/README.md
+++ b/README.md
@@ -189,7 +189,7 @@ of complexity. So I decided to create Astronomy Engine with the following engine
 - Support JavaScript, C, C#, and Python with the same algorithms, and verify them to produce identical results.
   (Kotlin support was added in 2022.)
 - No external dependencies! The code must not require anything outside the standard library for each language.
-- Minified JavaScript code less than 120K. (The current size is <!--MINIFIED_SIZE-->116424 bytes.)
+- Minified JavaScript code less than 120K. (The current size is <!--MINIFIED_SIZE-->116485 bytes.)
 - Accuracy always within 1 arcminute of results from NOVAS.
 - It would be well documented, relatively easy to use, and support a wide variety of common use cases.
 
diff --git a/demo/browser/astronomy.browser.js b/demo/browser/astronomy.browser.js
index b9ac051e..3fb1f874 100644
--- a/demo/browser/astronomy.browser.js
+++ b/demo/browser/astronomy.browser.js
@@ -1938,9 +1938,12 @@ function inverse_terra(ovec, st) {
         let lat = Math.atan2(z, p);
         let cos, sin, denom;
         let count = 0;
+        let W = 0;
+        const distanceAu = Math.max(1, Math.hypot(ovec[0], ovec[1], ovec[2]));
         for (;;) {
-            if (++count > 10)
-                throw `inverse_terra failed to converge.`;
+            if (++count > 10) {
+                throw `inverse_terra failed to converge: W=${W}, distanceAu=${distanceAu}`;
+            }
             // Calculate the error function W(lat).
             // We try to find the root of W, meaning where the error is 0.
             cos = Math.cos(lat);
@@ -1950,8 +1953,8 @@ function inverse_terra(ovec, st) {
             const sin2 = sin * sin;
             const radicand = cos2 + EARTH_FLATTENING_SQUARED * sin2;
             denom = Math.sqrt(radicand);
-            const W = (factor * sin * cos) / denom - z * cos + p * sin;
-            if (Math.abs(W) < 2.0e-8)
+            W = (factor * sin * cos) / denom - z * cos + p * sin;
+            if (Math.abs(W) < distanceAu * 2.0e-8)
                 break; // The error is now negligible
             // Error is still too large. Find the next estimate.
             // Calculate D = the derivative of W with respect to lat.
diff --git a/demo/nodejs/astronomy.js b/demo/nodejs/astronomy.js
index 94dd87ad..1e36c36b 100644
--- a/demo/nodejs/astronomy.js
+++ b/demo/nodejs/astronomy.js
@@ -1937,9 +1937,12 @@ function inverse_terra(ovec, st) {
         let lat = Math.atan2(z, p);
         let cos, sin, denom;
         let count = 0;
+        let W = 0;
+        const distanceAu = Math.max(1, Math.hypot(ovec[0], ovec[1], ovec[2]));
         for (;;) {
-            if (++count > 10)
-                throw `inverse_terra failed to converge.`;
+            if (++count > 10) {
+                throw `inverse_terra failed to converge: W=${W}, distanceAu=${distanceAu}`;
+            }
             // Calculate the error function W(lat).
             // We try to find the root of W, meaning where the error is 0.
             cos = Math.cos(lat);
@@ -1949,8 +1952,8 @@ function inverse_terra(ovec, st) {
             const sin2 = sin * sin;
             const radicand = cos2 + EARTH_FLATTENING_SQUARED * sin2;
             denom = Math.sqrt(radicand);
-            const W = (factor * sin * cos) / denom - z * cos + p * sin;
-            if (Math.abs(W) < 2.0e-8)
+            W = (factor * sin * cos) / denom - z * cos + p * sin;
+            if (Math.abs(W) < distanceAu * 2.0e-8)
                 break; // The error is now negligible
             // Error is still too large. Find the next estimate.
             // Calculate D = the derivative of W with respect to lat.
diff --git a/demo/nodejs/calendar/astronomy.ts b/demo/nodejs/calendar/astronomy.ts
index 52c0970d..6a1b8156 100644
--- a/demo/nodejs/calendar/astronomy.ts
+++ b/demo/nodejs/calendar/astronomy.ts
@@ -2108,9 +2108,12 @@ function inverse_terra(ovec: ArrayVector, st: number): Observer {
         let lat = Math.atan2(z, p);
         let cos:number, sin:number, denom:number;
         let count = 0;
+        let W = 0;
+        const distanceAu = Math.max(1, Math.hypot(ovec[0], ovec[1], ovec[2]));
         for(;;) {
-            if (++count > 10)
-                throw `inverse_terra failed to converge.`;
+            if (++count > 10) {
+                throw `inverse_terra failed to converge: W=${W}, distanceAu=${distanceAu}`;
+            }
             // Calculate the error function W(lat).
             // We try to find the root of W, meaning where the error is 0.
             cos = Math.cos(lat);
@@ -2120,8 +2123,8 @@ function inverse_terra(ovec: ArrayVector, st: number): Observer {
             const sin2 = sin*sin;
             const radicand = cos2 + EARTH_FLATTENING_SQUARED*sin2;
             denom = Math.sqrt(radicand);
-            const W = (factor*sin*cos)/denom - z*cos + p*sin;
-            if (Math.abs(W) < 2.0e-8)
+            W = (factor*sin*cos)/denom - z*cos + p*sin;
+            if (Math.abs(W) < distanceAu * 2.0e-8)
                 break;  // The error is now negligible
             // Error is still too large. Find the next estimate.
             // Calculate D = the derivative of W with respect to lat.
diff --git a/demo/python/astronomy.py b/demo/python/astronomy.py
index d20ae486..e4b922eb 100644
--- a/demo/python/astronomy.py
+++ b/demo/python/astronomy.py
@@ -1435,6 +1435,7 @@ def _inverse_terra(ovec: List[float], st: float) -> Observer:
         # Start with initial latitude estimate, based on a spherical Earth.
         lat = math.atan2(z, p)
         count = 0
+        distanceAu = max(1.0, math.hypot(ovec[0], ovec[1], ovec[2]))
         while True:
             count += 1
             if count > 10:
@@ -1449,7 +1450,7 @@ def _inverse_terra(ovec: List[float], st: float) -> Observer:
             radicand = cos2 + _EARTH_FLATTENING_SQUARED*sin2
             denom = math.sqrt(radicand)
             W = (factor*sin*cos)/denom - z*cos + p*sin
-            if abs(W) < 2.0e-8:
+            if abs(W) < distanceAu * 2.0e-8:
                 # The error is now negligible
                 break
             # Error is still too large. Find the next estimate.
diff --git a/generate/template/astronomy.c b/generate/template/astronomy.c
index 0fe7bc3e..616d924e 100644
--- a/generate/template/astronomy.c
+++ b/generate/template/astronomy.c
@@ -1809,7 +1809,7 @@ static astro_observer_t inverse_terra(const double ovec[3], double st)
 {
     double x, y, z, p, F, W, D, c, s, c2, s2;
     double lon_deg, lat_deg, lat, radicand, factor, denom, adjust;
-    double height_km, stlocl;
+    double height_km, stlocl, distance_au;
     astro_observer_t observer;
     int count;
 
@@ -1841,6 +1841,9 @@ static astro_observer_t inverse_terra(const double ovec[3], double st)
         F = EARTH_FLATTENING * EARTH_FLATTENING;
         /* Start with initial latitude estimate, based on a spherical Earth. */
         lat = atan2(z, p);
+        distance_au = sqrt(ovec[0]*ovec[0] + ovec[1]*ovec[1] + ovec[2]*ovec[2]);
+        if (distance_au < 1.0)
+            distance_au = 1.0;
         for (count = 0; ; ++count)
         {
             if (count > 10)
@@ -1859,7 +1862,7 @@ static astro_observer_t inverse_terra(const double ovec[3], double st)
             radicand = c2 + F*s2;
             denom = sqrt(radicand);
             W = (factor*s*c)/denom - z*c + p*s;
-            if (fabs(W) < 2.0e-8)
+            if (fabs(W) < distance_au * 2.0e-8)
                 break;  /* The error is now negligible. */
             /* Error is still too large. Find the next estimate. */
             /* Calculate D = the derivative of W with respect to lat. */
diff --git a/generate/template/astronomy.cs b/generate/template/astronomy.cs
index 667fc395..9917e279 100644
--- a/generate/template/astronomy.cs
+++ b/generate/template/astronomy.cs
@@ -4162,6 +4162,7 @@ namespace CosineKitty
                 double lat = Math.Atan2(z, p);
                 double c, s, denom;
                 int count = 0;
+                double distanceAu = Math.Max(1.0, ovec.Length());
                 for(;;)
                 {
                     if (++count > 10)
@@ -4176,7 +4177,7 @@ namespace CosineKitty
                     double radicand = c2 + F*s2;
                     denom = Math.Sqrt(radicand);
                     double W = (factor*s*c)/denom - z*c + p*s;
-                    if (Math.Abs(W) < 2.0e-8)
+                    if (Math.Abs(W) < distanceAu * 2.0e-8)
                         break;  // The error is now negligible.
                     // Error is still too large. Find the next estimate.
                     // Calculate D = the derivative of W with respect to lat.
diff --git a/generate/template/astronomy.kt b/generate/template/astronomy.kt
index fbebfc66..b4b00e35 100644
--- a/generate/template/astronomy.kt
+++ b/generate/template/astronomy.kt
@@ -4370,6 +4370,7 @@ private fun inverseTerra(ovec: Vector): Observer {
         var s: Double
         var denom: Double
         var count = 0
+        val distanceAu = max(1.0, ovec.length())
         while (true) {
             ++count
             if (count > 10)
@@ -4384,7 +4385,7 @@ private fun inverseTerra(ovec: Vector): Observer {
             val radicand = c2 + F*s2
             denom = sqrt(radicand)
             val W = ((factor * s * c) / denom) - (z * c) + (p * s)
-            if (W.absoluteValue < 2.0e-8)
+            if (W.absoluteValue < distanceAu * 2.0e-8)
                 break  // The error is now negligible.
             // Error is still too large. Find the next estimate.
             // Calculate D = the derivative of W with respect to lat.
diff --git a/generate/template/astronomy.py b/generate/template/astronomy.py
index eccf13be..12040796 100644
--- a/generate/template/astronomy.py
+++ b/generate/template/astronomy.py
@@ -1435,6 +1435,7 @@ def _inverse_terra(ovec: List[float], st: float) -> Observer:
         # Start with initial latitude estimate, based on a spherical Earth.
         lat = math.atan2(z, p)
         count = 0
+        distanceAu = max(1.0, math.hypot(ovec[0], ovec[1], ovec[2]))
         while True:
             count += 1
             if count > 10:
@@ -1449,7 +1450,7 @@ def _inverse_terra(ovec: List[float], st: float) -> Observer:
             radicand = cos2 + _EARTH_FLATTENING_SQUARED*sin2
             denom = math.sqrt(radicand)
             W = (factor*sin*cos)/denom - z*cos + p*sin
-            if abs(W) < 2.0e-8:
+            if abs(W) < distanceAu * 2.0e-8:
                 # The error is now negligible
                 break
             # Error is still too large. Find the next estimate.
diff --git a/generate/template/astronomy.ts b/generate/template/astronomy.ts
index 2ce04931..7b5e2eb1 100644
--- a/generate/template/astronomy.ts
+++ b/generate/template/astronomy.ts
@@ -1375,9 +1375,12 @@ function inverse_terra(ovec: ArrayVector, st: number): Observer {
         let lat = Math.atan2(z, p);
         let cos:number, sin:number, denom:number;
         let count = 0;
+        let W = 0;
+        const distanceAu = Math.max(1, Math.hypot(ovec[0], ovec[1], ovec[2]));
         for(;;) {
-            if (++count > 10)
-                throw `inverse_terra failed to converge.`;
+            if (++count > 10) {
+                throw `inverse_terra failed to converge: W=${W}, distanceAu=${distanceAu}`;
+            }
             // Calculate the error function W(lat).
             // We try to find the root of W, meaning where the error is 0.
             cos = Math.cos(lat);
@@ -1387,8 +1390,8 @@ function inverse_terra(ovec: ArrayVector, st: number): Observer {
             const sin2 = sin*sin;
             const radicand = cos2 + EARTH_FLATTENING_SQUARED*sin2;
             denom = Math.sqrt(radicand);
-            const W = (factor*sin*cos)/denom - z*cos + p*sin;
-            if (Math.abs(W) < 2.0e-8)
+            W = (factor*sin*cos)/denom - z*cos + p*sin;
+            if (Math.abs(W) < distanceAu * 2.0e-8)
                 break;  // The error is now negligible
             // Error is still too large. Find the next estimate.
             // Calculate D = the derivative of W with respect to lat.
diff --git a/generate/test.js b/generate/test.js
index 2d18f345..ba48b700 100644
--- a/generate/test.js
+++ b/generate/test.js
@@ -2847,18 +2847,28 @@ function TwilightTest() {
 }
 
 
+function VectorObserverCase(body) {
+    for (let ts = 1717780096000; ts <= 1717780096200; ts++) {
+        var date = new Date(ts);
+        var vect = Astronomy.GeoVector(body, date, true)
+        //console.log('ts, date, vector', ts, date.valueOf(), vect)
+        var point = Astronomy.VectorObserver(vect)
+        //console.log('point', point)
+        //console.log('*')
+     }
+     return Pass(`VectorObserverCase(${body})`);
+ }
+
+
 function VectorObserverIssue347() {
     // https://github.com/cosinekitty/astronomy/issues/347
-    const body = Astronomy.Body.Sun
-    for (let ts = 1717780096000; ts <= 1717780096200; ts++) {
-       var date = new Date(ts);
-       var vect = Astronomy.GeoVector(body, date, true)
-       //console.log('ts, date, vector', ts, date.valueOf(), vect)
-       var point = Astronomy.VectorObserver(vect)
-       //console.log('point', point)
-       //console.log('*')
-    }
-    return Pass('VectorObserverIssue347');
+    return (
+        VectorObserverCase(Astronomy.Body.Sun) ||
+        VectorObserverCase(Astronomy.Body.Jupiter) ||
+        VectorObserverCase(Astronomy.Body.Saturn) ||
+        VectorObserverCase(Astronomy.Body.Uranus) ||
+        VectorObserverCase(Astronomy.Body.Neptune)
+    );
 }
 
 
diff --git a/source/c/astronomy.c b/source/c/astronomy.c
index 291534a8..bb9119d6 100644
--- a/source/c/astronomy.c
+++ b/source/c/astronomy.c
@@ -1815,7 +1815,7 @@ static astro_observer_t inverse_terra(const double ovec[3], double st)
 {
     double x, y, z, p, F, W, D, c, s, c2, s2;
     double lon_deg, lat_deg, lat, radicand, factor, denom, adjust;
-    double height_km, stlocl;
+    double height_km, stlocl, distance_au;
     astro_observer_t observer;
     int count;
 
@@ -1847,6 +1847,9 @@ static astro_observer_t inverse_terra(const double ovec[3], double st)
         F = EARTH_FLATTENING * EARTH_FLATTENING;
         /* Start with initial latitude estimate, based on a spherical Earth. */
         lat = atan2(z, p);
+        distance_au = sqrt(ovec[0]*ovec[0] + ovec[1]*ovec[1] + ovec[2]*ovec[2]);
+        if (distance_au < 1.0)
+            distance_au = 1.0;
         for (count = 0; ; ++count)
         {
             if (count > 10)
@@ -1865,7 +1868,7 @@ static astro_observer_t inverse_terra(const double ovec[3], double st)
             radicand = c2 + F*s2;
             denom = sqrt(radicand);
             W = (factor*s*c)/denom - z*c + p*s;
-            if (fabs(W) < 2.0e-8)
+            if (fabs(W) < distance_au * 2.0e-8)
                 break;  /* The error is now negligible. */
             /* Error is still too large. Find the next estimate. */
             /* Calculate D = the derivative of W with respect to lat. */
diff --git a/source/csharp/astronomy.cs b/source/csharp/astronomy.cs
index b886cf28..f01a2a49 100644
--- a/source/csharp/astronomy.cs
+++ b/source/csharp/astronomy.cs
@@ -5296,6 +5296,7 @@ namespace CosineKitty
                 double lat = Math.Atan2(z, p);
                 double c, s, denom;
                 int count = 0;
+                double distanceAu = Math.Max(1.0, ovec.Length());
                 for(;;)
                 {
                     if (++count > 10)
@@ -5310,7 +5311,7 @@ namespace CosineKitty
                     double radicand = c2 + F*s2;
                     denom = Math.Sqrt(radicand);
                     double W = (factor*s*c)/denom - z*c + p*s;
-                    if (Math.Abs(W) < 2.0e-8)
+                    if (Math.Abs(W) < distanceAu * 2.0e-8)
                         break;  // The error is now negligible.
                     // Error is still too large. Find the next estimate.
                     // Calculate D = the derivative of W with respect to lat.
diff --git a/source/js/astronomy.browser.js b/source/js/astronomy.browser.js
index b9ac051e..3fb1f874 100644
--- a/source/js/astronomy.browser.js
+++ b/source/js/astronomy.browser.js
@@ -1938,9 +1938,12 @@ function inverse_terra(ovec, st) {
         let lat = Math.atan2(z, p);
         let cos, sin, denom;
         let count = 0;
+        let W = 0;
+        const distanceAu = Math.max(1, Math.hypot(ovec[0], ovec[1], ovec[2]));
         for (;;) {
-            if (++count > 10)
-                throw `inverse_terra failed to converge.`;
+            if (++count > 10) {
+                throw `inverse_terra failed to converge: W=${W}, distanceAu=${distanceAu}`;
+            }
             // Calculate the error function W(lat).
             // We try to find the root of W, meaning where the error is 0.
             cos = Math.cos(lat);
@@ -1950,8 +1953,8 @@ function inverse_terra(ovec, st) {
             const sin2 = sin * sin;
             const radicand = cos2 + EARTH_FLATTENING_SQUARED * sin2;
             denom = Math.sqrt(radicand);
-            const W = (factor * sin * cos) / denom - z * cos + p * sin;
-            if (Math.abs(W) < 2.0e-8)
+            W = (factor * sin * cos) / denom - z * cos + p * sin;
+            if (Math.abs(W) < distanceAu * 2.0e-8)
                 break; // The error is now negligible
             // Error is still too large. Find the next estimate.
             // Calculate D = the derivative of W with respect to lat.
diff --git a/source/js/astronomy.browser.min.js b/source/js/astronomy.browser.min.js
index e86dcdfa..eda17747 100644
--- a/source/js/astronomy.browser.min.js
+++ b/source/js/astronomy.browser.min.js
@@ -175,25 +175,25 @@ k));l=Math.asin(-Math.sin(t)*Math.cos(h)*Math.sin(l)-Math.sin(h)*Math.cos(l));t=
 (72.56+20.186*a))+-1.4E-4*Math.sin(2*d)+1.4E-4*Math.cos(2*q-2*k)+-1.2E-4*Math.sin(q-2*k)+-1.2E-4*Math.sin(2*q)+1.1E-4*Math.sin(2*q-2*p-2*d))+(t*Math.cos(f)+x*Math.sin(f))*Math.tan(l)),e.RAD2DEG*h,e.RAD2DEG*b,g,2*e.RAD2DEG*Math.atan(1737.4/Math.sqrt(g*g-1737.4*1737.4)))};var eb;e.SiderealTime=bc;var E=function(a,b,c,d){this.x=a;this.y=b;this.z=c;this.t=d};E.prototype.Length=function(){return Math.hypot(this.x,this.y,this.z)};e.Vector=E;var I=function(a,b,c,d,f,g,h){this.x=a;this.y=b;this.z=c;this.vx=
 d;this.vy=f;this.vz=g;this.t=h};e.StateVector=I;var Ba=function(a,b,c){this.lat=w(a);this.lon=w(b);this.dist=w(c)};e.Spherical=Ba;var gb=function(a,b,c,d){this.ra=w(a);this.dec=w(b);this.dist=w(c);this.vec=d};e.EquatorialCoordinates=gb;var J=function(a){this.rot=a};e.RotationMatrix=J;e.MakeRotation=function(a){if(!qd(a))throw"Argument must be a [3][3] array of numbers";return new J(a)};var ec=function(a,b,c,d){this.azimuth=w(a);this.altitude=w(b);this.ra=w(c);this.dec=w(d)};e.HorizontalCoordinates=
 ec;var gc=function(a,b,c){this.vec=a;this.elat=w(b);this.elon=w(c)};e.EclipticCoordinates=gc;e.Horizon=hb;var zb=function(a,b,c){this.latitude=a;this.longitude=b;this.height=c;za(this)};e.Observer=zb;e.SunPosition=fc;e.Equator=Pa;e.ObserverVector=function(a,b,c){a=v(a);var d=ca(a);b=xb(b,d).pos;c||(b=fb(b,a,F.Into2000));return yb(b,a)};e.ObserverState=function(a,b,c){a=v(a);var d=ca(a);b=xb(b,d);b=new I(b.pos[0],b.pos[1],b.pos[2],b.vel[0],b.vel[1],b.vel[2],a);return c?b:(c=F.Into2000,c===F.Into2000?
-(d=Na(a,c),b=Ea(d,b),a=Ma(a,c),a=Ea(a,b)):(d=Ma(a,c),b=Ea(d,b),a=Na(a,c),a=Ea(a,b)),a)};e.VectorObserver=function(a,b){var c=ca(a.t),d=[a.x,a.y,a.z];b||(d=wa(d,a.t,F.From2000),d=xa(d,a.t,F.From2000));b=d[0]*e.KM_PER_AU;var f=d[1]*e.KM_PER_AU;d=d[2]*e.KM_PER_AU;a=Math.hypot(b,f);if(1E-6>a){c=0;var g=0<d?90:-90;d=Math.abs(d)-6356.751857971648}else{for(c=e.RAD2DEG*Math.atan2(f,b)-15*c;-180>=c;)c+=360;for(;180<c;)c-=360;g=Math.atan2(d,a);for(var h,l=0;;){if(10<++l)throw"inverse_terra failed to converge.";
-b=Math.cos(g);f=Math.sin(g);var k=b*b,n=f*f,p=k+.9933056020041345*n;h=Math.sqrt(p);var q=-42.69778487239616*f*b/h-d*b+a*f;if(2E-8>Math.abs(q))break;g-=q/(-42.69778487239616*((k-n)/h-n*k*-.006694397995865464/(-42.69778487239616*p))+d*f+a*b)}g*=e.RAD2DEG;h=6378.1366/h;d=Math.abs(f)>Math.abs(b)?d/f-.9933056020041345*h:a/b-h}return new zb(g,c,1E3*d)};e.ObserverGravity=function(a,b){a=Math.sin(a*e.DEG2RAD);a*=a;return 9.7803253359*(1+.00193185265241*a)/Math.sqrt(1-.00669437999013*a)*(1-(3.15704E-7-2.10269E-9*
-a)*b+7.37452E-14*b*b)};e.Ecliptic=Qa;e.GeoMoon=Y;e.EclipticGeoMoon=ib;e.GeoMoonState=Ra;e.GeoEmbState=Bb;var na=[[-73E4,[-26.118207232108,-14.376168177825,3.384402515299],[.0016339372163656,-.0027861699588508,-.0013585880229445]],[-700800,[41.974905202127,-.448502952929,-12.770351505989],[7.3458569351457E-4,.0022785014891658,4.8619778602049E-4]],[-671600,[14.706930780744,44.269110540027,9.353698474772],[-.00210001479998,2.2295915939915E-4,7.0143443551414E-4]],[-642400,[-29.441003929957,-6.43016153057,
-6.858481011305],[8.4495803960544E-4,-.0030783914758711,-.0012106305981192]],[-613200,[39.444396946234,-6.557989760571,-13.913760296463],[.0011480029005873,.0022400006880665,3.5168075922288E-4]],[-584E3,[20.2303809507,43.266966657189,7.382966091923],[-.0019754081700585,5.3457141292226E-4,7.5929169129793E-4]],[-554800,[-30.65832536462,2.093818874552,9.880531138071],[6.1010603013347E-5,-.0031326500935382,-9.9346125151067E-4]],[-525600,[35.737703251673,-12.587706024764,-14.677847247563],[.0015802939375649,
-.0021347678412429,1.9074436384343E-4]],[-496400,[25.466295188546,41.367478338417,5.216476873382],[-.0018054401046468,8.328308359951E-4,8.0260156912107E-4]],[-467200,[-29.847174904071,10.636426313081,12.297904180106],[-6.3257063052907E-4,-.0029969577578221,-7.4476074151596E-4]],[-438E3,[30.774692107687,-18.236637015304,-14.945535879896],[.0020113162005465,.0019353827024189,-2.0937793168297E-6]],[-408800,[30.243153324028,38.656267888503,2.938501750218],[-.0016052508674468,.0011183495337525,8.3333973416824E-4]],
-[-379600,[-27.288984772533,18.643162147874,14.023633623329],[-.0011856388898191,-.0027170609282181,-4.9015526126399E-4]],[-350400,[24.519605196774,-23.245756064727,-14.626862367368],[.0024322321483154,.0016062008146048,-2.3369181613312E-4]],[-321200,[34.505274805875,35.125338586954,.557361475637],[-.0013824391637782,.0013833397561817,8.4823598806262E-4]],[-292E3,[-23.275363915119,25.818514298769,15.055381588598],[-.0016062295460975,-.0023395961498533,-2.4377362639479E-4]],[-262800,[17.050384798092,
--27.180376290126,-13.608963321694],[.0028175521080578,.0011358749093955,-4.9548725258825E-4]],[-233600,[38.093671910285,30.880588383337,-1.843688067413],[-.0011317697153459,.0016128814698472,8.4177586176055E-4]],[-204400,[-18.197852930878,31.932869934309,15.438294826279],[-.0019117272501813,-.0019146495909842,-1.9657304369835E-5]],[-175200,[8.528924039997,-29.618422200048,-11.805400994258],[.0031034370787005,5.139363329243E-4,-7.7293066202546E-4]],[-146E3,[40.94685725864,25.904973592021,-4.256336240499],
-[-8.3652705194051E-4,.0018129497136404,8.156422827306E-4]],[-116800,[-12.326958895325,36.881883446292,15.217158258711],[-.0021166103705038,-.001481442003599,1.7401209844705E-4]],[-87600,[-.633258375909,-30.018759794709,-9.17193287495],[.0032016994581737,-2.5279858672148E-4,-.0010411088271861]],[-58400,[42.936048423883,20.344685584452,-6.588027007912],[-5.0525450073192E-4,.0019910074335507,7.7440196540269E-4]],[-29200,[-5.975910552974,40.61180995846,14.470131723673],[-.0022184202156107,-.0010562361130164,
-3.3652250216211E-4]],[0,[-9.875369580774,-27.978926224737,-5.753711824704],[.0030287533248818,-.0011276087003636,-.0012651326732361]],[29200,[43.958831986165,14.214147973292,-8.808306227163],[-1.4717608981871E-4,.0021404187242141,7.1486567806614E-4]],[58400,[.67813676352,43.094461639362,13.243238780721],[-.0022358226110718,-6.3233636090933E-4,4.7664798895648E-4]],[87600,[-18.282602096834,-23.30503958666,-1.766620508028],[.0025567245263557,-.0019902940754171,-.0013943491701082]],[116800,[43.873338744526,
-7.700705617215,-10.814273666425],[2.3174803055677E-4,.0022402163127924,6.2988756452032E-4]],[146E3,[7.392949027906,44.382678951534,11.629500214854],[-.002193281545383,-2.1751799585364E-4,5.9556516201114E-4]],[175200,[-24.981690229261,-16.204012851426,2.466457544298],[.001819398914958,-.0026765419531201,-.0013848283502247]],[204400,[42.530187039511,.845935508021,-12.554907527683],[6.5059779150669E-4,.0022725657282262,5.1133743202822E-4]],[233600,[13.999526486822,44.462363044894,9.669418486465],[-.0021079296569252,
-1.7533423831993E-4,6.9128485798076E-4]],[262800,[-29.184024803031,-7.371243995762,6.493275957928],[9.3581363109681E-4,-.0030610357109184,-.0012364201089345]],[292E3,[39.831980671753,-6.078405766765,-13.909815358656],[.0011117769689167,.0022362097830152,3.6230548231153E-4]],[321200,[20.294955108476,43.417190420251,7.450091985932],[-.0019742157451535,5.3102050468554E-4,7.5938408813008E-4]],[350400,[-30.66999230216,2.318743558955,9.973480913858],[4.5605107450676E-5,-.0031308219926928,-9.9066533301924E-4]],
-[379600,[35.626122155983,-12.897647509224,-14.777586508444],[.0016015684949743,.0021171931182284,1.8002516202204E-4]],[408800,[26.133186148561,41.232139187599,5.00640132622],[-.0017857704419579,8.6046232702817E-4,8.0614690298954E-4]],[438E3,[-29.57674022923,11.863535943587,12.631323039872],[-7.2292830060955E-4,-.0029587820140709,-7.08242964503E-4]],[467200,[29.910805787391,-19.159019294,-15.013363865194],[.0020871080437997,.0018848372554514,-3.8528655083926E-5]],[496400,[31.375957451819,38.050372720763,
-2.433138343754],[-.0015546055556611,.0011699815465629,8.3565439266001E-4]],[525600,[-26.360071336928,20.662505904952,14.414696258958],[-.0013142373118349,-.0026236647854842,-4.2542017598193E-4]],[554800,[22.599441488648,-24.508879898306,-14.484045731468],[.0025454108304806,.0014917058755191,-3.0243665086079E-4]],[584E3,[35.877864013014,33.894226366071,-.224524636277],[-.0012941245730845,.0014560427668319,8.4762160640137E-4]],[613200,[-21.538149762417,28.204068269761,15.321973799534],[-.001731211740901,
--.0021939631314577,-1.631691327518E-4]],[642400,[13.971521374415,-28.339941764789,-13.083792871886],[.0029334630526035,9.1860931752944E-4,-5.9939422488627E-4]],[671600,[39.526942044143,28.93989736011,-2.872799527539],[-.0010068481658095,.001702113288809,8.3578230511981E-4]],[700800,[-15.576200701394,34.399412961275,15.466033737854],[-.0020098814612884,-.0017191109825989,7.0414782780416E-5]],[73E4,[4.24325283709,-30.118201690825,-10.707441231349],[.0031725847067411,1.609846120227E-4,-9.0672150593868E-4]]],
-B=function(a,b,c){this.x=a;this.y=b;this.z=c};B.prototype.clone=function(){return new B(this.x,this.y,this.z)};B.prototype.ToAstroVector=function(a){return new E(this.x,this.y,this.z,a)};B.zero=function(){return new B(0,0,0)};B.prototype.quadrature=function(){return this.x*this.x+this.y*this.y+this.z*this.z};B.prototype.add=function(a){return new B(this.x+a.x,this.y+a.y,this.z+a.z)};B.prototype.sub=function(a){return new B(this.x-a.x,this.y-a.y,this.z-a.z)};B.prototype.incr=function(a){this.x+=a.x;
-this.y+=a.y;this.z+=a.z};B.prototype.decr=function(a){this.x-=a.x;this.y-=a.y;this.z-=a.z};B.prototype.mul=function(a){return new B(a*this.x,a*this.y,a*this.z)};B.prototype.div=function(a){return new B(this.x/a,this.y/a,this.z/a)};B.prototype.mean=function(a){return new B((this.x+a.x)/2,(this.y+a.y)/2,(this.z+a.z)/2)};B.prototype.neg=function(){return new B(-this.x,-this.y,-this.z)};var X=function(a,b,c){this.tt=a;this.r=b;this.v=c};X.prototype.clone=function(){return new X(this.tt,this.r,this.v)};
-X.prototype.sub=function(a){return new X(this.tt,this.r.sub(a.r),this.v.sub(a.v))};var Da=function(a){var b=new X(a,new B(0,0,0),new B(0,0,0));this.Jupiter=R(b,a,m.Jupiter,2.825345909524226E-7);this.Saturn=R(b,a,m.Saturn,8.459715185680659E-8);this.Uranus=R(b,a,m.Uranus,1.292024916781969E-8);this.Neptune=R(b,a,m.Neptune,1.524358900784276E-8);this.Jupiter.r.decr(b.r);this.Jupiter.v.decr(b.v);this.Saturn.r.decr(b.r);this.Saturn.v.decr(b.v);this.Uranus.r.decr(b.r);this.Uranus.v.decr(b.v);this.Neptune.r.decr(b.r);
-this.Neptune.v.decr(b.v);this.Sun=new X(a,b.r.mul(-1),b.v.mul(-1))};Da.prototype.Acceleration=function(a){var b=Ta(a,2.959122082855911E-4,this.Sun.r);b.incr(Ta(a,2.825345909524226E-7,this.Jupiter.r));b.incr(Ta(a,8.459715185680659E-8,this.Saturn.r));b.incr(Ta(a,1.292024916781969E-8,this.Uranus.r));b.incr(Ta(a,1.524358900784276E-8,this.Neptune.r));return b};var Ua=function(a,b,c,d){this.tt=a;this.r=b;this.v=c;this.a=d};Ua.prototype.clone=function(){return new Ua(this.tt,this.r.clone(),this.v.clone(),
-this.a.clone())};var ic=function(a,b){this.bary=a;this.grav=b},Ib=[],rd=new J([[.999432765338654,-.0336771074697641,0],[.0303959428906285,.902057912352809,.430543388542295],[-.0144994559663353,-.430299169409101,.902569881273754]]),tb=[{mu:2.82489428433814E-7,al:[1.446213296021224,3.5515522861824],a:[[.0028210960212903,0,0]],l:[[-1.925258348666E-4,4.9369589722645,.01358483658305],[-9.70803596076E-5,4.3188796477322,.01303413843243],[-8.988174165E-5,1.9080016428617,.00305064867158],[-5.53101050262E-5,
+(d=Na(a,c),b=Ea(d,b),a=Ma(a,c),a=Ea(a,b)):(d=Ma(a,c),b=Ea(d,b),a=Na(a,c),a=Ea(a,b)),a)};e.VectorObserver=function(a,b){var c=ca(a.t),d=[a.x,a.y,a.z];b||(d=wa(d,a.t,F.From2000),d=xa(d,a.t,F.From2000));var f=d[0]*e.KM_PER_AU,g=d[1]*e.KM_PER_AU;a=d[2]*e.KM_PER_AU;b=Math.hypot(f,g);if(1E-6>b)c=0,g=0<a?90:-90,a=Math.abs(a)-6356.751857971648;else{for(c=e.RAD2DEG*Math.atan2(g,f)-15*c;-180>=c;)c+=360;for(;180<c;)c-=360;g=Math.atan2(a,b);for(var h,l=0,k=0,n=Math.max(1,Math.hypot(d[0],d[1],d[2]));;){if(10<
+++l)throw"inverse_terra failed to converge: W="+k+", distanceAu="+n;d=Math.cos(g);f=Math.sin(g);var p=d*d,q=f*f,t=p+.9933056020041345*q;h=Math.sqrt(t);k=-42.69778487239616*f*d/h-a*d+b*f;if(Math.abs(k)<2E-8*n)break;g-=k/(-42.69778487239616*((p-q)/h-q*p*-.006694397995865464/(-42.69778487239616*t))+a*f+b*d)}g*=e.RAD2DEG;h=6378.1366/h;a=Math.abs(f)>Math.abs(d)?a/f-.9933056020041345*h:b/d-h}return new zb(g,c,1E3*a)};e.ObserverGravity=function(a,b){a=Math.sin(a*e.DEG2RAD);a*=a;return 9.7803253359*(1+.00193185265241*
+a)/Math.sqrt(1-.00669437999013*a)*(1-(3.15704E-7-2.10269E-9*a)*b+7.37452E-14*b*b)};e.Ecliptic=Qa;e.GeoMoon=Y;e.EclipticGeoMoon=ib;e.GeoMoonState=Ra;e.GeoEmbState=Bb;var na=[[-73E4,[-26.118207232108,-14.376168177825,3.384402515299],[.0016339372163656,-.0027861699588508,-.0013585880229445]],[-700800,[41.974905202127,-.448502952929,-12.770351505989],[7.3458569351457E-4,.0022785014891658,4.8619778602049E-4]],[-671600,[14.706930780744,44.269110540027,9.353698474772],[-.00210001479998,2.2295915939915E-4,
+7.0143443551414E-4]],[-642400,[-29.441003929957,-6.43016153057,6.858481011305],[8.4495803960544E-4,-.0030783914758711,-.0012106305981192]],[-613200,[39.444396946234,-6.557989760571,-13.913760296463],[.0011480029005873,.0022400006880665,3.5168075922288E-4]],[-584E3,[20.2303809507,43.266966657189,7.382966091923],[-.0019754081700585,5.3457141292226E-4,7.5929169129793E-4]],[-554800,[-30.65832536462,2.093818874552,9.880531138071],[6.1010603013347E-5,-.0031326500935382,-9.9346125151067E-4]],[-525600,[35.737703251673,
+-12.587706024764,-14.677847247563],[.0015802939375649,.0021347678412429,1.9074436384343E-4]],[-496400,[25.466295188546,41.367478338417,5.216476873382],[-.0018054401046468,8.328308359951E-4,8.0260156912107E-4]],[-467200,[-29.847174904071,10.636426313081,12.297904180106],[-6.3257063052907E-4,-.0029969577578221,-7.4476074151596E-4]],[-438E3,[30.774692107687,-18.236637015304,-14.945535879896],[.0020113162005465,.0019353827024189,-2.0937793168297E-6]],[-408800,[30.243153324028,38.656267888503,2.938501750218],
+[-.0016052508674468,.0011183495337525,8.3333973416824E-4]],[-379600,[-27.288984772533,18.643162147874,14.023633623329],[-.0011856388898191,-.0027170609282181,-4.9015526126399E-4]],[-350400,[24.519605196774,-23.245756064727,-14.626862367368],[.0024322321483154,.0016062008146048,-2.3369181613312E-4]],[-321200,[34.505274805875,35.125338586954,.557361475637],[-.0013824391637782,.0013833397561817,8.4823598806262E-4]],[-292E3,[-23.275363915119,25.818514298769,15.055381588598],[-.0016062295460975,-.0023395961498533,
+-2.4377362639479E-4]],[-262800,[17.050384798092,-27.180376290126,-13.608963321694],[.0028175521080578,.0011358749093955,-4.9548725258825E-4]],[-233600,[38.093671910285,30.880588383337,-1.843688067413],[-.0011317697153459,.0016128814698472,8.4177586176055E-4]],[-204400,[-18.197852930878,31.932869934309,15.438294826279],[-.0019117272501813,-.0019146495909842,-1.9657304369835E-5]],[-175200,[8.528924039997,-29.618422200048,-11.805400994258],[.0031034370787005,5.139363329243E-4,-7.7293066202546E-4]],[-146E3,
+[40.94685725864,25.904973592021,-4.256336240499],[-8.3652705194051E-4,.0018129497136404,8.156422827306E-4]],[-116800,[-12.326958895325,36.881883446292,15.217158258711],[-.0021166103705038,-.001481442003599,1.7401209844705E-4]],[-87600,[-.633258375909,-30.018759794709,-9.17193287495],[.0032016994581737,-2.5279858672148E-4,-.0010411088271861]],[-58400,[42.936048423883,20.344685584452,-6.588027007912],[-5.0525450073192E-4,.0019910074335507,7.7440196540269E-4]],[-29200,[-5.975910552974,40.61180995846,
+14.470131723673],[-.0022184202156107,-.0010562361130164,3.3652250216211E-4]],[0,[-9.875369580774,-27.978926224737,-5.753711824704],[.0030287533248818,-.0011276087003636,-.0012651326732361]],[29200,[43.958831986165,14.214147973292,-8.808306227163],[-1.4717608981871E-4,.0021404187242141,7.1486567806614E-4]],[58400,[.67813676352,43.094461639362,13.243238780721],[-.0022358226110718,-6.3233636090933E-4,4.7664798895648E-4]],[87600,[-18.282602096834,-23.30503958666,-1.766620508028],[.0025567245263557,-.0019902940754171,
+-.0013943491701082]],[116800,[43.873338744526,7.700705617215,-10.814273666425],[2.3174803055677E-4,.0022402163127924,6.2988756452032E-4]],[146E3,[7.392949027906,44.382678951534,11.629500214854],[-.002193281545383,-2.1751799585364E-4,5.9556516201114E-4]],[175200,[-24.981690229261,-16.204012851426,2.466457544298],[.001819398914958,-.0026765419531201,-.0013848283502247]],[204400,[42.530187039511,.845935508021,-12.554907527683],[6.5059779150669E-4,.0022725657282262,5.1133743202822E-4]],[233600,[13.999526486822,
+44.462363044894,9.669418486465],[-.0021079296569252,1.7533423831993E-4,6.9128485798076E-4]],[262800,[-29.184024803031,-7.371243995762,6.493275957928],[9.3581363109681E-4,-.0030610357109184,-.0012364201089345]],[292E3,[39.831980671753,-6.078405766765,-13.909815358656],[.0011117769689167,.0022362097830152,3.6230548231153E-4]],[321200,[20.294955108476,43.417190420251,7.450091985932],[-.0019742157451535,5.3102050468554E-4,7.5938408813008E-4]],[350400,[-30.66999230216,2.318743558955,9.973480913858],[4.5605107450676E-5,
+-.0031308219926928,-9.9066533301924E-4]],[379600,[35.626122155983,-12.897647509224,-14.777586508444],[.0016015684949743,.0021171931182284,1.8002516202204E-4]],[408800,[26.133186148561,41.232139187599,5.00640132622],[-.0017857704419579,8.6046232702817E-4,8.0614690298954E-4]],[438E3,[-29.57674022923,11.863535943587,12.631323039872],[-7.2292830060955E-4,-.0029587820140709,-7.08242964503E-4]],[467200,[29.910805787391,-19.159019294,-15.013363865194],[.0020871080437997,.0018848372554514,-3.8528655083926E-5]],
+[496400,[31.375957451819,38.050372720763,2.433138343754],[-.0015546055556611,.0011699815465629,8.3565439266001E-4]],[525600,[-26.360071336928,20.662505904952,14.414696258958],[-.0013142373118349,-.0026236647854842,-4.2542017598193E-4]],[554800,[22.599441488648,-24.508879898306,-14.484045731468],[.0025454108304806,.0014917058755191,-3.0243665086079E-4]],[584E3,[35.877864013014,33.894226366071,-.224524636277],[-.0012941245730845,.0014560427668319,8.4762160640137E-4]],[613200,[-21.538149762417,28.204068269761,
+15.321973799534],[-.001731211740901,-.0021939631314577,-1.631691327518E-4]],[642400,[13.971521374415,-28.339941764789,-13.083792871886],[.0029334630526035,9.1860931752944E-4,-5.9939422488627E-4]],[671600,[39.526942044143,28.93989736011,-2.872799527539],[-.0010068481658095,.001702113288809,8.3578230511981E-4]],[700800,[-15.576200701394,34.399412961275,15.466033737854],[-.0020098814612884,-.0017191109825989,7.0414782780416E-5]],[73E4,[4.24325283709,-30.118201690825,-10.707441231349],[.0031725847067411,
+1.609846120227E-4,-9.0672150593868E-4]]],B=function(a,b,c){this.x=a;this.y=b;this.z=c};B.prototype.clone=function(){return new B(this.x,this.y,this.z)};B.prototype.ToAstroVector=function(a){return new E(this.x,this.y,this.z,a)};B.zero=function(){return new B(0,0,0)};B.prototype.quadrature=function(){return this.x*this.x+this.y*this.y+this.z*this.z};B.prototype.add=function(a){return new B(this.x+a.x,this.y+a.y,this.z+a.z)};B.prototype.sub=function(a){return new B(this.x-a.x,this.y-a.y,this.z-a.z)};
+B.prototype.incr=function(a){this.x+=a.x;this.y+=a.y;this.z+=a.z};B.prototype.decr=function(a){this.x-=a.x;this.y-=a.y;this.z-=a.z};B.prototype.mul=function(a){return new B(a*this.x,a*this.y,a*this.z)};B.prototype.div=function(a){return new B(this.x/a,this.y/a,this.z/a)};B.prototype.mean=function(a){return new B((this.x+a.x)/2,(this.y+a.y)/2,(this.z+a.z)/2)};B.prototype.neg=function(){return new B(-this.x,-this.y,-this.z)};var X=function(a,b,c){this.tt=a;this.r=b;this.v=c};X.prototype.clone=function(){return new X(this.tt,
+this.r,this.v)};X.prototype.sub=function(a){return new X(this.tt,this.r.sub(a.r),this.v.sub(a.v))};var Da=function(a){var b=new X(a,new B(0,0,0),new B(0,0,0));this.Jupiter=R(b,a,m.Jupiter,2.825345909524226E-7);this.Saturn=R(b,a,m.Saturn,8.459715185680659E-8);this.Uranus=R(b,a,m.Uranus,1.292024916781969E-8);this.Neptune=R(b,a,m.Neptune,1.524358900784276E-8);this.Jupiter.r.decr(b.r);this.Jupiter.v.decr(b.v);this.Saturn.r.decr(b.r);this.Saturn.v.decr(b.v);this.Uranus.r.decr(b.r);this.Uranus.v.decr(b.v);
+this.Neptune.r.decr(b.r);this.Neptune.v.decr(b.v);this.Sun=new X(a,b.r.mul(-1),b.v.mul(-1))};Da.prototype.Acceleration=function(a){var b=Ta(a,2.959122082855911E-4,this.Sun.r);b.incr(Ta(a,2.825345909524226E-7,this.Jupiter.r));b.incr(Ta(a,8.459715185680659E-8,this.Saturn.r));b.incr(Ta(a,1.292024916781969E-8,this.Uranus.r));b.incr(Ta(a,1.524358900784276E-8,this.Neptune.r));return b};var Ua=function(a,b,c,d){this.tt=a;this.r=b;this.v=c;this.a=d};Ua.prototype.clone=function(){return new Ua(this.tt,this.r.clone(),
+this.v.clone(),this.a.clone())};var ic=function(a,b){this.bary=a;this.grav=b},Ib=[],rd=new J([[.999432765338654,-.0336771074697641,0],[.0303959428906285,.902057912352809,.430543388542295],[-.0144994559663353,-.430299169409101,.902569881273754]]),tb=[{mu:2.82489428433814E-7,al:[1.446213296021224,3.5515522861824],a:[[.0028210960212903,0,0]],l:[[-1.925258348666E-4,4.9369589722645,.01358483658305],[-9.70803596076E-5,4.3188796477322,.01303413843243],[-8.988174165E-5,1.9080016428617,.00305064867158],[-5.53101050262E-5,
 1.4936156681569,.01293892891155]],z:[[.0041510849668155,4.089939635545,-.01290686414666],[6.260521444113E-4,1.446188898627,3.5515522949802],[3.52747346169E-5,2.1256287034578,1.2727416567E-4]],zeta:[[3.142172466014E-4,2.7964219722923,-.002315096098],[9.04169207946E-5,1.0477061879627,-5.6920638196E-4]]},{mu:2.82483274392893E-7,al:[-.3735263437471362,1.76932271112347],a:[[.0044871037804314,0,0],[4.324367498E-7,1.819645606291,1.7822295777568]],l:[[8.576433172936E-4,4.3188693178264,.01303413830805],[4.549582875086E-4,
 1.4936531751079,.01293892881962],[3.248939825174E-4,1.8196494533458,1.7822295777568],[-3.074250079334E-4,4.9377037005911,.01358483286724],[1.982386144784E-4,1.907986905476,.00305101212869],[1.834063551804E-4,2.1402853388529,.00145009789338],[-1.434383188452E-4,5.622214036663,.89111478887838],[-7.71939140944E-5,4.300272437235,2.6733443704266]],z:[[-.0093589104136341,4.0899396509039,-.01290686414666],[2.988994545555E-4,5.9097265185595,1.7693227079462],[2.13903639035E-4,2.1256289300016,1.2727418407E-4],
 [1.980963564781E-4,2.743516829265,6.7797343009E-4],[1.210388158965E-4,5.5839943711203,3.20566149E-5],[8.37042048393E-5,1.6094538368039,-.90402165808846],[8.23525166369E-5,1.4461887708689,3.5515522949802]],zeta:[[.0040404917832303,1.0477063169425,-5.692064054E-4],[2.200421034564E-4,3.3368857864364,-1.2491307307E-4],[1.662544744719E-4,2.4134862374711,0],[5.90282470983E-5,5.9719930968366,-3.056160225E-5]]},{mu:2.82498184184723E-7,al:[.2874089391143348,.878207923589328],a:[[.0071566594572575,0,0],[1.393029911E-6,
diff --git a/source/js/astronomy.js b/source/js/astronomy.js
index 94dd87ad..1e36c36b 100644
--- a/source/js/astronomy.js
+++ b/source/js/astronomy.js
@@ -1937,9 +1937,12 @@ function inverse_terra(ovec, st) {
         let lat = Math.atan2(z, p);
         let cos, sin, denom;
         let count = 0;
+        let W = 0;
+        const distanceAu = Math.max(1, Math.hypot(ovec[0], ovec[1], ovec[2]));
         for (;;) {
-            if (++count > 10)
-                throw `inverse_terra failed to converge.`;
+            if (++count > 10) {
+                throw `inverse_terra failed to converge: W=${W}, distanceAu=${distanceAu}`;
+            }
             // Calculate the error function W(lat).
             // We try to find the root of W, meaning where the error is 0.
             cos = Math.cos(lat);
@@ -1949,8 +1952,8 @@ function inverse_terra(ovec, st) {
             const sin2 = sin * sin;
             const radicand = cos2 + EARTH_FLATTENING_SQUARED * sin2;
             denom = Math.sqrt(radicand);
-            const W = (factor * sin * cos) / denom - z * cos + p * sin;
-            if (Math.abs(W) < 2.0e-8)
+            W = (factor * sin * cos) / denom - z * cos + p * sin;
+            if (Math.abs(W) < distanceAu * 2.0e-8)
                 break; // The error is now negligible
             // Error is still too large. Find the next estimate.
             // Calculate D = the derivative of W with respect to lat.
diff --git a/source/js/astronomy.min.js b/source/js/astronomy.min.js
index 52b23383..cdbbbd18 100644
--- a/source/js/astronomy.min.js
+++ b/source/js/astronomy.min.js
@@ -105,10 +105,10 @@ AstroTime.FromTerrestrialTime=function(a){for(var b=new AstroTime(a);;){var c=a-
 function iau2000b(a){a=a.tt/36525;var b=(1287104.79305+1.295965810481E8*a)%ASEC360*ASEC2RAD,c=(335779.526232+1.7395272628478E9*a)%ASEC360*ASEC2RAD,d=(450160.398036-6962890.5431*a)%ASEC360*ASEC2RAD,e=Math.sin(d),f=Math.cos(d),g=(-172064161-174666*a)*e+33386*f,k=(92052331+9086*a)*f+15377*e;f=2*(c-(1072260.70369+1.602961601209E9*a)%ASEC360*ASEC2RAD+d);e=Math.sin(f);f=Math.cos(f);g+=(-13170906-1675*a)*e-13696*f;k+=(5730336-3015*a)*f-4587*e;f=2*(c+d);e=Math.sin(f);f=Math.cos(f);g+=(-2276413-234*a)*e+2796*
 f;k+=(978459-485*a)*f+1374*e;f=2*d;e=Math.sin(f);f=Math.cos(f);g+=(2074554+207*a)*e-698*f;k+=(-897492+470*a)*f-291*e;e=Math.sin(b);f=Math.cos(b);return{dpsi:-1.35E-4+1E-7*(g+((1475877-3633*a)*e+11817*f)),deps:3.88E-4+1E-7*(k+((73871-184*a)*f-1924*e))}}function mean_obliq(a){a=a.tt/36525;return(((((-4.34E-8*a-5.76E-7)*a+.0020034)*a-1.831E-4)*a-46.836769)*a+84381.406)/3600}var cache_e_tilt;
 function e_tilt(a){if(!cache_e_tilt||1E-6<Math.abs(cache_e_tilt.tt-a.tt)){var b=iau2000b(a),c=mean_obliq(a);cache_e_tilt={tt:a.tt,dpsi:b.dpsi,deps:b.deps,ee:b.dpsi*Math.cos(c*exports.DEG2RAD)/15,mobl:c,tobl:c+b.deps/3600}}return cache_e_tilt}exports.e_tilt=e_tilt;function obl_ecl2equ_vec(a,b){var c=a*exports.DEG2RAD;a=Math.cos(c);c=Math.sin(c);return[b[0],b[1]*a-b[2]*c,b[1]*c+b[2]*a]}function ecl2equ_vec(a,b){return obl_ecl2equ_vec(mean_obliq(a),b)}exports.CalcMoonCount=0;
-function CalcMoon(a){function b(u,v,x,A){for(var w=[],D=0;D<=v-u;++D){var E=w,L=E.push,M,O=x,Q=A,P=[];for(M=0;M<=Q-O;++M)P.push(0);L.call(E,{min:O,array:P})}return{min:u,array:w}}function c(u,v,x){u=u.array[v-u.min];return u.array[x-u.min]}function d(u,v,x){u=r.array[u-r.min];u.array[v-u.min]=x}function e(u,v,x){u=q.array[u-q.min];u.array[v-u.min]=x}function f(u,v,x,A,w){w(u*x-v*A,v*x+u*A)}function g(u){return Math.sin(PI2*u)}function k(u,v,x,A){var w={x:1,y:0};u=[0,u,v,x,A];for(v=1;4>=v;++v)0!==
-u[v]&&f(w.x,w.y,c(r,u[v],v),c(q,u[v],v),function(D,E){return w.x=D,w.y=E});return w}function h(u,v,x,A,w,D,E,L){w=k(w,D,E,L);n+=u*w.y;p+=v*w.y;H+=x*w.x;F+=A*w.x}++exports.CalcMoonCount;a=a.tt/36525;var l,m,n,p,r=b(-6,6,1,4),q=b(-6,6,1,4);var t=a*a;var H=p=n=0;var F=3422.7;var C=g(.19833+.05611*a);var B=g(.27869+.04508*a);var y=g(.16827-.36903*a);var z=g(.34734-5.37261*a);var G=g(.10498-5.37899*a);var I=g(.42681-.41855*a),R=g(.14943-5.37511*a);var J=.84*C+.31*B+14.27*y+7.26*z+.28*G+.24*I;var N=2.94*
+function CalcMoon(a){function b(u,v,x,A){for(var w=[],D=0;D<=v-u;++D){var E=w,L=E.push,M,O=x,Q=A,P=[];for(M=0;M<=Q-O;++M)P.push(0);L.call(E,{min:O,array:P})}return{min:u,array:w}}function c(u,v,x){u=u.array[v-u.min];return u.array[x-u.min]}function d(u,v,x){u=q.array[u-q.min];u.array[v-u.min]=x}function e(u,v,x){u=r.array[u-r.min];u.array[v-u.min]=x}function f(u,v,x,A,w){w(u*x-v*A,v*x+u*A)}function g(u){return Math.sin(PI2*u)}function k(u,v,x,A){var w={x:1,y:0};u=[0,u,v,x,A];for(v=1;4>=v;++v)0!==
+u[v]&&f(w.x,w.y,c(q,u[v],v),c(r,u[v],v),function(D,E){return w.x=D,w.y=E});return w}function h(u,v,x,A,w,D,E,L){w=k(w,D,E,L);n+=u*w.y;p+=v*w.y;H+=x*w.x;F+=A*w.x}++exports.CalcMoonCount;a=a.tt/36525;var l,m,n,p,q=b(-6,6,1,4),r=b(-6,6,1,4);var t=a*a;var H=p=n=0;var F=3422.7;var C=g(.19833+.05611*a);var B=g(.27869+.04508*a);var y=g(.16827-.36903*a);var z=g(.34734-5.37261*a);var G=g(.10498-5.37899*a);var I=g(.42681-.41855*a),R=g(.14943-5.37511*a);var J=.84*C+.31*B+14.27*y+7.26*z+.28*G+.24*I;var N=2.94*
 C+.31*B+14.27*y+9.34*z+1.12*G+.83*I;var K=-6.4*C-1.89*I;B=.21*C+.31*B+14.27*y-88.7*z-15.3*G+.24*I-1.86*R;y=J-K;C=-3.332E-6*g(.59734-5.37261*a)-5.39E-7*g(.35498-5.37899*a)-6.4E-8*g(.39943-5.37511*a);J=PI2*Frac(.60643382+1336.85522467*a-3.13E-6*t)+J/ARC;N=PI2*Frac(.37489701+1325.55240982*a+2.565E-5*t)+N/ARC;K=PI2*Frac(.99312619+99.99735956*a-4.4E-7*t)+K/ARC;B=PI2*Frac(.25909118+1342.2278298*a-8.92E-6*t)+B/ARC;G=PI2*Frac(.82736186+1236.85308708*a-3.97E-6*t)+y/ARC;for(l=1;4>=l;++l){switch(l){case 1:y=
-N;t=4;z=1.000002208;break;case 2:y=K;t=3;z=.997504612-.002495388*a;break;case 3:y=B;t=4;z=1.000002708+139.978*C;break;case 4:y=G;t=6;z=1;break;default:throw"Internal error: I = "+l;}d(0,l,1);d(1,l,Math.cos(y)*z);e(0,l,0);e(1,l,Math.sin(y)*z);for(m=2;m<=t;++m)f(c(r,m-1,l),c(q,m-1,l),c(r,1,l),c(q,1,l),function(u,v){return d(m,l,u),e(m,l,v)});for(m=1;m<=t;++m)d(-m,l,c(r,m,l)),e(-m,l,-c(q,m,l))}h(13.902,14.06,-.001,.2607,0,0,0,4);h(.403,-4.01,.394,.0023,0,0,0,3);h(2369.912,2373.36,.601,28.2333,0,0,0,
+N;t=4;z=1.000002208;break;case 2:y=K;t=3;z=.997504612-.002495388*a;break;case 3:y=B;t=4;z=1.000002708+139.978*C;break;case 4:y=G;t=6;z=1;break;default:throw"Internal error: I = "+l;}d(0,l,1);d(1,l,Math.cos(y)*z);e(0,l,0);e(1,l,Math.sin(y)*z);for(m=2;m<=t;++m)f(c(q,m-1,l),c(r,m-1,l),c(q,1,l),c(r,1,l),function(u,v){return d(m,l,u),e(m,l,v)});for(m=1;m<=t;++m)d(-m,l,c(q,m,l)),e(-m,l,-c(r,m,l))}h(13.902,14.06,-.001,.2607,0,0,0,4);h(.403,-4.01,.394,.0023,0,0,0,3);h(2369.912,2373.36,.601,28.2333,0,0,0,
 2);h(-125.154,-112.79,-.725,-.9781,0,0,0,1);h(1.979,6.98,-.445,.0433,1,0,0,4);h(191.953,192.72,.029,3.0861,1,0,0,2);h(-8.466,-13.51,.455,-.1093,1,0,0,1);h(22639.5,22609.07,.079,186.5398,1,0,0,0);h(18.609,3.59,-.094,.0118,1,0,0,-1);h(-4586.465,-4578.13,-.077,34.3117,1,0,0,-2);h(3.215,5.44,.192,-.0386,1,0,0,-3);h(-38.428,-38.64,.001,.6008,1,0,0,-4);h(-.393,-1.43,-.092,.0086,1,0,0,-6);h(-.289,-1.59,.123,-.0053,0,1,0,4);h(-24.42,-25.1,.04,-.3,0,1,0,2);h(18.023,17.93,.007,.1494,0,1,0,1);h(-668.146,-126.98,
 -1.302,-.3997,0,1,0,0);h(.56,.32,-.001,-.0037,0,1,0,-1);h(-165.145,-165.06,.054,1.9178,0,1,0,-2);h(-1.877,-6.46,-.416,.0339,0,1,0,-4);h(.213,1.02,-.074,.0054,2,0,0,4);h(14.387,14.78,-.017,.2833,2,0,0,2);h(-.586,-1.2,.054,-.01,2,0,0,1);h(769.016,767.96,.107,10.1657,2,0,0,0);h(1.75,2.01,-.018,.0155,2,0,0,-1);h(-211.656,-152.53,5.679,-.3039,2,0,0,-2);h(1.225,.91,-.03,-.0088,2,0,0,-3);h(-30.773,-34.07,-.308,.3722,2,0,0,-4);h(-.57,-1.4,-.074,.0109,2,0,0,-6);h(-2.921,-11.75,.787,-.0484,1,1,0,2);h(1.267,
 1.52,-.022,.0164,1,1,0,1);h(-109.673,-115.18,.461,-.949,1,1,0,0);h(-205.962,-182.36,2.056,1.4437,1,1,0,-2);h(.233,.36,.012,-.0025,1,1,0,-3);h(-4.391,-9.66,-.471,.0673,1,1,0,-4);h(.283,1.53,-.111,.006,1,-1,0,4);h(14.577,31.7,-1.54,.2302,1,-1,0,2);h(147.687,138.76,.679,1.1528,1,-1,0,0);h(-1.089,.55,.021,0,1,-1,0,-1);h(28.475,23.59,-.443,-.2257,1,-1,0,-2);h(-.276,-.38,-.006,-.0036,1,-1,0,-3);h(.636,2.27,.146,-.0102,1,-1,0,-4);h(-.189,-1.68,.131,-.0028,0,2,0,2);h(-7.486,-.66,-.037,-.0086,0,2,0,0);h(-8.096,
@@ -119,16 +119,16 @@ N;t=4;z=1.000002208;break;case 2:y=K;t=3;z=.997504612-.002495388*a;break;case 3:
 0,1,-4).y;t+=20.599*k(-1,0,1,0).y;t+=-30.598*k(-1,0,1,-2).y;t+=-24.649*k(-2,0,1,0).y;t+=-2*k(-2,0,1,-2).y;t+=-22.571*k(0,1,1,-2).y;t+=10.985*k(0,-1,1,-2).y;n+=.82*g(.7736-62.5512*a)+.31*g(.0466-125.1025*a)+.35*g(.5785-25.1042*a)+.66*g(.4591+1335.8075*a)+.64*g(.313-91.568*a)+1.14*g(.148+1331.2898*a)+.21*g(.5918+1056.5859*a)+.44*g(.5784+1322.8595*a)+.24*g(.2275-5.7374*a)+.28*g(.2965+2.6929*a)+.33*g(.3132+6.3368*a);a=B+p/ARC;a=(1.000002708+139.978*C)*(18518.511+1.189+H)*Math.sin(a)-6.24*Math.sin(3*a)+
 t;return{geo_eclip_lon:PI2*Frac((J+n/ARC)/PI2),geo_eclip_lat:Math.PI/648E3*a,distance_au:ARC*EARTH_EQUATORIAL_RADIUS_AU/(.999953253*F)}}var LibrationInfo=function(a,b,c,d,e,f){this.elat=a;this.elon=b;this.mlat=c;this.mlon=d;this.dist_km=e;this.diam_deg=f};exports.LibrationInfo=LibrationInfo;
 function Libration(a){var b=MakeTime(a);a=b.tt/36525;var c=a*a,d=c*a,e=c*c,f=CalcMoon(b);b=f.geo_eclip_lon;var g=f.geo_eclip_lat;f=f.distance_au*exports.KM_PER_AU;var k=1.543*exports.DEG2RAD,h=exports.DEG2RAD*NormalizeLongitude(93.272095+483202.0175233*a-.0036539*c-d/3526E3+e/86331E4),l=exports.DEG2RAD*NormalizeLongitude(125.0445479-1934.1362891*a+.0020754*c+d/467441-e/60616E3),m=exports.DEG2RAD*NormalizeLongitude(357.5291092+35999.0502909*a-1.536E-4*c+d/2449E4),n=exports.DEG2RAD*NormalizeLongitude(134.9633964+
-477198.8675055*a+.0087414*c+d/69699-e/14712E3);d=exports.DEG2RAD*NormalizeLongitude(297.8501921+445267.1114034*a-.0018819*c+d/545868-e/113065E3);c=1-.002516*a-7.4E-6*c;var p=b-l;e=Math.atan2(Math.sin(p)*Math.cos(g)*Math.cos(k)-Math.sin(g)*Math.sin(k),Math.cos(p)*Math.cos(g));var r=LongitudeOffset(exports.RAD2DEG*(e-h));k=Math.asin(-Math.sin(p)*Math.cos(g)*Math.sin(k)-Math.sin(g)*Math.cos(k));p=-.02752*Math.cos(n)+-.02245*Math.sin(h)+.00684*Math.cos(n-2*h)+-.00293*Math.cos(2*h)+-8.5E-4*Math.cos(2*
-h-2*d)+-5.4E-4*Math.cos(n-2*d)+-2E-4*Math.sin(n+h)+-2E-4*Math.cos(n+2*h)+-2E-4*Math.cos(n-h)+1.4E-4*Math.cos(n+2*h-2*d);var q=-.02816*Math.sin(n)+.02244*Math.cos(h)+-.00682*Math.sin(n-2*h)+-.00279*Math.sin(2*h)+-8.3E-4*Math.sin(2*h-2*d)+6.9E-4*Math.sin(n-2*d)+4E-4*Math.cos(n+h)+-2.5E-4*Math.sin(2*n)+-2.3E-4*Math.sin(n+2*h)+2E-4*Math.cos(n-h)+1.9E-4*Math.sin(n-h)+1.3E-4*Math.sin(n+2*h-2*d)+-1E-4*Math.cos(n-3*h);return new LibrationInfo(exports.RAD2DEG*k+(q*Math.cos(e)-p*Math.sin(e)),r+(-(.0252*c*Math.sin(m)+
-.00473*Math.sin(2*n-2*h)+-.00467*Math.sin(n)+.00396*Math.sin(exports.DEG2RAD*(119.75+131.849*a))+.00276*Math.sin(2*n-2*d)+.00196*Math.sin(l)+-.00183*Math.cos(n-h)+.00115*Math.sin(n-2*d)+-9.6E-4*Math.sin(n-d)+4.6E-4*Math.sin(2*h-2*d)+-3.9E-4*Math.sin(n-h)+-3.2E-4*Math.sin(n-m-d)+2.7E-4*Math.sin(2*n-m-2*d)+2.3E-4*Math.sin(exports.DEG2RAD*(72.56+20.186*a))+-1.4E-4*Math.sin(2*d)+1.4E-4*Math.cos(2*n-2*h)+-1.2E-4*Math.sin(n-2*h)+-1.2E-4*Math.sin(2*n)+1.1E-4*Math.sin(2*n-2*m-2*d))+(p*Math.cos(e)+q*Math.sin(e))*
+477198.8675055*a+.0087414*c+d/69699-e/14712E3);d=exports.DEG2RAD*NormalizeLongitude(297.8501921+445267.1114034*a-.0018819*c+d/545868-e/113065E3);c=1-.002516*a-7.4E-6*c;var p=b-l;e=Math.atan2(Math.sin(p)*Math.cos(g)*Math.cos(k)-Math.sin(g)*Math.sin(k),Math.cos(p)*Math.cos(g));var q=LongitudeOffset(exports.RAD2DEG*(e-h));k=Math.asin(-Math.sin(p)*Math.cos(g)*Math.sin(k)-Math.sin(g)*Math.cos(k));p=-.02752*Math.cos(n)+-.02245*Math.sin(h)+.00684*Math.cos(n-2*h)+-.00293*Math.cos(2*h)+-8.5E-4*Math.cos(2*
+h-2*d)+-5.4E-4*Math.cos(n-2*d)+-2E-4*Math.sin(n+h)+-2E-4*Math.cos(n+2*h)+-2E-4*Math.cos(n-h)+1.4E-4*Math.cos(n+2*h-2*d);var r=-.02816*Math.sin(n)+.02244*Math.cos(h)+-.00682*Math.sin(n-2*h)+-.00279*Math.sin(2*h)+-8.3E-4*Math.sin(2*h-2*d)+6.9E-4*Math.sin(n-2*d)+4E-4*Math.cos(n+h)+-2.5E-4*Math.sin(2*n)+-2.3E-4*Math.sin(n+2*h)+2E-4*Math.cos(n-h)+1.9E-4*Math.sin(n-h)+1.3E-4*Math.sin(n+2*h-2*d)+-1E-4*Math.cos(n-3*h);return new LibrationInfo(exports.RAD2DEG*k+(r*Math.cos(e)-p*Math.sin(e)),q+(-(.0252*c*Math.sin(m)+
+.00473*Math.sin(2*n-2*h)+-.00467*Math.sin(n)+.00396*Math.sin(exports.DEG2RAD*(119.75+131.849*a))+.00276*Math.sin(2*n-2*d)+.00196*Math.sin(l)+-.00183*Math.cos(n-h)+.00115*Math.sin(n-2*d)+-9.6E-4*Math.sin(n-d)+4.6E-4*Math.sin(2*h-2*d)+-3.9E-4*Math.sin(n-h)+-3.2E-4*Math.sin(n-m-d)+2.7E-4*Math.sin(2*n-m-2*d)+2.3E-4*Math.sin(exports.DEG2RAD*(72.56+20.186*a))+-1.4E-4*Math.sin(2*d)+1.4E-4*Math.cos(2*n-2*h)+-1.2E-4*Math.sin(n-2*h)+-1.2E-4*Math.sin(2*n)+1.1E-4*Math.sin(2*n-2*m-2*d))+(p*Math.cos(e)+r*Math.sin(e))*
 Math.tan(k)),exports.RAD2DEG*g,exports.RAD2DEG*b,f,2*exports.RAD2DEG*Math.atan(MOON_MEAN_RADIUS_KM/Math.sqrt(f*f-MOON_MEAN_RADIUS_KM*MOON_MEAN_RADIUS_KM)))}exports.Libration=Libration;function rotate(a,b){return[a.rot[0][0]*b[0]+a.rot[1][0]*b[1]+a.rot[2][0]*b[2],a.rot[0][1]*b[0]+a.rot[1][1]*b[1]+a.rot[2][1]*b[2],a.rot[0][2]*b[0]+a.rot[1][2]*b[1]+a.rot[2][2]*b[2]]}function precession(a,b,c){b=precession_rot(b,c);return rotate(b,a)}
 function precession_posvel(a,b,c){b=precession_rot(b,c);return RotateState(b,a)}
 function precession_rot(a,b){a=a.tt/36525;var c=84381.406,d=((((3.337E-7*a-4.67E-7)*a-.00772503)*a+.0512623)*a-.025754)*a+c;c*=ASEC2RAD;var e=((((-9.51E-8*a+1.32851E-4)*a-.00114045)*a-1.0790069)*a+5038.481507)*a*ASEC2RAD;d*=ASEC2RAD;var f=((((-5.6E-8*a+1.70663E-4)*a-.00121197)*a-2.3814292)*a+10.556403)*a*ASEC2RAD;a=Math.sin(c);c=Math.cos(c);var g=Math.sin(-e);e=Math.cos(-e);var k=Math.sin(-d);d=Math.cos(-d);var h=Math.sin(f),l=Math.cos(f);f=l*e-g*h*d;var m=l*g*c+h*d*e*c-a*h*k,n=l*g*a+h*d*e*a+c*h*
-k,p=-h*e-g*l*d,r=-h*g*c+l*d*e*c-a*l*k;h=-h*g*a+l*d*e*a+c*l*k;g*=k;l=-k*e*c-a*d;a=-k*e*a+d*c;if(b===PrecessDirection.Into2000)return new RotationMatrix([[f,m,n],[p,r,h],[g,l,a]]);if(b===PrecessDirection.From2000)return new RotationMatrix([[f,p,g],[m,r,l],[n,h,a]]);throw"Invalid precess direction";}function era(a){a=(.779057273264+.00273781191135448*a.ut+a.ut%1)%1*360;0>a&&(a+=360);return a}var sidereal_time_cache;
+k,p=-h*e-g*l*d,q=-h*g*c+l*d*e*c-a*l*k;h=-h*g*a+l*d*e*a+c*l*k;g*=k;l=-k*e*c-a*d;a=-k*e*a+d*c;if(b===PrecessDirection.Into2000)return new RotationMatrix([[f,m,n],[p,q,h],[g,l,a]]);if(b===PrecessDirection.From2000)return new RotationMatrix([[f,p,g],[m,q,l],[n,h,a]]);throw"Invalid precess direction";}function era(a){a=(.779057273264+.00273781191135448*a.ut+a.ut%1)%1*360;0>a&&(a+=360);return a}var sidereal_time_cache;
 function sidereal_time(a){if(!sidereal_time_cache||sidereal_time_cache.tt!==a.tt){var b=a.tt/36525,c=15*e_tilt(a).ee,d=era(a);b=((c+.014506+((((-3.68E-8*b-2.9956E-5)*b-4.4E-7)*b+1.3915817)*b+4612.156534)*b)/3600+d)%360/15;0>b&&(b+=24);sidereal_time_cache={tt:a.tt,st:b}}return sidereal_time_cache.st}function SiderealTime(a){a=MakeTime(a);return sidereal_time(a)}exports.SiderealTime=SiderealTime;
-function inverse_terra(a,b){var c=a[0]*exports.KM_PER_AU,d=a[1]*exports.KM_PER_AU;a=a[2]*exports.KM_PER_AU;var e=Math.hypot(c,d);if(1E-6>e){b=0;var f=0<a?90:-90;a=Math.abs(a)-EARTH_POLAR_RADIUS_KM}else{for(b=exports.RAD2DEG*Math.atan2(d,c)-15*b;-180>=b;)b+=360;for(;180<b;)b-=360;f=Math.atan2(a,e);for(var g,k=0;;){if(10<++k)throw"inverse_terra failed to converge.";c=Math.cos(f);d=Math.sin(f);var h=(EARTH_FLATTENING_SQUARED-1)*EARTH_EQUATORIAL_RADIUS_KM,l=c*c,m=d*d,n=l+EARTH_FLATTENING_SQUARED*m;g=
-Math.sqrt(n);var p=h*d*c/g-a*c+e*d;if(2E-8>Math.abs(p))break;f-=p/(h*((l-m)/g-m*l*(EARTH_FLATTENING_SQUARED-1)/(h*n))+a*d+e*c)}f*=exports.RAD2DEG;g=EARTH_EQUATORIAL_RADIUS_KM/g;a=Math.abs(d)>Math.abs(c)?a/d-EARTH_FLATTENING_SQUARED*g:e/c-g}return new Observer(f,b,1E3*a)}
+function inverse_terra(a,b){var c=a[0]*exports.KM_PER_AU,d=a[1]*exports.KM_PER_AU,e=a[2]*exports.KM_PER_AU,f=Math.hypot(c,d);if(1E-6>f)b=0,d=0<e?90:-90,e=Math.abs(e)-EARTH_POLAR_RADIUS_KM;else{for(b=exports.RAD2DEG*Math.atan2(d,c)-15*b;-180>=b;)b+=360;for(;180<b;)b-=360;d=Math.atan2(e,f);for(var g,k=0,h=0,l=Math.max(1,Math.hypot(a[0],a[1],a[2]));;){if(10<++k)throw"inverse_terra failed to converge: W="+h+", distanceAu="+l;a=Math.cos(d);c=Math.sin(d);var m=(EARTH_FLATTENING_SQUARED-1)*EARTH_EQUATORIAL_RADIUS_KM,
+n=a*a,p=c*c,q=n+EARTH_FLATTENING_SQUARED*p;g=Math.sqrt(q);h=m*c*a/g-e*a+f*c;if(Math.abs(h)<2E-8*l)break;d-=h/(m*((n-p)/g-p*n*(EARTH_FLATTENING_SQUARED-1)/(m*q))+e*c+f*a)}d*=exports.RAD2DEG;g=EARTH_EQUATORIAL_RADIUS_KM/g;e=Math.abs(c)>Math.abs(a)?e/c-EARTH_FLATTENING_SQUARED*g:f/a-g}return new Observer(d,b,1E3*e)}
 function terra(a,b){var c=a.latitude*exports.DEG2RAD,d=Math.sin(c);c=Math.cos(c);var e=1/Math.hypot(c,EARTH_FLATTENING*d),f=a.height/1E3,g=EARTH_EQUATORIAL_RADIUS_KM*e+f;b=(15*b+a.longitude)*exports.DEG2RAD;a=Math.sin(b);b=Math.cos(b);return{pos:[g*c*b/exports.KM_PER_AU,g*c*a/exports.KM_PER_AU,(EARTH_EQUATORIAL_RADIUS_KM*EARTH_FLATTENING_SQUARED*e+f)*d/exports.KM_PER_AU],vel:[-ANGVEL*g*c*a*86400/exports.KM_PER_AU,ANGVEL*g*c*b*86400/exports.KM_PER_AU,0]}}
 function nutation(a,b,c){b=nutation_rot(b,c);return rotate(b,a)}function nutation_posvel(a,b,c){b=nutation_rot(b,c);return RotateState(b,a)}
 function nutation_rot(a,b){a=e_tilt(a);var c=a.mobl*exports.DEG2RAD,d=a.tobl*exports.DEG2RAD,e=a.dpsi*ASEC2RAD;a=Math.cos(c);c=Math.sin(c);var f=Math.cos(d),g=Math.sin(d);d=Math.cos(e);var k=Math.sin(e);e=-k*a;var h=-k*c,l=k*f,m=d*a*f+c*g,n=d*c*f-a*g;k*=g;var p=d*a*g-c*f;a=d*c*g+a*f;if(b===PrecessDirection.From2000)return new RotationMatrix([[d,l,k],[e,m,p],[h,n,a]]);if(b===PrecessDirection.Into2000)return new RotationMatrix([[d,e,h],[l,m,n],[k,p,a]]);throw"Invalid precess direction";}
@@ -188,7 +188,7 @@ l:[[2.310797886226E-4,2.1402987195942,.00145009784384],[-1.828635964118E-4,4.318
 -5.6920632124E-4]]},{mu:2.82492144889909E-7,al:[-.3620341291375704,.376486233433828],a:[[.0125879701715314,0,0],[3.595204947E-6,.64965776007116,.50172168165034],[2.7580210652E-6,1.808423578151,3.1750660413359]],l:[[5.586040123824E-4,2.1404207189815,.00145009793231],[-3.805813868176E-4,2.7358844897853,2.972965062E-5],[2.205152863262E-4,.649796525964,.5017216724358],[1.877895151158E-4,1.8084787604005,3.1750660413359],[7.66916975242E-5,6.2720114319755,1.3928364636651],[7.47056855106E-5,1.2995916202344,
 1.0034433456729]],z:[[.0073755808467977,5.5836071576084,3.206509914E-5],[2.065924169942E-4,5.9209831565786,.37648624194703],[1.589869764021E-4,.28744006242623,.8782079244252],[-1.561131605348E-4,2.1257397865089,1.2727441285E-4],[1.486043380971E-4,1.4462134301023,3.5515522949802],[6.35073108731E-5,5.9096803285954,1.7693227129285],[5.99351698525E-5,4.1125517584798,-2.7985797954589],[5.40660842731E-5,5.5390350845569,.00286834082283],[-4.89596900866E-5,4.6218149483338,-.62695712529519]],zeta:[[.0038422977898495,
 2.4133922085557,0],[.0022453891791894,5.9721736773277,-3.056125525E-5],[-2.604479450559E-4,3.3368746306409,-1.2491309972E-4],[3.3211214323E-5,5.5604137742337,.00290037688507]]}],JupiterMoonsInfo=function(a,b,c,d){this.io=a;this.europa=b;this.ganymede=c;this.callisto=d};exports.JupiterMoonsInfo=JupiterMoonsInfo;
-function JupiterMoon_elem2pv(a,b,c){var d=c[0],e=c[1],f=c[2],g=c[3],k=c[4];c=c[5];var h=Math.sqrt(b/(d*d*d));b=e+f*Math.sin(e)-g*Math.cos(e);do{var l=Math.cos(b);var m=Math.sin(b);l=(e-b+f*m-g*l)/(1-f*l-g*m);b+=l}while(1E-12<=Math.abs(l));l=Math.cos(b);m=Math.sin(b);b=g*l-f*m;var n=-f*l-g*m,p=1/(1+n),r=1/(1+Math.sqrt(1-f*f-g*g));e=d*(l-f-r*g*b);b=d*(m-g+r*f*b);g=h*p*d*(-m-r*g*n);d=h*p*d*(+l+r*f*n);f=2*Math.sqrt(1-k*k-c*c);h=1-2*c*c;l=1-2*k*k;m=2*c*k;return new StateVector(e*h+b*m,e*m+b*l,(k*b-e*c)*
+function JupiterMoon_elem2pv(a,b,c){var d=c[0],e=c[1],f=c[2],g=c[3],k=c[4];c=c[5];var h=Math.sqrt(b/(d*d*d));b=e+f*Math.sin(e)-g*Math.cos(e);do{var l=Math.cos(b);var m=Math.sin(b);l=(e-b+f*m-g*l)/(1-f*l-g*m);b+=l}while(1E-12<=Math.abs(l));l=Math.cos(b);m=Math.sin(b);b=g*l-f*m;var n=-f*l-g*m,p=1/(1+n),q=1/(1+Math.sqrt(1-f*f-g*g));e=d*(l-f-q*g*b);b=d*(m-g+q*f*b);g=h*p*d*(-m-q*g*n);d=h*p*d*(+l+q*f*n);f=2*Math.sqrt(1-k*k-c*c);h=1-2*c*c;l=1-2*k*k;m=2*c*k;return new StateVector(e*h+b*m,e*m+b*l,(k*b-e*c)*
 f,g*h+d*m,g*m+d*l,(k*d-g*c)*f,a)}
 function CalcJupiterMoon(a,b){for(var c=a.tt+18262.5,d=[0,b.al[0]+c*b.al[1],0,0,0,0],e=$jscomp.makeIterator(b.a),f=e.next();!f.done;f=e.next()){var g=$jscomp.makeIterator(f.value);f=g.next().value;var k=g.next().value;g=g.next().value;d[0]+=f*Math.cos(k+c*g)}e=$jscomp.makeIterator(b.l);for(f=e.next();!f.done;f=e.next())g=$jscomp.makeIterator(f.value),f=g.next().value,k=g.next().value,g=g.next().value,d[1]+=f*Math.sin(k+c*g);d[1]%=PI2;0>d[1]&&(d[1]+=PI2);e=$jscomp.makeIterator(b.z);for(f=e.next();!f.done;f=
 e.next())g=$jscomp.makeIterator(f.value),f=g.next().value,k=g.next().value,g=g.next().value,k+=c*g,d[2]+=f*Math.cos(k),d[3]+=f*Math.sin(k);e=$jscomp.makeIterator(b.zeta);for(f=e.next();!f.done;f=e.next())g=$jscomp.makeIterator(f.value),f=g.next().value,k=g.next().value,g=g.next().value,k+=c*g,d[4]+=f*Math.cos(k),d[5]+=f*Math.sin(k);a=JupiterMoon_elem2pv(a,b.mu,d);return RotateState(Rotation_JUP_EQJ,a)}
@@ -204,8 +204,8 @@ GeoMoonState(b):GeoEmbState(b);return new StateVector(a.x+c.Sun.r.x+d.r.x,a.y+c.
 function HelioState(a,b){b=MakeTime(b);switch(a){case Body.Sun:return new StateVector(0,0,0,0,0,0,b);case Body.SSB:return a=new major_bodies_t(b.tt),new StateVector(-a.Sun.r.x,-a.Sun.r.y,-a.Sun.r.z,-a.Sun.v.x,-a.Sun.v.y,-a.Sun.v.z,b);case Body.Mercury:case Body.Venus:case Body.Earth:case Body.Mars:case Body.Jupiter:case Body.Saturn:case Body.Uranus:case Body.Neptune:return a=CalcVsopPosVel(vsop[a],b.tt),ExportState(a,b);case Body.Pluto:return CalcPluto(b,!0);case Body.Moon:case Body.EMB:var c=CalcVsopPosVel(vsop.Earth,
 b.tt);a=a==Body.Moon?GeoMoonState(b):GeoEmbState(b);return new StateVector(a.x+c.r.x,a.y+c.r.y,a.z+c.r.z,a.vx+c.v.x,a.vy+c.v.y,a.vz+c.v.z,b);default:if(UserDefinedStar(a))return a=HelioVector(a,b),new StateVector(a.x,a.y,a.z,0,0,0,b);throw'HelioState: Unsupported body "'+a+'"';}}exports.HelioState=HelioState;
 function QuadInterp(a,b,c,d,e){var f=(e+c)/2-d;c=(e-c)/2;if(0==f){if(0==c)return null;d=-d/c;if(-1>d||1<d)return null}else{d=c*c-4*f*d;if(0>=d)return null;e=Math.sqrt(d);d=(-c+e)/(2*f);e=(-c-e)/(2*f);if(-1<=d&&1>=d){if(-1<=e&&1>=e)return null}else if(-1<=e&&1>=e)d=e;else return null}return{t:a+d*b,df_dt:(2*f*d+c)/b}}
-function Search(a,b,c,d){var e=VerifyNumber(d&&d.dt_tolerance_seconds||1);e=Math.abs(e/SECONDS_PER_DAY);var f=d&&d.init_f1||a(b),g=d&&d.init_f2||a(c),k=NaN,h=0;d=d&&d.iter_limit||20;for(var l=!0;;){if(++h>d)throw"Excessive iteration in Search()";var m=InterpolateTime(b,c,.5),n=m.ut-b.ut;if(Math.abs(n)<e)return m;l?k=a(m):l=!0;var p=QuadInterp(m.ut,c.ut-m.ut,f,k,g);if(p){var r=MakeTime(p.t),q=a(r);if(0!==p.df_dt){if(Math.abs(q/p.df_dt)<e)return r;p=1.2*Math.abs(q/p.df_dt);if(p<n/10&&(n=r.AddDays(-p),
-r=r.AddDays(+p),0>(n.ut-b.ut)*(n.ut-c.ut)&&0>(r.ut-b.ut)*(r.ut-c.ut))){p=a(n);var t=a(r);if(0>p&&0<=t){f=p;g=t;b=n;c=r;k=q;l=!1;continue}}}}if(0>f&&0<=k)c=m,g=k;else if(0>k&&0<=g)b=m,f=k;else return null}}exports.Search=Search;function LongitudeOffset(a){for(;-180>=a;)a+=360;for(;180<a;)a-=360;return a}function NormalizeLongitude(a){for(;0>a;)a+=360;for(;360<=a;)a-=360;return a}
+function Search(a,b,c,d){var e=VerifyNumber(d&&d.dt_tolerance_seconds||1);e=Math.abs(e/SECONDS_PER_DAY);var f=d&&d.init_f1||a(b),g=d&&d.init_f2||a(c),k=NaN,h=0;d=d&&d.iter_limit||20;for(var l=!0;;){if(++h>d)throw"Excessive iteration in Search()";var m=InterpolateTime(b,c,.5),n=m.ut-b.ut;if(Math.abs(n)<e)return m;l?k=a(m):l=!0;var p=QuadInterp(m.ut,c.ut-m.ut,f,k,g);if(p){var q=MakeTime(p.t),r=a(q);if(0!==p.df_dt){if(Math.abs(r/p.df_dt)<e)return q;p=1.2*Math.abs(r/p.df_dt);if(p<n/10&&(n=q.AddDays(-p),
+q=q.AddDays(+p),0>(n.ut-b.ut)*(n.ut-c.ut)&&0>(q.ut-b.ut)*(q.ut-c.ut))){p=a(n);var t=a(q);if(0>p&&0<=t){f=p;g=t;b=n;c=q;k=r;l=!1;continue}}}}if(0>f&&0<=k)c=m,g=k;else if(0>k&&0<=g)b=m,f=k;else return null}}exports.Search=Search;function LongitudeOffset(a){for(;-180>=a;)a+=360;for(;180<a;)a-=360;return a}function NormalizeLongitude(a){for(;0>a;)a+=360;for(;360<=a;)a-=360;return a}
 function SearchSunLongitude(a,b,c){VerifyNumber(a);VerifyNumber(c);b=MakeTime(b);c=b.AddDays(c);return Search(function(d){d=SunPosition(d);return LongitudeOffset(d.elon-a)},b,c,{dt_tolerance_seconds:.01})}exports.SearchSunLongitude=SearchSunLongitude;
 function PairLongitude(a,b,c){if(a===Body.Earth||b===Body.Earth)throw"The Earth does not have a longitude as seen from itself.";c=MakeTime(c);a=GeoVector(a,c,!1);a=Ecliptic(a);b=GeoVector(b,c,!1);b=Ecliptic(b);return NormalizeLongitude(a.elon-b.elon)}exports.PairLongitude=PairLongitude;function AngleFromSun(a,b){if(a==Body.Earth)throw"The Earth does not have an angle as seen from itself.";var c=MakeTime(b);b=GeoVector(Body.Sun,c,!0);a=GeoVector(a,c,!0);return AngleBetween(b,a)}
 exports.AngleFromSun=AngleFromSun;function EclipticLongitude(a,b){if(a===Body.Sun)throw"Cannot calculate heliocentric longitude of the Sun.";a=HelioVector(a,b);return Ecliptic(a).elon}exports.EclipticLongitude=EclipticLongitude;
@@ -225,8 +225,8 @@ function SearchAltitude(a,b,c,d,e,f){if(!Number.isFinite(f)||-90>f||90<f)throw"I
 function FindAscent(a,b,c,d,e,f,g){if(0>f&&0<=g)return new AscentInfo(d,e,f,g);if(0<=f&&0>g)return null;if(17<a)throw"Excessive recursion in rise/set ascent search.";var k=e.ut-d.ut;if(1>k*SECONDS_PER_DAY||Math.min(Math.abs(f),Math.abs(g))>k/2*c)return null;k=new AstroTime((d.ut+e.ut)/2);var h=b(k);return FindAscent(1+a,b,c,d,k,f,h)||FindAscent(1+a,b,c,k,e,h,g)}
 function MaxAltitudeSlope(a,b){if(-90>b||90<b)throw"Invalid geographic latitude: "+b;switch(a){case Body.Moon:a=4.5;var c=8.2;break;case Body.Sun:a=.8;c=.5;break;case Body.Mercury:a=-1.6;c=1;break;case Body.Venus:a=-.8;c=.6;break;case Body.Mars:a=-.5;c=.4;break;case Body.Jupiter:case Body.Saturn:case Body.Uranus:case Body.Neptune:case Body.Pluto:a=-.2;c=.2;break;case Body.Star1:case Body.Star2:case Body.Star3:case Body.Star4:case Body.Star5:case Body.Star6:case Body.Star7:case Body.Star8:a=-.008;
 c=.008;break;default:throw"Body not allowed for altitude search: "+a;}b*=exports.DEG2RAD;return Math.abs((360/SOLAR_DAYS_PER_SIDEREAL_DAY-a)*Math.cos(b))+Math.abs(c*Math.sin(b))}
-function InternalSearchAltitude(a,b,c,d,e,f,g){function k(q){var t=Equator(a,q,b,!0,!0);q=Horizon(q,b,t.ra,t.dec).altitude+exports.RAD2DEG*Math.asin(f/t.dist);return c*(q-g)}VerifyObserver(b);VerifyNumber(e);VerifyNumber(f);VerifyNumber(g);if(-90>g||90<g)throw"Invalid target altitude angle: "+g;for(var h=MaxAltitudeSlope(a,b.latitude),l=d=MakeTime(d),m=d,n=k(l),p=n;;){0>e?(l=m.AddDays(-.42),n=k(l)):(m=l.AddDays(.42),p=k(m));var r=FindAscent(0,k,h,l,m,n,p);if(r){if(h=Search(k,r.tx,r.ty,{dt_tolerance_seconds:.1,
-init_f1:r.ax,init_f2:r.ay})){if(0>e){if(h.ut<d.ut+e)return null}else if(h.ut>d.ut+e)return null;return h}throw"Rise/set search failed after finding ascent: t1="+l+", t2="+m+", a1="+n+", a2="+p;}if(0>e){if(l.ut<d.ut+e)return null;m=l;p=n}else{if(m.ut>d.ut+e)return null;l=m;n=p}}}var HourAngleEvent=function(a,b){this.time=a;this.hor=b};exports.HourAngleEvent=HourAngleEvent;
+function InternalSearchAltitude(a,b,c,d,e,f,g){function k(r){var t=Equator(a,r,b,!0,!0);r=Horizon(r,b,t.ra,t.dec).altitude+exports.RAD2DEG*Math.asin(f/t.dist);return c*(r-g)}VerifyObserver(b);VerifyNumber(e);VerifyNumber(f);VerifyNumber(g);if(-90>g||90<g)throw"Invalid target altitude angle: "+g;for(var h=MaxAltitudeSlope(a,b.latitude),l=d=MakeTime(d),m=d,n=k(l),p=n;;){0>e?(l=m.AddDays(-.42),n=k(l)):(m=l.AddDays(.42),p=k(m));var q=FindAscent(0,k,h,l,m,n,p);if(q){if(h=Search(k,q.tx,q.ty,{dt_tolerance_seconds:.1,
+init_f1:q.ax,init_f2:q.ay})){if(0>e){if(h.ut<d.ut+e)return null}else if(h.ut>d.ut+e)return null;return h}throw"Rise/set search failed after finding ascent: t1="+l+", t2="+m+", a1="+n+", a2="+p;}if(0>e){if(l.ut<d.ut+e)return null;m=l;p=n}else{if(m.ut>d.ut+e)return null;l=m;n=p}}}var HourAngleEvent=function(a,b){this.time=a;this.hor=b};exports.HourAngleEvent=HourAngleEvent;
 function SearchHourAngle(a,b,c,d,e){e=void 0===e?1:e;VerifyObserver(b);d=MakeTime(d);var f=0;if(a===Body.Earth)throw"Cannot search for hour angle of the Earth.";VerifyNumber(c);if(0>c||24<=c)throw"Invalid hour angle "+c;VerifyNumber(e);if(0===e)throw"Direction must be positive or negative.";for(;;){++f;var g=sidereal_time(d),k=Equator(a,d,b,!0,!0);g=(c+k.ra-b.longitude/15-g)%24;1===f?0<e?0>g&&(g+=24):0<g&&(g-=24):-12>g?g+=24:12<g&&(g-=24);if(.1>3600*Math.abs(g))return a=Horizon(d,b,k.ra,k.dec,"normal"),
 new HourAngleEvent(d,a);d=d.AddDays(g/24*SOLAR_DAYS_PER_SIDEREAL_DAY)}}exports.SearchHourAngle=SearchHourAngle;function HourAngle(a,b,c){var d=MakeTime(b);b=SiderealTime(d);a=Equator(a,d,c,!0,!0);c=(c.longitude/15+b-a.ra)%24;0>c&&(c+=24);return c}exports.HourAngle=HourAngle;var SeasonInfo=function(a,b,c,d){this.mar_equinox=a;this.jun_solstice=b;this.sep_equinox=c;this.dec_solstice=d};exports.SeasonInfo=SeasonInfo;
 function Seasons(a){function b(g,k,h){k=new Date(Date.UTC(a,k-1,h));g=SearchSunLongitude(g,k,20);if(!g)throw"Cannot find season change near "+k.toISOString();return g}a instanceof Date&&Number.isFinite(a.getTime())&&(a=a.getUTCFullYear());if(!Number.isSafeInteger(a))throw"Cannot calculate seasons because year argument "+a+" is neither a Date nor a safe integer.";var c=b(0,3,10),d=b(90,6,10),e=b(180,9,10),f=b(270,12,10);return new SeasonInfo(c,d,e,f)}exports.Seasons=Seasons;
@@ -314,17 +314,17 @@ d;c=e}}exports.SearchMoonNode=SearchMoonNode;
 function NextMoonNode(a){var b=a.time.AddDays(MoonNodeStepDays);b=SearchMoonNode(b);switch(a.kind){case NodeEventKind.Ascending:if(b.kind!==NodeEventKind.Descending)throw"Internal error: previous node was ascending, but this node was: "+b.kind;break;case NodeEventKind.Descending:if(b.kind!==NodeEventKind.Ascending)throw"Internal error: previous node was descending, but this node was: "+b.kind;break;default:throw"Previous node has an invalid node kind: "+a.kind;}return b}exports.NextMoonNode=NextMoonNode;
 var AxisInfo=function(a,b,c,d){this.ra=a;this.dec=b;this.spin=c;this.north=d};exports.AxisInfo=AxisInfo;function EarthRotationAxis(a){var b=nutation([0,0,1],a,PrecessDirection.Into2000);b=precession(b,a,PrecessDirection.Into2000);b=new Vector(b[0],b[1],b[2],a);var c=EquatorFromVector(b);return new AxisInfo(c.ra,c.dec,190.41375788700253+360.9856122880876*a.ut,b)}
 function RotationAxis(a,b){b=MakeTime(b);var c=b.tt,d=c/36525;switch(a){case Body.Sun:a=286.13;var e=63.87;c=84.176+14.1844*c;break;case Body.Mercury:a=281.0103-.0328*d;e=61.4155-.0049*d;c=329.5988+6.1385108*c+.01067257*Math.sin(exports.DEG2RAD*(174.7910857+4.092335*c))-.00112309*Math.sin(exports.DEG2RAD*(349.5821714+8.18467*c))-1.104E-4*Math.sin(exports.DEG2RAD*(164.3732571+12.277005*c))-2.539E-5*Math.sin(exports.DEG2RAD*(339.1643429+16.36934*c))-5.71E-6*Math.sin(exports.DEG2RAD*(153.9554286+20.461675*
-c));break;case Body.Venus:a=272.76;e=67.16;c=160.2-1.4813688*c;break;case Body.Earth:return EarthRotationAxis(b);case Body.Moon:var f=exports.DEG2RAD*(125.045-.0529921*c),g=exports.DEG2RAD*(250.089-.1059842*c),k=exports.DEG2RAD*(260.008+13.0120009*c),h=exports.DEG2RAD*(176.625+13.3407154*c),l=exports.DEG2RAD*(357.529+.9856003*c),m=exports.DEG2RAD*(311.589+26.4057084*c),n=exports.DEG2RAD*(134.963+13.064993*c),p=exports.DEG2RAD*(276.617+.3287146*c),r=exports.DEG2RAD*(34.226+1.7484877*c),q=exports.DEG2RAD*
-(15.134-.1589763*c),t=exports.DEG2RAD*(119.743+.0036096*c),H=exports.DEG2RAD*(239.961+.1643573*c),F=exports.DEG2RAD*(25.053+12.9590088*c);a=269.9949+.0031*d-3.8787*Math.sin(f)-.1204*Math.sin(g)+.07*Math.sin(k)-.0172*Math.sin(h)+.0072*Math.sin(m)-.0052*Math.sin(q)+.0043*Math.sin(F);e=66.5392+.013*d+1.5419*Math.cos(f)+.0239*Math.cos(g)-.0278*Math.cos(k)+.0068*Math.cos(h)-.0029*Math.cos(m)+9E-4*Math.cos(n)+8E-4*Math.cos(q)-9E-4*Math.cos(F);c=38.3213+(13.17635815-1.4E-12*c)*c+3.561*Math.sin(f)+.1208*
-Math.sin(g)-.0642*Math.sin(k)+.0158*Math.sin(h)+.0252*Math.sin(l)-.0066*Math.sin(m)-.0047*Math.sin(n)-.0046*Math.sin(p)+.0028*Math.sin(r)+.0052*Math.sin(q)+.004*Math.sin(t)+.0019*Math.sin(H)-.0044*Math.sin(F);break;case Body.Mars:a=317.269202-.10927547*d+6.8E-5*Math.sin(exports.DEG2RAD*(198.991226+19139.4819985*d))+2.38E-4*Math.sin(exports.DEG2RAD*(226.292679+38280.8511281*d))+5.2E-5*Math.sin(exports.DEG2RAD*(249.663391+57420.7251593*d))+9E-6*Math.sin(exports.DEG2RAD*(266.18351+76560.636795*d))+.419057*
+c));break;case Body.Venus:a=272.76;e=67.16;c=160.2-1.4813688*c;break;case Body.Earth:return EarthRotationAxis(b);case Body.Moon:var f=exports.DEG2RAD*(125.045-.0529921*c),g=exports.DEG2RAD*(250.089-.1059842*c),k=exports.DEG2RAD*(260.008+13.0120009*c),h=exports.DEG2RAD*(176.625+13.3407154*c),l=exports.DEG2RAD*(357.529+.9856003*c),m=exports.DEG2RAD*(311.589+26.4057084*c),n=exports.DEG2RAD*(134.963+13.064993*c),p=exports.DEG2RAD*(276.617+.3287146*c),q=exports.DEG2RAD*(34.226+1.7484877*c),r=exports.DEG2RAD*
+(15.134-.1589763*c),t=exports.DEG2RAD*(119.743+.0036096*c),H=exports.DEG2RAD*(239.961+.1643573*c),F=exports.DEG2RAD*(25.053+12.9590088*c);a=269.9949+.0031*d-3.8787*Math.sin(f)-.1204*Math.sin(g)+.07*Math.sin(k)-.0172*Math.sin(h)+.0072*Math.sin(m)-.0052*Math.sin(r)+.0043*Math.sin(F);e=66.5392+.013*d+1.5419*Math.cos(f)+.0239*Math.cos(g)-.0278*Math.cos(k)+.0068*Math.cos(h)-.0029*Math.cos(m)+9E-4*Math.cos(n)+8E-4*Math.cos(r)-9E-4*Math.cos(F);c=38.3213+(13.17635815-1.4E-12*c)*c+3.561*Math.sin(f)+.1208*
+Math.sin(g)-.0642*Math.sin(k)+.0158*Math.sin(h)+.0252*Math.sin(l)-.0066*Math.sin(m)-.0047*Math.sin(n)-.0046*Math.sin(p)+.0028*Math.sin(q)+.0052*Math.sin(r)+.004*Math.sin(t)+.0019*Math.sin(H)-.0044*Math.sin(F);break;case Body.Mars:a=317.269202-.10927547*d+6.8E-5*Math.sin(exports.DEG2RAD*(198.991226+19139.4819985*d))+2.38E-4*Math.sin(exports.DEG2RAD*(226.292679+38280.8511281*d))+5.2E-5*Math.sin(exports.DEG2RAD*(249.663391+57420.7251593*d))+9E-6*Math.sin(exports.DEG2RAD*(266.18351+76560.636795*d))+.419057*
 Math.sin(exports.DEG2RAD*(79.398797+.5042615*d));e=54.432516-.05827105*d+5.1E-5*Math.cos(exports.DEG2RAD*(122.433576+19139.9407476*d))+1.41E-4*Math.cos(exports.DEG2RAD*(43.058401+38280.8753272*d))+3.1E-5*Math.cos(exports.DEG2RAD*(57.663379+57420.7517205*d))+5E-6*Math.cos(exports.DEG2RAD*(79.476401+76560.6495004*d))+1.591274*Math.cos(exports.DEG2RAD*(166.325722+.5042615*d));c=176.049863+350.891982443297*c+1.45E-4*Math.sin(exports.DEG2RAD*(129.071773+19140.0328244*d))+1.57E-4*Math.sin(exports.DEG2RAD*
 (36.352167+38281.0473591*d))+4E-5*Math.sin(exports.DEG2RAD*(56.668646+57420.929536*d))+1E-6*Math.sin(exports.DEG2RAD*(67.364003+76560.2552215*d))+1E-6*Math.sin(exports.DEG2RAD*(104.79268+95700.4387578*d))+.584542*Math.sin(exports.DEG2RAD*(95.391654+.5042615*d));break;case Body.Jupiter:e=exports.DEG2RAD*(99.360714+4850.4046*d);f=exports.DEG2RAD*(175.895369+1191.9605*d);g=exports.DEG2RAD*(300.323162+262.5475*d);k=exports.DEG2RAD*(114.012305+6070.2476*d);h=exports.DEG2RAD*(49.511251+64.3*d);a=268.056595-
 .006499*d+1.17E-4*Math.sin(e)+9.38E-4*Math.sin(f)+.001432*Math.sin(g)+3E-5*Math.sin(k)+.00215*Math.sin(h);e=64.495303+.002413*d+5E-5*Math.cos(e)+4.04E-4*Math.cos(f)+6.17E-4*Math.cos(g)-1.3E-5*Math.cos(k)+9.26E-4*Math.cos(h);c=284.95+870.536*c;break;case Body.Saturn:a=40.589-.036*d;e=83.537-.004*d;c=38.9+810.7939024*c;break;case Body.Uranus:a=257.311;e=-15.175;c=203.81-501.1600928*c;break;case Body.Neptune:d=exports.DEG2RAD*(357.85+52.316*d);a=299.36+.7*Math.sin(d);e=43.46-.51*Math.cos(d);c=249.978+
 541.1397757*c-.48*Math.sin(d);break;case Body.Pluto:a=132.993;e=-6.163;c=302.695+56.3625225*c;break;default:throw"Invalid body: "+a;}d=e*exports.DEG2RAD;f=a*exports.DEG2RAD;g=Math.cos(d);b=new Vector(g*Math.cos(f),g*Math.sin(f),Math.sin(d),b);return new AxisInfo(a/15,e,c,b)}exports.RotationAxis=RotationAxis;
 function LagrangePoint(a,b,c,d){var e=MakeTime(b);b=MassProduct(c);var f=MassProduct(d);c===Body.Earth&&d===Body.Moon?(c=new StateVector(0,0,0,0,0,0,e),d=GeoMoonState(e)):(c=HelioState(c,e),d=HelioState(d,e));return LagrangePointFast(a,c,b,d,f)}exports.LagrangePoint=LagrangePoint;
-function LagrangePointFast(a,b,c,d,e){if(1>a||5<a)throw"Invalid lagrange point "+a;if(!Number.isFinite(c)||0>=c)throw"Major mass must be a positive number.";if(!Number.isFinite(e)||0>=e)throw"Minor mass must be a negative number.";var f=d.x-b.x,g=d.y-b.y,k=d.z-b.z,h=f*f+g*g+k*k,l=Math.sqrt(h),m=d.vx-b.vx,n=d.vy-b.vy;d=d.vz-b.vz;if(4===a||5===a){h=g*d-k*n;c=k*m-f*d;var p=f*n-g*m,r=c*k-p*g;p=p*f-h*k;h=h*g-c*f;c=Math.sqrt(r*r+p*p+h*h);r/=c;p/=c;h/=c;f/=l;g/=l;k/=l;a=4==a?.8660254037844386:-.8660254037844386;
-c=.5*f+a*r;e=.5*g+a*p;var q=.5*k+a*h,t=m*f+n*g+d*k;m=m*r+n*p+d*h;b=new StateVector(l*c,l*e,l*q,t*c+m*(.5*r-a*f),t*e+m*(.5*p-a*g),t*q+m*(.5*h-a*k),b.t)}else{r=e/(c+e)*-l;p=c/(c+e)*+l;h=(c+e)/(h*l);if(1===a||2===a)q=c/(c+e)*Math.cbrt(e/(3*c)),c=-c,1==a?(q=1-q,a=+e):(q=1+q,a=-e);else if(3===a)q=(7/12*e-c)/(e+c),c=+c,a=+e;else throw"Invalid Langrage point "+a+". Must be an integer 1..5.";e=l*q-r;do q=e-r,t=e-p,q=(h*e+c/(q*q)+a/(t*t))/(h-2*c/(q*q*q)-2*a/(t*t*t)),e-=q;while(1E-14<Math.abs(q/l));q=(e-r)/
-l;b=new StateVector(q*f,q*g,q*k,q*m,q*n,q*d,b.t)}return b}exports.LagrangePointFast=LagrangePointFast;
+function LagrangePointFast(a,b,c,d,e){if(1>a||5<a)throw"Invalid lagrange point "+a;if(!Number.isFinite(c)||0>=c)throw"Major mass must be a positive number.";if(!Number.isFinite(e)||0>=e)throw"Minor mass must be a negative number.";var f=d.x-b.x,g=d.y-b.y,k=d.z-b.z,h=f*f+g*g+k*k,l=Math.sqrt(h),m=d.vx-b.vx,n=d.vy-b.vy;d=d.vz-b.vz;if(4===a||5===a){h=g*d-k*n;c=k*m-f*d;var p=f*n-g*m,q=c*k-p*g;p=p*f-h*k;h=h*g-c*f;c=Math.sqrt(q*q+p*p+h*h);q/=c;p/=c;h/=c;f/=l;g/=l;k/=l;a=4==a?.8660254037844386:-.8660254037844386;
+c=.5*f+a*q;e=.5*g+a*p;var r=.5*k+a*h,t=m*f+n*g+d*k;m=m*q+n*p+d*h;b=new StateVector(l*c,l*e,l*r,t*c+m*(.5*q-a*f),t*e+m*(.5*p-a*g),t*r+m*(.5*h-a*k),b.t)}else{q=e/(c+e)*-l;p=c/(c+e)*+l;h=(c+e)/(h*l);if(1===a||2===a)r=c/(c+e)*Math.cbrt(e/(3*c)),c=-c,1==a?(r=1-r,a=+e):(r=1+r,a=-e);else if(3===a)r=(7/12*e-c)/(e+c),c=+c,a=+e;else throw"Invalid Langrage point "+a+". Must be an integer 1..5.";e=l*r-q;do r=e-q,t=e-p,r=(h*e+c/(r*r)+a/(t*t))/(h-2*c/(r*r*r)-2*a/(t*t*t)),e-=r;while(1E-14<Math.abs(r/l));r=(e-q)/
+l;b=new StateVector(r*f,r*g,r*k,r*m,r*n,r*d,b.t)}return b}exports.LagrangePointFast=LagrangePointFast;
 var GravitySimulator=function(a,b,c){b=MakeTime(b);this.originBody=a;for(var d=$jscomp.makeIterator(c),e=d.next();!e.done;e=d.next())if(e.value.t.tt!==b.tt)throw"Inconsistent times in bodyStates";d=[];e=GravitySimulator.CalcSolarSystem(b);this.curr=new GravSimEndpoint(b,e,d);a=this.InternalBodyState(a);c=$jscomp.makeIterator(c);for(e=c.next();!e.done;e=c.next()){var f=e.value;e=new TerseVector(f.x+a.r.x,f.y+a.r.y,f.z+a.r.z);f=new TerseVector(f.vx+a.v.x,f.vy+a.v.y,f.vz+a.v.z);var g=TerseVector.zero();
 d.push(new body_grav_calc_t(b.tt,e,f,g))}this.CalcBodyAccelerations();this.prev=this.Duplicate()};
 GravitySimulator.prototype.Update=function(a){a=MakeTime(a);var b=a.tt-this.curr.time.tt;if(0===b)this.prev=this.Duplicate();else{this.Swap();this.curr.time=a;this.curr.gravitators=GravitySimulator.CalcSolarSystem(a);for(var c=0;c<this.curr.bodies.length;++c){var d=this.prev.bodies[c];this.curr.bodies[c].r=UpdatePosition(b,d.r,d.v,d.a)}this.CalcBodyAccelerations();for(c=0;c<this.curr.bodies.length;++c){d=this.prev.bodies[c];var e=this.curr.bodies[c],f=d.a.mean(e.a);e.tt=a.tt;e.r=UpdatePosition(b,
diff --git a/source/js/astronomy.ts b/source/js/astronomy.ts
index 52c0970d..6a1b8156 100644
--- a/source/js/astronomy.ts
+++ b/source/js/astronomy.ts
@@ -2108,9 +2108,12 @@ function inverse_terra(ovec: ArrayVector, st: number): Observer {
         let lat = Math.atan2(z, p);
         let cos:number, sin:number, denom:number;
         let count = 0;
+        let W = 0;
+        const distanceAu = Math.max(1, Math.hypot(ovec[0], ovec[1], ovec[2]));
         for(;;) {
-            if (++count > 10)
-                throw `inverse_terra failed to converge.`;
+            if (++count > 10) {
+                throw `inverse_terra failed to converge: W=${W}, distanceAu=${distanceAu}`;
+            }
             // Calculate the error function W(lat).
             // We try to find the root of W, meaning where the error is 0.
             cos = Math.cos(lat);
@@ -2120,8 +2123,8 @@ function inverse_terra(ovec: ArrayVector, st: number): Observer {
             const sin2 = sin*sin;
             const radicand = cos2 + EARTH_FLATTENING_SQUARED*sin2;
             denom = Math.sqrt(radicand);
-            const W = (factor*sin*cos)/denom - z*cos + p*sin;
-            if (Math.abs(W) < 2.0e-8)
+            W = (factor*sin*cos)/denom - z*cos + p*sin;
+            if (Math.abs(W) < distanceAu * 2.0e-8)
                 break;  // The error is now negligible
             // Error is still too large. Find the next estimate.
             // Calculate D = the derivative of W with respect to lat.
diff --git a/source/js/esm/astronomy.js b/source/js/esm/astronomy.js
index d095213c..2722857d 100644
--- a/source/js/esm/astronomy.js
+++ b/source/js/esm/astronomy.js
@@ -1920,9 +1920,12 @@ function inverse_terra(ovec, st) {
         let lat = Math.atan2(z, p);
         let cos, sin, denom;
         let count = 0;
+        let W = 0;
+        const distanceAu = Math.max(1, Math.hypot(ovec[0], ovec[1], ovec[2]));
         for (;;) {
-            if (++count > 10)
-                throw `inverse_terra failed to converge.`;
+            if (++count > 10) {
+                throw `inverse_terra failed to converge: W=${W}, distanceAu=${distanceAu}`;
+            }
             // Calculate the error function W(lat).
             // We try to find the root of W, meaning where the error is 0.
             cos = Math.cos(lat);
@@ -1932,8 +1935,8 @@ function inverse_terra(ovec, st) {
             const sin2 = sin * sin;
             const radicand = cos2 + EARTH_FLATTENING_SQUARED * sin2;
             denom = Math.sqrt(radicand);
-            const W = (factor * sin * cos) / denom - z * cos + p * sin;
-            if (Math.abs(W) < 2.0e-8)
+            W = (factor * sin * cos) / denom - z * cos + p * sin;
+            if (Math.abs(W) < distanceAu * 2.0e-8)
                 break; // The error is now negligible
             // Error is still too large. Find the next estimate.
             // Calculate D = the derivative of W with respect to lat.
diff --git a/source/kotlin/src/main/kotlin/io/github/cosinekitty/astronomy/astronomy.kt b/source/kotlin/src/main/kotlin/io/github/cosinekitty/astronomy/astronomy.kt
index a78fd16a..0ff7d11d 100644
--- a/source/kotlin/src/main/kotlin/io/github/cosinekitty/astronomy/astronomy.kt
+++ b/source/kotlin/src/main/kotlin/io/github/cosinekitty/astronomy/astronomy.kt
@@ -4370,6 +4370,7 @@ private fun inverseTerra(ovec: Vector): Observer {
         var s: Double
         var denom: Double
         var count = 0
+        val distanceAu = max(1.0, ovec.length())
         while (true) {
             ++count
             if (count > 10)
@@ -4384,7 +4385,7 @@ private fun inverseTerra(ovec: Vector): Observer {
             val radicand = c2 + F*s2
             denom = sqrt(radicand)
             val W = ((factor * s * c) / denom) - (z * c) + (p * s)
-            if (W.absoluteValue < 2.0e-8)
+            if (W.absoluteValue < distanceAu * 2.0e-8)
                 break  // The error is now negligible.
             // Error is still too large. Find the next estimate.
             // Calculate D = the derivative of W with respect to lat.
diff --git a/source/python/astronomy/astronomy.py b/source/python/astronomy/astronomy.py
index d20ae486..e4b922eb 100644
--- a/source/python/astronomy/astronomy.py
+++ b/source/python/astronomy/astronomy.py
@@ -1435,6 +1435,7 @@ def _inverse_terra(ovec: List[float], st: float) -> Observer:
         # Start with initial latitude estimate, based on a spherical Earth.
         lat = math.atan2(z, p)
         count = 0
+        distanceAu = max(1.0, math.hypot(ovec[0], ovec[1], ovec[2]))
         while True:
             count += 1
             if count > 10:
@@ -1449,7 +1450,7 @@ def _inverse_terra(ovec: List[float], st: float) -> Observer:
             radicand = cos2 + _EARTH_FLATTENING_SQUARED*sin2
             denom = math.sqrt(radicand)
             W = (factor*sin*cos)/denom - z*cos + p*sin
-            if abs(W) < 2.0e-8:
+            if abs(W) < distanceAu * 2.0e-8:
                 # The error is now negligible
                 break
             # Error is still too large. Find the next estimate.