Hello, I have done a program for my phone, a program to learn vocabulary. With this program I have to add the vocabulary to a TinyDB and then the program will select the vocabulary to show me.My Issue Is (Enter your issue below):How can I find a TinyDB in my phone? Is there a way to fill of modify this DB with my computer? Can I export or import the DB? I have already looked after this created "TinyDB" by my program in the phone but I can´t find it anywhere... maybe the name is modified or it is stored under a DB path... Are you Working Under Windows or a Mac or other?
Windows version: 7
What Internet Browser are you using? Firefox version: 27.01
Which version of AppInventor are you using? MIT AI 2: How are you testing your app?
Phone , Model & Android Version: Huawei Ascend 4.1.1
Connection type: WiFi
Are you a Teacher or a Student Using App Inventor in Your School? None, I do programs by my self --
How can I find a TinyDB in my phone?
you can't find it, it is inside the app
Is there a way to fill of modify this DB with my computer?
Are you a Teacher or a Student Using App Inventor in Your School? None, I do programs by my self
why did you select the category "student to teacher" then?
--
TinyDB doesn't sit as an file in the phone. It uses Android "preferences" to create a key,value table. I think Taifun's method is giving the best advice here.
--
How can it be!!!
I thought that a DB was also made for giving information to others... importing, exporting... I am not a programmer, so maybe I am missing basic concept
--
There are different kinds of DBs. This one is local to your app. In Android you can have a Content Provider that allows to share data with other apps, but that's not the case for tinyDB.
So there are different solutions for different problems.
--
No one said database, just db. You're right, it would be presumptious to call itself a full fledged database as the rest of us know it. We humor the name because it includes the word Tiny, which sums it up well. The simplicity of TinyDB is its best feature.
I actually found that page you suggest, and startet to make it into code - but the x-part of the atan2-argument (the last), I don't know how to write with blocks..
This is what I ended up with, it seems to work - I hope someone else can benefit, from Taifun's help and my findings.. -- Do you mind sharing a screenshot of the blocks editor page ... I am trying to put together an app that points towards a particular building.
Your seem similar and your help will be appreciated. Trying to put this together and struggling to make sense at the moment ...
Calculate distance, bearing and more between Latitude/Longitude points
This page presents a variety of calculations for latitude/longitude points, with the formulæ and code fragments for implementing them.
All these formulæ are for calculations on the basis of a spherical earth (ignoring ellipsoidal effects) – which is accurate enough* for most purposes… [In fact, the earth is very slightly ellipsoidal; using a spherical model gives errors typically up to 0.3%1 – see notes for further details].
Distance
This uses the ‘haversine’ formula to calculate the great-circle distance between two points – that is, the shortest distance over the earth’s surface – giving an ‘as-the-crow-flies’ distance between the points (ignoring any hills they fly over, of course!).
Haversine
formula:
a = sin²(Δφ/2) + cos φ1 ⋅ cos φ2 ⋅ sin²(Δλ/2)
c = 2 ⋅ atan2( √a, √(1−a) )
d = R ⋅ c
where
φ is latitude, λ is longitude, R is earth’s radius (mean radius = 6,371km); note that angles need to be in radians to pass to trig functions!
JavaScript:
var R =6371e3;// metresvarφ1= lat1.toRadians();varφ2= lat2.toRadians();varΔφ=(lat2-lat1).toRadians();varΔλ=(lon2-lon1).toRadians();var a =Math.sin(Δφ/2)*Math.sin(Δφ/2)+Math.cos(φ1)*Math.cos(φ2)*Math.sin(Δλ/2)*Math.sin(Δλ/2);var c =2*Math.atan2(Math.sqrt(a),Math.sqrt(1-a));var d = R * c;
Note in these scripts, I generally use lat/lon for latitude/longitude in degrees, and φ/λ for latitude/longitude in radians – having found that mixing degrees & radians is often the easiest route to head-scratching bugs...
The haversine formula1 ‘remains particularly well-conditioned for numerical computation even at small distances’ – unlike calculations based on the spherical law of cosines. The ‘(re)versed sine’ is 1−cosθ, and the ‘half-versed-sine’ is (1−cosθ)/2 or sin²(θ/2) as used above. Once widely used by navigators, it was described by Roger Sinnott in Sky & Telescopemagazine in 1984 (“Virtues of the Haversine”): Sinnott explained that the angular separation between Mizar and Alcor in Ursa Major – 0°11′49.69″ – could be accurately calculated on a TRS-80 using the haversine.
For the curious, c is the angular distance in radians, and a is the square of half the chord length between the points.
If atan2 is not available, c could be calculated from 2 ⋅ asin( min(1, √a) ) (including protection against rounding errors).
Using Chrome on a middling Core i5 PC, a distance calculation takes around 2 – 5 microseconds (hence around 200,000 – 500,000 per second). Little to no benefit is obtained by factoring out common terms; probably the JIT compiler optimises them out.
Spherical Law of Cosines
In fact, JavaScript (and most modern computers & languages) use ‘IEEE 754’ 64-bit floating-point numbers, which provide 15 significant figures of precision. By my estimate, with this precision, the simple spherical law of cosines formula (cos c = cos a cos b + sin a sin b cos C) gives well-conditioned results down to distances as small as a few metres on the earth’s surface. (Note that the geodetic form of the law of cosines is rearranged from the canonical one so that the latitude can be used directly, rather than the colatitude).
This makes the simpler law of cosines a reasonable 1-line alternative to the haversine formula for many geodesy purposes (if not for astronomy). The choice may be driven by programming language, processor, coding context, available trig functions (in different languages), etc – and, for very small distances an equirectangular approximation may be more suitable.
Law of cosines:
d = acos( sin φ1 ⋅ sin φ2 + cos φ1 ⋅ cos φ2 ⋅ cos Δλ ) ⋅ R
JavaScript:
varφ1= lat1.toRadians(),φ2= lat2.toRadians(),Δλ=(lon2-lon1).toRadians(), R =6371e3;// gives d in metresvar d =Math.acos(Math.sin(φ1)*Math.sin(φ2)+Math.cos(φ1)*Math.cos(φ2)*Math.cos(Δλ))* R;
var x =(λ2-λ1)*Math.cos((φ1+φ2)/2);var y =(φ2-φ1);var d =Math.sqrt(x*x + y*y)* R;
This uses just one trig and one sqrt function – as against half-a-dozen trig functions for cos law, and 7 trigs + 2 sqrts for haversine. Accuracy is somewhat complex: along meridians there are no errors, otherwise they depend on distance, bearing, and latitude, but are small enough for many purposes* (and often trivial compared with the spherical approximation itself).
Alternatively, the polar coordinate flat-earth formula can be used: using the co-latitudes θ1= π/2−φ1 and θ2 = π/2−φ2, then d = R ⋅ √θ1² + θ2² − 2 ⋅ θ1 ⋅ θ2 ⋅ cos Δλ. I’ve not compared accuracy.
Baghdad to Osaka – not a constant bearing!
Bearing
In general, your current heading will vary as you follow a great circle path (orthodrome); the final heading will differ from the initial heading by varying degrees according to distance and latitude (if you were to go from say 35°N,45°E (≈ Baghdad) to 35°N,135°E (≈ Osaka), you would start on a heading of 60° and end up on a heading of 120°!).
This formula is for the initial bearing (sometimes referred to as forward azimuth) which if followed in a straight line along a great-circle arc will take you from the start point to the end point:1
Formula:
θ = atan2( sin Δλ ⋅ cos φ2 , cos φ1 ⋅ sin φ2 − sin φ1 ⋅ cos φ2 ⋅ cos Δλ )
where
φ1,λ1 is the start point, φ2,λ2 the end point (Δλ is the difference in longitude)
JavaScript:
(all angles
in radians)
var y =Math.sin(λ2-λ1)*Math.cos(φ2);var x =Math.cos(φ1)*Math.sin(φ2)-Math.sin(φ1)*Math.cos(φ2)*Math.cos(λ2-λ1);var brng =Math.atan2(y, x).toDegrees();
Excel:
(all angles
in radians)
=ATAN2(COS(lat1)*SIN(lat2)-SIN(lat1)*COS(lat2)*COS(lon2-lon1),
SIN(lon2-lon1)*COS(lat2)) *note that Excel reverses the arguments to ATAN2 – see notes below
Since atan2 returns values in the range -π ... +π (that is, -180° ... +180°), to normalise the result to a compass bearing (in the range 0° ... 360°, with −ve values transformed into the range 180° ... 360°), convert to degrees and then use (θ+360) % 360, where % is (floating point) modulo.
For final bearing, simply take the initial bearing from the end point to the start point and reverse it (using θ = (θ+180) % 360).
Midpoint
This is the half-way point along a great circle path between the two points.1
Formula:
Bx = cos φ2 ⋅ cos Δλ
By = cos φ2 ⋅ sin Δλ
φm = atan2( sin φ1 + sin φ2, √(cos φ1 + Bx)² + By² )
The longitude can be normalised to −180…+180 using (lon+540)%360-180
Just as the initial bearing may vary from the final bearing, the midpoint may not be located half-way between latitudes/longitudes; the midpoint between 35°N,45°E and 35°N,135°E is around 45°N,90°E.
Intermediate point
An intermediate point at any fraction along the great circle path between two points can also be calculated.1
Formula:
a = sin((1−f)⋅δ) / sin δ
b = sin(f⋅δ) / sin δ
x = a ⋅ cos φ1 ⋅ cos λ1 + b ⋅ cos φ2 ⋅ cos λ2
y = a ⋅ cos φ1 ⋅ sin λ1 + b ⋅ cos φ2 ⋅ sin λ2
z = a ⋅ sin φ1 + b ⋅ sin φ2
φi = atan2(z, √x² + y²)
λi = atan2(y, x)
where
f is fraction along great circle route (f=0 is point 1, f=1 is point 2), δ is the angular distance d/R between the two points.
Destination point given distance and bearing from start point
Given a start point, initial bearing, and distance, this will calculate the destination point and final bearing travelling along a (shortest distance) great circle arc.
Formula:
φ2 = asin( sin φ1 ⋅ cos δ + cos φ1 ⋅ sin δ ⋅ cos θ )
λ2 = λ1 + atan2( sin θ ⋅ sin δ ⋅ cos φ1, cos δ − sin φ1 ⋅ sin φ2 )
where
φ is latitude, λ is longitude, θ is the bearing (clockwise from north), δ is the angular distance d/R; d being the distance travelled, R the earth’s radius
The longitude can be normalised to −180…+180 using (lon+540)%360-180
Excel:
(all angles
in radians)
lat2: =ASIN(SIN(lat1)*COS(d/R) + COS(lat1)*SIN(d/R)*COS(brng))
lon2: =lon1 + ATAN2(COS(d/R)-SIN(lat1)*SIN(lat2), SIN(brng)*SIN(d/R)*COS(lat1)) * Remember that Excel reverses the arguments to ATAN2 – see notes below
For final bearing, simply take the initial bearing from the end point to the start point and reverse it with (brng+180)%360.
Intersection of two paths given start points and bearings
This is a rather more complex calculation than most others on this page, but I've been asked for it a number of times. This comes from Ed William’s aviation formulary. See below for the JavaScript.
Formula:
δ12 = 2⋅asin( √(sin²(Δφ/2) + cos φ1 ⋅ cos φ2 ⋅ sin²(Δλ/2)) )
angular dist. p1–p2
θa = acos( ( sin φ2 − sin φ1 ⋅ cos δ12 ) / ( sin δ12 ⋅ cos φ1 ) )
θb = acos( ( sin φ1 − sin φ2 ⋅ cos δ12 ) / ( sin δ12 ⋅ cos φ2 ) )
α3 = acos( −cos α1 ⋅ cos α2 + sin α1 ⋅ sin α2 ⋅ cos δ12 )
angle p1–p2–p3
δ13 = atan2( sin δ12 ⋅ sin α1 ⋅ sin α2 , cos α2 + cos α1 ⋅ cos α3 )
angular dist. p1–p3
φ3 = asin( sin φ1 ⋅ cos δ13 + cos φ1 ⋅ sin δ13 ⋅ cos θ13 )
p3 lat
Δλ13 = atan2( sin θ13 ⋅ sin δ13 ⋅ cos φ1 , cos δ13 − sin φ1 ⋅ sin φ3 )
long p1–p3
λ3 = λ1 + Δλ13
p3 long
where
φ1, λ1, θ13 : 1st start point & (initial) bearing from 1st point towards intersection point φ2, λ2, θ23 : 2nd start point & (initial) bearing from 2nd point towards intersection point φ3, λ3 : intersection point
% = (floating point) modulo
note –
if sin α1 = 0 and sin α2 = 0: infinite solutions
if sin α1 ⋅ sin α2 < 0: ambiguous solution
this formulation is not always well-conditioned for meridional or equatorial lines
This is a lot simpler using vectors rather than spherical trigonometry: see latlong-vectors.html.
Cross-track distance
Here’s a new one: I’ve sometimes been asked about distance of a point from a great-circle path (sometimes called cross track error).
Formula:
dxt = asin( sin(δ13) ⋅ sin(θ13−θ12) ) ⋅ R
where
δ13 is (angular) distance from start point to third point θ13 is (initial) bearing from start point to third point θ12 is (initial) bearing from start point to end point R is the earth’s radius
JavaScript:
var dXt =Math.asin(Math.sin(d13/R)*Math.sin(θ13-θ12))* R;
Here, the great-circle path is identified by a start point and an end point – depending on what initial data you’re working from, you can use the formulæ above to obtain the relevant distance and bearings. The sign of dxt tells you which side of the path the third point is on.
The along-track distance, from the start point to the closest point on the path to the third point, is
Formula:
dat = acos( cos(δ13) / cos(δxt) ) ⋅ R
where
δ13 is (angular) distance from start point to third point δxt is (angular) cross-track distance R is the earth’s radius
JavaScript:
var dAt =Math.acos(Math.cos(d13/R)/Math.cos(dXt/R))* R;
Closest point to the poles
And: ‘Clairaut’s formula’ will give you the maximum latitude of a great circle path, given a bearing θ and latitude φ on the great circle:
A ‘rhumb line’ (or loxodrome) is a path of constant bearing, which crosses all meridians at the same angle.
Sailors used to (and sometimes still) navigate along rhumb lines since it is easier to follow a constant compass bearing than to be continually adjusting the bearing, as is needed to follow a great circle. Rhumb lines are straight lines on a Mercator Projection map (also helpful for navigation).
Rhumb lines are generally longer than great-circle (orthodrome) routes. For instance, London to New York is 4% longer along a rhumb line than along a great circle – important for aviation fuel, but not particularly to sailing vessels. New York to Beijing – close to the most extreme example possible (though not sailable!) – is 30% longer along a rhumb line.
Key to calculations of rhumb lines is the inverse Gudermannian function¹, which gives the height on a Mercator projection map of a given latitude: ln(tanφ + secφ) or ln( tan(π/4+φ/2) ). This of course tends to infinity at the poles (in keeping with the Mercator projection). For obsessives, there is even an ellipsoidal version, the ‘isometric latitude’: ψ = ln( tan(π/4+φ/2) / [ (1−e⋅sinφ) / (1+e⋅sinφ) ]e/2), or its better-conditioned equivalent ψ = atanh(sinφ) − e⋅atanh(e⋅sinφ).
The formulæ to derive Mercator projection easting and northing coordinates from spherical latitude and longitude are then¹
E = R ⋅ λ
N = R ⋅ ln( tan(π/4 + φ/2) )
The following formulæ are from Ed Williams’ aviation formulary.¹
Distance
Since a rhumb line is a straight line on a Mercator projection, the distance between two points along a rhumb line is the length of that line (by Pythagoras); but the distortion of the projection needs to be compensated for.
On a constant latitude course (travelling east-west), this compensation is simply cosφ; in the general case, it is Δφ/Δψ where Δψ = ln( tan(π/4 + φ2/2) / tan(π/4 + φ1/2) ) (the ‘projected’ latitude difference)
Formula:
Δψ = ln( tan(π/4 + φ2/2) / tan(π/4 + φ1/2) )
(‘projected’ latitude difference)
q = Δφ/Δψ (or cosφ for E-W line)
d = √(Δφ² + q²⋅Δλ²) ⋅ R
(Pythagoras)
where
φ is latitude, λ is longitude, Δλ is taking shortest route (<180°), R is the earth’s radius, ln is natural log
JavaScript:
(all angles
in radians)
varΔψ=Math.log(Math.tan(Math.PI/4+φ2/2)/Math.tan(Math.PI/4+φ1/2));var q =Math.abs(Δψ)>10e-12?Δφ/Δψ:Math.cos(φ1);// E-W course becomes ill-conditioned with 0/0// if dLon over 180° take shorter rhumb line across the anti-meridian:if(Math.abs(Δλ)>Math.PI)Δλ=Δλ>0?-(2*Math.PI-Δλ):(2*Math.PI+Δλ);var dist =Math.sqrt(Δφ*Δφ+ q*q*Δλ*Δλ)* R;
Bearing
A rhumb line is a straight line on a Mercator projection, with an angle on the projection equal to the compass bearing.
Formula:
Δψ = ln( tan(π/4 + φ2/2) / tan(π/4 + φ1/2) )
(‘projected’ latitude difference)
θ = atan2(Δλ, Δψ)
where
φ is latitude, λ is longitude, Δλ is taking shortest route (<180°), R is the earth’s radius, ln is natural log
JavaScript:
(all angles
in radians)
varΔψ=Math.log(Math.tan(Math.PI/4+φ2/2)/Math.tan(Math.PI/4+φ1/2));// if dLon over 180° take shorter rhumb line across the anti-meridian:if(Math.abs(Δλ)>Math.PI)Δλ=Δλ>0?-(2*Math.PI-Δλ):(2*Math.PI+Δλ);var brng =Math.atan2(Δλ,Δψ).toDegrees();
Destination
Given a start point and a distance d along constant bearing θ, this will calculate the destination point. If you maintain a constant bearing along a rhumb line, you will gradually spiral in towards one of the poles.
Formula:
δ = d/R
(angular distance)
Δψ = ln( tan(π/4 + φ2/2) / tan(π/4 + φ1/2) )
(‘projected’ latitude difference)
q = Δφ/Δψ (or cos φ for E-W line)
Δλ = δ ⋅ sin θ / q
φ2 = φ1 + δ ⋅ cos θ
λ2 = λ1 + Δλ
where
φ is latitude, λ is longitude, Δλ is taking shortest route (<180°), ln is natural log, R is the earth’s radius
JavaScript:
(all angles
in radians)
varΔφ=δ*Math.cos(θ);varφ2=φ1+Δλ;varΔψ=Math.log(Math.tan(φ2/2+Math.PI/4)/Math.tan(φ1/2+Math.PI/4));var q =Math.abs(Δψ)>10e-12?Δφ/Δψ:Math.cos(φ1);// E-W course becomes ill-conditioned with 0/0varΔλ=δ*Math.sin(θ)/q;varλ2=λ1+Δλ;// check for some daft bugger going past the pole, normalise latitude if soif(Math.abs(φ2)>Math.PI/2)φ2=φ2>0?Math.PI-φ2:-Math.PI-φ2;
The longitude can be normalised to −180…+180 using (lon+540)%360-180
Mid-point
This formula for calculating the ‘loxodromic midpoint’, the point half-way along a rhumb line between two points, is due to Robert Hill and Clive Tooth1 (thx Axel!).
if(Math.abs(λ2-λ1)>Math.PI)λ1+=2*Math.PI;// crossing anti-meridianvarφ3=(φ1+φ2)/2;var f1 =Math.tan(Math.PI/4+φ1/2);var f2 =Math.tan(Math.PI/4+φ2/2);var f3 =Math.tan(Math.PI/4+φ3/2);varλ3=((λ2-λ1)*Math.log(f3)+λ1*Math.log(f2)-λ2*Math.log(f1))/Math.log(f2/f1);if(!isFinite(λ3))λ3=(λ1+λ2)/2;// parallel of latitude
The longitude can be normalised to −180…+180 using (lon+540)%360-180
Using the scripts in web pages
Using these scripts in web pages would be something like the following:
<!doctype html><htmllang="en"><head><title>Using the scripts in web pages</title><metacharset="utf-8"><scriptdefersrc="//cdn.rawgit.com/chrisveness/geodesy/v1.1.1/latlon-spherical.js"></script><scriptdefersrc="//cdn.rawgit.com/chrisveness/geodesy/v1.1.1/dms.js"></script><script>
document.addEventListener('DOMContentLoaded',function(){
document.querySelector('#calc-dist').onclick =function(){const lat1 = document.querySelector('#lat1').value;const lon1 = document.querySelector('#lon1').value;const lat2 = document.querySelector('#lat2').value;const lon2 = document.querySelector('#lon2').value;const p1 =newLatLon(Dms.parseDMS(lat1),Dms.parseDMS(lon1));const p2 =newLatLon(Dms.parseDMS(lat2),Dms.parseDMS(lon2));const dist = parseFloat(p1.distanceTo(p2).toPrecision(4));
document.querySelector('#result-distance').textContent = dist;}});</script></head><body><form>
Lat 1: <inputtype="text"name="lat1"id="lat1">
Lon 1: <inputtype="text"name="lon1"id="lon1">
Lat 2: <inputtype="text"name="lat2"id="lat2">
Lon 2: <inputtype="text"name="lon2"id="lon2"><buttontype="button"id="calc-dist">Calculate distance</button><outputid="result-distance"></output> metres
</form></body></html>
Convert between degrees-minutes-seconds & decimal degrees
Notes:
Accuracy: since the earth is not quite a sphere, there are small errors in using spherical geometry; the earth is actually roughly ellipsoidal (or more precisely, oblate spheroidal) with a radius varying between about 6,378km (equatorial) and 6,357km (polar), and local radius of curvature varying from 6,336km (equatorial meridian) to 6,399km (polar). 6,371 km is the generally accepted value for the earth’s mean radius. This means that errors from assuming spherical geometry might be up to 0.55% crossing the equator, though generally below 0.3%, depending on latitude and direction of travel (whuber explores this in excellent detail on stackexchange). An accuracy of better than 3m in 1km is mostly good enough for me, but if you want greater accuracy, you could use the Vincenty formula for calculating geodesic distances on ellipsoids, which gives results accurate to within 1mm. (Out of sheer perversity – I’ve never needed such accuracy – I looked up this formula and discovered the JavaScript implementation was simpler than I expected).
Trig functions take arguments in radians, so latitude, longitude, and bearings in degrees (either decimal or degrees/minutes/seconds) need to be converted to radians, rad = π.deg/180. When converting radians back to degrees (deg = 180.rad/π), West is negative if using signed decimal degrees. For bearings, values in the range -π to +π [-180° to +180°] need to be converted to 0 to +2π [0°–360°]; this can be done by (brng+2.π)%2.π [or brng+360)%360] where % is the (floating point) modulo operator (note that different languages implement the modulo operationin different ways).
All bearings are with respect to true north, 0°=N, 90°=E, etc; if you are working from a compass, magnetic north varies from true north in a complex way around the earth, and the difference has to be compensated for by variances indicated on local maps.
The atan2() function widely used here takes two arguments, atan2(y, x), and computes the arc tangent of the ratio y/x. It is more flexible than atan(y/x), since it handles x=0, and it also returns values in all 4 quadrants -π to +π (the atan function returns values in the range -π/2 to +π/2).
If you implement any formula involving atan2 in a spreadsheet (Microsoft Excel, LibreOffice Calc, Google Sheets, Apple Numbers), you will need to reverse the arguments, as Excel etc have them the opposite way around from JavaScript – conventional order is atan2(y, x), but Excel uses atan2(x, y). To use atan2 in a (VBA) macro, you can use WorksheetFunction.Atan2().
If you are using Google Maps, several of these functions are now provided in the Google Maps API V3 ‘spherical’ library (computeDistanceBetween(), computeHeading(), computeOffset(), interpolate(), etc; note they use a default Earth radius of 6,378,137 meters).
See below for the JavaScript source code, also available on GitHub. Note I use Greek letters in variables representing maths symbols conventionally presented as Greek letters: I value the great benefit in legibility over the minor inconvenience in typing (if you encounter any problems, ensure your <head> includes <meta charset="utf-8">).
With its untyped C-style syntax, JavaScript reads remarkably close to pseudo-code: exposing the algorithms with a minimum of syntactic distractions. These functions should be simple to translate into other languages if required, though can also be used as-is in browsers and Node.js.
I have extended the base JavaScript Number object with toRadians() and toDegrees() methods: I don’t see great likelihood of conflicts, as these are ubiquitous operations.
I also have a page illustrating the use of the spherical law of cosines for selecting points from a database within a specified bounding circle – the example is based on MySQL+PDO, but should be extensible to other DBMS platforms.
Several people have asked about example Excel spreadsheets, so I have implemented thedistance & bearing and the destination point formulæ as spreadsheets, in a form which breaks down the all stages involved to illustrate the operation.
January 2010: I have revised the scripts to be structured as methods of a LatLon object. Of course, while JavaScript is object-oriented, it is a prototype-based rather than class-basedlanguage, so this is not actually a class, but isolating code into a separate namespace is good JavaScript practice. If you’re not familiar with JavaScript syntax, LatLon.prototype.distanceTo = function(point) { ... }, for instance, defines a ‘distanceTo’ method of the LatLon object (/class) which takes a LatLon object as a parameter (and returns a number). The Dms namespace acts as a static class for geodesy formatting / parsing / conversion functions.
January 2015: I have refactored the scripts to inter-operate better, and rationalised certain aspects: the JavaScript file is now latlon-spherical.js instead of simply latlon.js; distances are now always in metres; the earth’s radius is now a parameter to distance calculation methods rather than to the constructor; the previous Geo object is now Dms, to better indicate its purpose; the destinationPoint function has the distance parameter before the bearing.
Performance: as noted above, the haversine distance calculation takes around 2 – 5 microseconds (hence around 200,000 – 500,000 per second). I have yet to complete timing tests on other calculations.
Other languages: I cannot support translations into other languages, but if you have ported the code to another language, I am happy to provide links here.
I offer these scripts for free use and adaptation to balance my debt to the open-source info-verse. You are welcome to re-use these scripts [under an MIT licence, without any warranty express or implied] provided solely that you retain my copyright notice and a link to this page.
If you would like to show your appreciation and support continued development of these scripts, I would most gratefully accept donations.
If you need any advice or development work done, I am available for consultancy.
If you have any queries or find any problems, contact me at ku.oc.epyt-elbavom@oeg-stpircs.
/* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - *//* Latitude/longitude spherical geodesy tools (c) Chris Veness 2002-2016 *//* MIT Licence *//* www.movable-type.co.uk/scripts/latlong.html *//* www.movable-type.co.uk/scripts/geodesy/docs/module-latlon-spherical.html *//* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - */'use strict';if(typeofmodule!='undefined'&&module.exports)varDms=require('./dms');// ≡ import Dms from 'dms.js'/**
* Library of geodesy functions for operations on a spherical earth model.
*
* @module latlon-spherical
* @requires dms
*//**
* Creates a LatLon point on the earth's surface at the specified latitude / longitude.
*
* @constructor
* @param {number} lat - Latitude in degrees.
* @param {number} lon - Longitude in degrees.
*
* @example
* var p1 = new LatLon(52.205, 0.119);
*/functionLatLon(lat, lon){// allow instantiation without 'new'if(!(thisinstanceofLatLon))returnnewLatLon(lat, lon);this.lat =Number(lat);this.lon =Number(lon);}/**
* Returns the distance from ‘this’ point to destination point (using haversine formula).
*
* @param {LatLon} point - Latitude/longitude of destination point.
* @param {number} [radius=6371e3] - (Mean) radius of earth (defaults to radius in metres).
* @returns {number} Distance between this point and destination point, in same units as radius.
*
* @example
* var p1 = new LatLon(52.205, 0.119);
* var p2 = new LatLon(48.857, 2.351);
* var d = p1.distanceTo(p2); // 404.3 km
*/LatLon.prototype.distanceTo =function(point, radius){if(!(point instanceofLatLon))thrownewTypeError('point is not LatLon object');
radius =(radius ===undefined)?6371e3:Number(radius);var R = radius;varφ1=this.lat.toRadians(),λ1=this.lon.toRadians();varφ2= point.lat.toRadians(),λ2= point.lon.toRadians();varΔφ=φ2-φ1;varΔλ=λ2-λ1;var a =Math.sin(Δφ/2)*Math.sin(Δφ/2)+Math.cos(φ1)*Math.cos(φ2)*Math.sin(Δλ/2)*Math.sin(Δλ/2);var c =2*Math.atan2(Math.sqrt(a),Math.sqrt(1-a));var d = R * c;return d;};/**
* Returns the (initial) bearing from ‘this’ point to destination point.
*
* @param {LatLon} point - Latitude/longitude of destination point.
* @returns {number} Initial bearing in degrees from north.
*
* @example
* var p1 = new LatLon(52.205, 0.119);
* var p2 = new LatLon(48.857, 2.351);
* var b1 = p1.bearingTo(p2); // 156.2°
*/LatLon.prototype.bearingTo =function(point){if(!(point instanceofLatLon))thrownewTypeError('point is not LatLon object');varφ1=this.lat.toRadians(),φ2= point.lat.toRadians();varΔλ=(point.lon-this.lon).toRadians();// see http://mathforum.org/library/drmath/view/55417.htmlvar y =Math.sin(Δλ)*Math.cos(φ2);var x =Math.cos(φ1)*Math.sin(φ2)-Math.sin(φ1)*Math.cos(φ2)*Math.cos(Δλ);varθ=Math.atan2(y, x);return(θ.toDegrees()+360)%360;};/**
* Returns final bearing arriving at destination destination point from ‘this’ point; the final bearing
* will differ from the initial bearing by varying degrees according to distance and latitude.
*
* @param {LatLon} point - Latitude/longitude of destination point.
* @returns {number} Final bearing in degrees from north.
*
* @example
* var p1 = new LatLon(52.205, 0.119);
* var p2 = new LatLon(48.857, 2.351);
* var b2 = p1.finalBearingTo(p2); // 157.9°
*/LatLon.prototype.finalBearingTo =function(point){if(!(point instanceofLatLon))thrownewTypeError('point is not LatLon object');// get initial bearing from destination point to this point & reverse it by adding 180°return( point.bearingTo(this)+180)%360;};/**
* Returns the midpoint between ‘this’ point and the supplied point.
*
* @param {LatLon} point - Latitude/longitude of destination point.
* @returns {LatLon} Midpoint between this point and the supplied point.
*
* @example
* var p1 = new LatLon(52.205, 0.119);
* var p2 = new LatLon(48.857, 2.351);
* var pMid = p1.midpointTo(p2); // 50.5363°N, 001.2746°E
*/LatLon.prototype.midpointTo =function(point){if(!(point instanceofLatLon))thrownewTypeError('point is not LatLon object');// φm = atan2( sinφ1 + sinφ2, √( (cosφ1 + cosφ2⋅cosΔλ) ⋅ (cosφ1 + cosφ2⋅cosΔλ) ) + cos²φ2⋅sin²Δλ )// λm = λ1 + atan2(cosφ2⋅sinΔλ, cosφ1 + cosφ2⋅cosΔλ)// see http://mathforum.org/library/drmath/view/51822.html for derivationvarφ1=this.lat.toRadians(),λ1=this.lon.toRadians();varφ2= point.lat.toRadians();varΔλ=(point.lon-this.lon).toRadians();varBx=Math.cos(φ2)*Math.cos(Δλ);varBy=Math.cos(φ2)*Math.sin(Δλ);var x =Math.sqrt((Math.cos(φ1)+Bx)*(Math.cos(φ1)+Bx)+By*By);var y =Math.sin(φ1)+Math.sin(φ2);varφ3=Math.atan2(y, x);varλ3=λ1+Math.atan2(By,Math.cos(φ1)+Bx);returnnewLatLon(φ3.toDegrees(),(λ3.toDegrees()+540)%360-180);// normalise to −180..+180°};/**
* Returns the point at given fraction between ‘this’ point and specified point.
*
* @param {LatLon} point - Latitude/longitude of destination point.
* @param {number} fraction - Fraction between the two points (0 = this point, 1 = specified point).
* @returns {LatLon} Intermediate point between this point and destination point.
*
* @example
* let p1 = new LatLon(52.205, 0.119);
* let p2 = new LatLon(48.857, 2.351);
* let pMid = p1.intermediatePointTo(p2, 0.25); // 51.3721°N, 000.7073°E
*/LatLon.prototype.intermediatePointTo =function(point, fraction){if(!(point instanceofLatLon))thrownewTypeError('point is not LatLon object');varφ1=this.lat.toRadians(),λ1=this.lon.toRadians();varφ2= point.lat.toRadians(),λ2= point.lon.toRadians();var sinφ1=Math.sin(φ1), cosφ1=Math.cos(φ1), sinλ1=Math.sin(λ1), cosλ1=Math.cos(λ1);var sinφ2=Math.sin(φ2), cosφ2=Math.cos(φ2), sinλ2=Math.sin(λ2), cosλ2=Math.cos(λ2);// distance between pointsvarΔφ=φ2-φ1;varΔλ=λ2-λ1;var a =Math.sin(Δφ/2)*Math.sin(Δφ/2)+Math.cos(φ1)*Math.cos(φ2)*Math.sin(Δλ/2)*Math.sin(Δλ/2);varδ=2*Math.atan2(Math.sqrt(a),Math.sqrt(1-a));var A =Math.sin((1-fraction)*δ)/Math.sin(δ);var B =Math.sin(fraction*δ)/Math.sin(δ);var x = A * cosφ1* cosλ1+ B * cosφ2* cosλ2;var y = A * cosφ1* sinλ1+ B * cosφ2* sinλ2;var z = A * sinφ1+ B * sinφ2;varφ3=Math.atan2(z,Math.sqrt(x*x + y*y));varλ3=Math.atan2(y, x);returnnewLatLon(φ3.toDegrees(),(λ3.toDegrees()+540)%360-180);// normalise lon to −180..+180°};/**
* Returns the destination point from ‘this’ point having travelled the given distance on the
* given initial bearing (bearing normally varies around path followed).
*
* @param {number} distance - Distance travelled, in same units as earth radius (default: metres).
* @param {number} bearing - Initial bearing in degrees from north.
* @param {number} [radius=6371e3] - (Mean) radius of earth (defaults to radius in metres).
* @returns {LatLon} Destination point.
*
* @example
* var p1 = new LatLon(51.4778, -0.0015);
* var p2 = p1.destinationPoint(7794, 300.7); // 51.5135°N, 000.0983°W
*/LatLon.prototype.destinationPoint =function(distance, bearing, radius){
radius =(radius ===undefined)?6371e3:Number(radius);// sinφ2 = sinφ1⋅cosδ + cosφ1⋅sinδ⋅cosθ// tanΔλ = sinθ⋅sinδ⋅cosφ1 / cosδ−sinφ1⋅sinφ2// see http://williams.best.vwh.net/avform.htm#LLvarδ=Number(distance)/ radius;// angular distance in radiansvarθ=Number(bearing).toRadians();varφ1=this.lat.toRadians();varλ1=this.lon.toRadians();var sinφ1=Math.sin(φ1), cosφ1=Math.cos(φ1);var sinδ=Math.sin(δ), cosδ=Math.cos(δ);var sinθ=Math.sin(θ), cosθ=Math.cos(θ);var sinφ2= sinφ1*cosδ+ cosφ1*sinδ*cosθ;varφ2=Math.asin(sinφ2);var y = sinθ* sinδ* cosφ1;var x = cosδ- sinφ1* sinφ2;varλ2=λ1+Math.atan2(y, x);returnnewLatLon(φ2.toDegrees(),(λ2.toDegrees()+540)%360-180);// normalise to −180..+180°};/**
* Returns the point of intersection of two paths defined by point and bearing.
*
* @param {LatLon} p1 - First point.
* @param {number} brng1 - Initial bearing from first point.
* @param {LatLon} p2 - Second point.
* @param {number} brng2 - Initial bearing from second point.
* @returns {LatLon|null} Destination point (null if no unique intersection defined).
*
* @example
* var p1 = LatLon(51.8853, 0.2545), brng1 = 108.547;
* var p2 = LatLon(49.0034, 2.5735), brng2 = 32.435;
* var pInt = LatLon.intersection(p1, brng1, p2, brng2); // 50.9078°N, 004.5084°E
*/LatLon.intersection =function(p1, brng1, p2, brng2){if(!(p1 instanceofLatLon))thrownewTypeError('p1 is not LatLon object');if(!(p2 instanceofLatLon))thrownewTypeError('p2 is not LatLon object');// see http://williams.best.vwh.net/avform.htm#Intersectionvarφ1= p1.lat.toRadians(),λ1= p1.lon.toRadians();varφ2= p2.lat.toRadians(),λ2= p2.lon.toRadians();varθ13=Number(brng1).toRadians(),θ23=Number(brng2).toRadians();varΔφ=φ2-φ1,Δλ=λ2-λ1;varδ12=2*Math.asin(Math.sqrt(Math.sin(Δφ/2)*Math.sin(Δφ/2)+Math.cos(φ1)*Math.cos(φ2)*Math.sin(Δλ/2)*Math.sin(Δλ/2)));if(δ12==0)returnnull;// initial/final bearings between pointsvarθa =Math.acos((Math.sin(φ2)-Math.sin(φ1)*Math.cos(δ12))/(Math.sin(δ12)*Math.cos(φ1)));if(isNaN(θa))θa =0;// protect against roundingvarθb =Math.acos((Math.sin(φ1)-Math.sin(φ2)*Math.cos(δ12))/(Math.sin(δ12)*Math.cos(φ2)));varθ12=Math.sin(λ2-λ1)>0?θa :2*Math.PI-θa;varθ21=Math.sin(λ2-λ1)>0?2*Math.PI-θb :θb;varα1=(θ13-θ12+Math.PI)%(2*Math.PI)-Math.PI;// angle 2-1-3varα2=(θ21-θ23+Math.PI)%(2*Math.PI)-Math.PI;// angle 1-2-3if(Math.sin(α1)==0&&Math.sin(α2)==0)returnnull;// infinite intersectionsif(Math.sin(α1)*Math.sin(α2)<0)returnnull;// ambiguous intersection//α1 = Math.abs(α1);//α2 = Math.abs(α2);// ... Ed Williams takes abs of α1/α2, but seems to break calculation?varα3=Math.acos(-Math.cos(α1)*Math.cos(α2)+Math.sin(α1)*Math.sin(α2)*Math.cos(δ12));varδ13=Math.atan2(Math.sin(δ12)*Math.sin(α1)*Math.sin(α2),Math.cos(α2)+Math.cos(α1)*Math.cos(α3));varφ3=Math.asin(Math.sin(φ1)*Math.cos(δ13)+Math.cos(φ1)*Math.sin(δ13)*Math.cos(θ13));varΔλ13=Math.atan2(Math.sin(θ13)*Math.sin(δ13)*Math.cos(φ1),Math.cos(δ13)-Math.sin(φ1)*Math.sin(φ3));varλ3=λ1+Δλ13;returnnewLatLon(φ3.toDegrees(),(λ3.toDegrees()+540)%360-180);// normalise to −180..+180°};/**
* Returns (signed) distance from ‘this’ point to great circle defined by start-point and end-point.
*
* @param {LatLon} pathStart - Start point of great circle path.
* @param {LatLon} pathEnd - End point of great circle path.
* @param {number} [radius=6371e3] - (Mean) radius of earth (defaults to radius in metres).
* @returns {number} Distance to great circle (-ve if to left, +ve if to right of path).
*
* @example
* var pCurrent = new LatLon(53.2611, -0.7972);
* var p1 = new LatLon(53.3206, -1.7297);
* var p2 = new LatLon(53.1887, 0.1334);
* var d = pCurrent.crossTrackDistanceTo(p1, p2); // -307.5 m
*/LatLon.prototype.crossTrackDistanceTo =function(pathStart, pathEnd, radius){if(!(pathStart instanceofLatLon))thrownewTypeError('pathStart is not LatLon object');if(!(pathEnd instanceofLatLon))thrownewTypeError('pathEnd is not LatLon object');
radius =(radius ===undefined)?6371e3:Number(radius);varδ13= pathStart.distanceTo(this, radius)/radius;varθ13= pathStart.bearingTo(this).toRadians();varθ12= pathStart.bearingTo(pathEnd).toRadians();var dxt =Math.asin(Math.sin(δ13)*Math.sin(θ13-θ12))* radius;return dxt;};/**
* Returns maximum latitude reached when travelling on a great circle on given bearing from this
* point ('Clairaut's formula'). Negate the result for the minimum latitude (in the Southern
* hemisphere).
*
* The maximum latitude is independent of longitude; it will be the same for all points on a given
* latitude.
*
* @param {number} bearing - Initial bearing.
* @param {number} latitude - Starting latitude.
*/LatLon.prototype.maxLatitude =function(bearing){varθ=Number(bearing).toRadians();varφ=this.lat.toRadians();varφMax=Math.acos(Math.abs(Math.sin(θ)*Math.cos(φ)));returnφMax.toDegrees();};/**
* Returns the pair of meridians at which a great circle defined by two points crosses the given
* latitude. If the great circle doesn't reach the given latitude, null is returned.
*
* @param {LatLon} point1 - First point defining great circle.
* @param {LatLon} point2 - Second point defining great circle.
* @param {number} latitude - Latitude crossings are to be determined for.
* @returns {Object|null} Object containing { lon1, lon2 } or null if given latitude not reached.
*/LatLon.crossingParallels =function(point1, point2, latitude){varφ=Number(latitude).toRadians();varφ1= point1.lat.toRadians();varλ1= point1.lon.toRadians();varφ2= point2.lat.toRadians();varλ2= point2.lon.toRadians();varΔλ=λ2-λ1;var x =Math.sin(φ1)*Math.cos(φ2)*Math.cos(φ)*Math.sin(Δλ);var y =Math.sin(φ1)*Math.cos(φ2)*Math.cos(φ)*Math.cos(Δλ)-Math.cos(φ1)*Math.sin(φ2)*Math.cos(φ);var z =Math.cos(φ1)*Math.cos(φ2)*Math.sin(φ)*Math.sin(Δλ);if(z*z > x*x + y*y)returnnull;// great circle doesn't reach latitudevarλm =Math.atan2(-y, x);// longitude at max latitudevarΔλi =Math.acos(z /Math.sqrt(x*x+y*y));// Δλ from λm to intersection pointsvarλi1 =λ1+λm -Δλi;varλi2 =λ1+λm +Δλi;return{ lon1:(λi1.toDegrees()+540)%360-180, lon2:(λi2.toDegrees()+540)%360-180};// normalise to −180..+180°};/* Rhumb - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - *//**
* Returns the distance travelling from ‘this’ point to destination point along a rhumb line.
*
* @param {LatLon} point - Latitude/longitude of destination point.
* @param {number} [radius=6371e3] - (Mean) radius of earth (defaults to radius in metres).
* @returns {number} Distance in km between this point and destination point (same units as radius).
*
* @example
* var p1 = new LatLon(51.127, 1.338);
* var p2 = new LatLon(50.964, 1.853);
* var d = p1.distanceTo(p2); // 40.31 km
*/LatLon.prototype.rhumbDistanceTo =function(point, radius){if(!(point instanceofLatLon))thrownewTypeError('point is not LatLon object');
radius =(radius ===undefined)?6371e3:Number(radius);// see http://williams.best.vwh.net/avform.htm#Rhumbvar R = radius;varφ1=this.lat.toRadians(),φ2= point.lat.toRadians();varΔφ=φ2-φ1;varΔλ=Math.abs(point.lon-this.lon).toRadians();// if dLon over 180° take shorter rhumb line across the anti-meridian:if(Math.abs(Δλ)>Math.PI)Δλ=Δλ>0?-(2*Math.PI-Δλ):(2*Math.PI+Δλ);// on Mercator projection, longitude distances shrink by latitude; q is the 'stretch factor'// q becomes ill-conditioned along E-W line (0/0); use empirical tolerance to avoid itvarΔψ=Math.log(Math.tan(φ2/2+Math.PI/4)/Math.tan(φ1/2+Math.PI/4));var q =Math.abs(Δψ)>10e-12?Δφ/Δψ:Math.cos(φ1);// distance is pythagoras on 'stretched' Mercator projectionvarδ=Math.sqrt(Δφ*Δφ+ q*q*Δλ*Δλ);// angular distance in radiansvar dist =δ* R;return dist;};/**
* Returns the bearing from ‘this’ point to destination point along a rhumb line.
*
* @param {LatLon} point - Latitude/longitude of destination point.
* @returns {number} Bearing in degrees from north.
*
* @example
* var p1 = new LatLon(51.127, 1.338);
* var p2 = new LatLon(50.964, 1.853);
* var d = p1.rhumbBearingTo(p2); // 116.7 m
*/LatLon.prototype.rhumbBearingTo =function(point){if(!(point instanceofLatLon))thrownewTypeError('point is not LatLon object');varφ1=this.lat.toRadians(),φ2= point.lat.toRadians();varΔλ=(point.lon-this.lon).toRadians();// if dLon over 180° take shorter rhumb line across the anti-meridian:if(Math.abs(Δλ)>Math.PI)Δλ=Δλ>0?-(2*Math.PI-Δλ):(2*Math.PI+Δλ);varΔψ=Math.log(Math.tan(φ2/2+Math.PI/4)/Math.tan(φ1/2+Math.PI/4));varθ=Math.atan2(Δλ,Δψ);return(θ.toDegrees()+360)%360;};/**
* Returns the destination point having travelled along a rhumb line from ‘this’ point the given
* distance on the given bearing.
*
* @param {number} distance - Distance travelled, in same units as earth radius (default: metres).
* @param {number} bearing - Bearing in degrees from north.
* @param {number} [radius=6371e3] - (Mean) radius of earth (defaults to radius in metres).
* @returns {LatLon} Destination point.
*
* @example
* var p1 = new LatLon(51.127, 1.338);
* var p2 = p1.rhumbDestinationPoint(40300, 116.7); // 50.9642°N, 001.8530°E
*/LatLon.prototype.rhumbDestinationPoint =function(distance, bearing, radius){
radius =(radius ===undefined)?6371e3:Number(radius);varδ=Number(distance)/ radius;// angular distance in radiansvarφ1=this.lat.toRadians(),λ1=this.lon.toRadians();varθ=Number(bearing).toRadians();varΔφ=δ*Math.cos(θ);varφ2=φ1+Δφ;// check for some daft bugger going past the pole, normalise latitude if soif(Math.abs(φ2)>Math.PI/2)φ2=φ2>0?Math.PI-φ2:-Math.PI-φ2;varΔψ=Math.log(Math.tan(φ2/2+Math.PI/4)/Math.tan(φ1/2+Math.PI/4));var q =Math.abs(Δψ)>10e-12?Δφ/Δψ:Math.cos(φ1);// E-W course becomes ill-conditioned with 0/0varΔλ=δ*Math.sin(θ)/q;varλ2=λ1+Δλ;returnnewLatLon(φ2.toDegrees(),(λ2.toDegrees()+540)%360-180);// normalise to −180..+180°};/**
* Returns the loxodromic midpoint (along a rhumb line) between ‘this’ point and second point.
*
* @param {LatLon} point - Latitude/longitude of second point.
* @returns {LatLon} Midpoint between this point and second point.
*
* @example
* var p1 = new LatLon(51.127, 1.338);
* var p2 = new LatLon(50.964, 1.853);
* var pMid = p1.rhumbMidpointTo(p2); // 51.0455°N, 001.5957°E
*/LatLon.prototype.rhumbMidpointTo =function(point){if(!(point instanceofLatLon))thrownewTypeError('point is not LatLon object');// http://mathforum.org/kb/message.jspa?messageID=148837varφ1=this.lat.toRadians(),λ1=this.lon.toRadians();varφ2= point.lat.toRadians(),λ2= point.lon.toRadians();if(Math.abs(λ2-λ1)>Math.PI)λ1+=2*Math.PI;// crossing anti-meridianvarφ3=(φ1+φ2)/2;var f1 =Math.tan(Math.PI/4+φ1/2);var f2 =Math.tan(Math.PI/4+φ2/2);var f3 =Math.tan(Math.PI/4+φ3/2);varλ3=((λ2-λ1)*Math.log(f3)+λ1*Math.log(f2)-λ2*Math.log(f1))/Math.log(f2/f1);if(!isFinite(λ3))λ3=(λ1+λ2)/2;// parallel of latitudevar p =LatLon(φ3.toDegrees(),(λ3.toDegrees()+540)%360-180);// normalise to −180..+180°return p;};/* Area - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - *//**
* Calculates the area of a spherical polygon where the sides of the polygon are great circle
* arcs joining the vertices.
*
* @param {LatLon[]} polygon - Array of points defining vertices of the polygon
* @param {number} [radius=6371e3] - (Mean) radius of earth (defaults to radius in metres).
* @returns {number} The area of the polygon, in the same units as radius.
*
* @example
* var polygon = [new LatLon(0,0), new LatLon(1,0), new LatLon(0,1)];
* var area = LatLon.areaOf(polygon); // 6.18e9 m²
*/LatLon.areaOf =function(polygon, radius){// uses method due to Karney: osgeo-org.1560.x6.nabble.com/Area-of-a-spherical-polygon-td3841625.html;// for each edge of the polygon, tan(E/2) = tan(Δλ/2)·(tan(φ1/2) + tan(φ2/2)) / (1 + tan(φ1/2)·tan(φ2/2))// where E is the spherical excess of the trapezium obtained by extending the edge to the equatorvar R =(radius ===undefined)?6371e3:Number(radius);// close polygon so that last point equals first pointvar closed = polygon[0].equals(polygon[polygon.length-1]);if(!closed) polygon.push(polygon[0]);var nVertices = polygon.length -1;var S =0;// spherical excess in steradiansfor(var v=0; v<nVertices; v++){varφ1= polygon[v].lat.toRadians();varφ2= polygon[v+1].lat.toRadians();varΔλ=(polygon[v+1].lon - polygon[v].lon).toRadians();var E =2*Math.atan2(Math.tan(Δλ/2)*(Math.tan(φ1/2)+Math.tan(φ2/2)),1+Math.tan(φ1/2)*Math.tan(φ2/2));
S += E;}if(isPoleEnclosedBy(polygon)) S =Math.abs(S)-2*Math.PI;var A =Math.abs(S * R*R);// area in units of Rif(!closed) polygon.pop();// restore polygon to pristine conditionreturn A;// returns whether polygon encloses pole: sum of course deltas around pole is 0° rather than// normal ±360°: blog.element84.com/determining-if-a-spherical-polygon-contains-a-pole.htmlfunction isPoleEnclosedBy(polygon){// TODO: any better test than this?varΣΔ=0;var prevBrng = polygon[0].bearingTo(polygon[1]);for(var v=0; v<polygon.length-1; v++){var initBrng = polygon[v].bearingTo(polygon[v+1]);var finalBrng = polygon[v].finalBearingTo(polygon[v+1]);ΣΔ+=(initBrng - prevBrng +540)%360-180;ΣΔ+=(finalBrng - initBrng +540)%360-180;
prevBrng = finalBrng;}var initBrng = polygon[0].bearingTo(polygon[1]);ΣΔ+=(initBrng - prevBrng +540)%360-180;var enclosed =Math.abs(ΣΔ)<90;// 0°-ishreturn enclosed;}};/* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - *//**
* Checks if another point is equal to ‘this’ point.
*
* @param {LatLon} point - Point to be compared against this point.
* @returns {bool} True if points are identical.
*
* @example
* var p1 = new LatLon(52.205, 0.119);
* var p2 = new LatLon(52.205, 0.119);
* var equal = p1.equals(p2); // true
*/LatLon.prototype.equals =function(point){if(!(point instanceofLatLon))thrownewTypeError('point is not LatLon object');if(this.lat != point.lat)returnfalse;if(this.lon != point.lon)returnfalse;returntrue;};/**
* Returns a string representation of ‘this’ point, formatted as degrees, degrees+minutes, or
* degrees+minutes+seconds.
*
* @param {string} [format=dms] - Format point as 'd', 'dm', 'dms'.
* @param {number} [dp=0|2|4] - Number of decimal places to use - default 0 for dms, 2 for dm, 4 for d.
* @returns {string} Comma-separated latitude/longitude.
*/LatLon.prototype.toString =function(format, dp){returnDms.toLat(this.lat, format, dp)+', '+Dms.toLon(this.lon, format, dp);};/* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - *//** Extend Number object with method to convert numeric degrees to radians */if(Number.prototype.toRadians ===undefined){Number.prototype.toRadians =function(){returnthis*Math.PI /180;};}/** Extend Number object with method to convert radians to numeric (signed) degrees */if(Number.prototype.toDegrees ===undefined){Number.prototype.toDegrees =function(){returnthis*180/Math.PI;};}/* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - */if(typeofmodule!='undefined'&&module.exports)module.exports =LatLon;// ≡ export default LatLon
/* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - *//* Geodesy representation conversion functions (c) Chris Veness 2002-2016 *//* MIT Licence *//* www.movable-type.co.uk/scripts/latlong.html *//* www.movable-type.co.uk/scripts/geodesy/docs/module-dms.html *//* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - */'use strict';/* eslint no-irregular-whitespace: [2, { skipComments: true }] *//**
* Latitude/longitude points may be represented as decimal degrees, or subdivided into sexagesimal
* minutes and seconds.
*
* @module dms
*//**
* Functions for parsing and representing degrees / minutes / seconds.
* @class Dms
*/varDms={};// note Unicode Degree = U+00B0. Prime = U+2032, Double prime = U+2033/**
* Parses string representing degrees/minutes/seconds into numeric degrees.
*
* This is very flexible on formats, allowing signed decimal degrees, or deg-min-sec optionally
* suffixed by compass direction (NSEW). A variety of separators are accepted (eg 3° 37′ 09″W).
* Seconds and minutes may be omitted.
*
* @param {string|number} dmsStr - Degrees or deg/min/sec in variety of formats.
* @returns {number} Degrees as decimal number.
*
* @example
* var lat = Dms.parseDMS('51° 28′ 40.12″ N');
* var lon = Dms.parseDMS('000° 00′ 05.31″ W');
* var p1 = new LatLon(lat, lon); // 51.4778°N, 000.0015°W
*/Dms.parseDMS =function(dmsStr){// check for signed decimal degrees without NSEW, if so return it directlyif(typeof dmsStr =='number'&& isFinite(dmsStr))returnNumber(dmsStr);// strip off any sign or compass dir'n & split out separate d/m/svar dms =String(dmsStr).trim().replace(/^-/,'').replace(/[NSEW]$/i,'').split(/[^0-9.,]+/);if(dms[dms.length-1]=='') dms.splice(dms.length-1);// from trailing symbolif(dms =='')returnNaN;// and convert to decimal degrees...var deg;switch(dms.length){case3:// interpret 3-part result as d/m/s
deg = dms[0]/1+ dms[1]/60+ dms[2]/3600;break;case2:// interpret 2-part result as d/m
deg = dms[0]/1+ dms[1]/60;break;case1:// just d (possibly decimal) or non-separated dddmmss
deg = dms[0];// check for fixed-width unseparated format eg 0033709W//if (/[NS]/i.test(dmsStr)) deg = '0' + deg; // - normalise N/S to 3-digit degrees//if (/[0-9]{7}/.test(deg)) deg = deg.slice(0,3)/1 + deg.slice(3,5)/60 + deg.slice(5)/3600;break;default:returnNaN;}if(/^-|[WS]$/i.test(dmsStr.trim())) deg =-deg;// take '-', west and south as -vereturnNumber(deg);};/**
* Separator character to be used to separate degrees, minutes, seconds, and cardinal directions.
*
* Set to '\u202f' (narrow no-break space) for improved formatting.
*
* @example
* var p = new LatLon(51.2, 0.33); // 51°12′00.0″N, 000°19′48.0″E
* Dms.separator = '\u202f'; // narrow no-break space
* var pʹ = new LatLon(51.2, 0.33); // 51° 12′ 00.0″ N, 000° 19′ 48.0″ E
*/Dms.separator ='';/**
* Converts decimal degrees to deg/min/sec format
* - degree, prime, double-prime symbols are added, but sign is discarded, though no compass
* direction is added.
*
* @private
* @param {number} deg - Degrees to be formatted as specified.
* @param {string} [format=dms] - Return value as 'd', 'dm', 'dms' for deg, deg+min, deg+min+sec.
* @param {number} [dp=0|2|4] - Number of decimal places to use – default 0 for dms, 2 for dm, 4 for d.
* @returns {string} Degrees formatted as deg/min/secs according to specified format.
*/Dms.toDMS =function(deg, format, dp){if(isNaN(deg))returnnull;// give up here if we can't make a number from deg// default valuesif(format ===undefined) format ='dms';if(dp ===undefined){switch(format){case'd':case'deg': dp =4;break;case'dm':case'deg+min': dp =2;break;case'dms':case'deg+min+sec': dp =0;break;default: format ='dms'; dp =0;// be forgiving on invalid format}}
deg =Math.abs(deg);// (unsigned result ready for appending compass dir'n)var dms, d, m, s;switch(format){default:// invalid format spec!case'd':case'deg':
d = deg.toFixed(dp);// round degreesif(d<100) d ='0'+ d;// pad with leading zerosif(d<10) d ='0'+ d;
dms = d +'°';break;case'dm':case'deg+min':var min =(deg*60).toFixed(dp);// convert degrees to minutes & round
d =Math.floor(min /60);// get component deg/min
m =(min %60).toFixed(dp);// pad with trailing zerosif(d<100) d ='0'+ d;// pad with leading zerosif(d<10) d ='0'+ d;if(m<10) m ='0'+ m;
dms = d +'°'+Dms.separator + m +'′';break;case'dms':case'deg+min+sec':var sec =(deg*3600).toFixed(dp);// convert degrees to seconds & round
d =Math.floor(sec /3600);// get component deg/min/sec
m =Math.floor(sec/60)%60;
s =(sec %60).toFixed(dp);// pad with trailing zerosif(d<100) d ='0'+ d;// pad with leading zerosif(d<10) d ='0'+ d;if(m<10) m ='0'+ m;if(s<10) s ='0'+ s;
dms = d +'°'+Dms.separator + m +'′'+Dms.separator + s +'″';break;}return dms;};/**
* Converts numeric degrees to deg/min/sec latitude (2-digit degrees, suffixed with N/S).
*
* @param {number} deg - Degrees to be formatted as specified.
* @param {string} [format=dms] - Return value as 'd', 'dm', 'dms' for deg, deg+min, deg+min+sec.
* @param {number} [dp=0|2|4] - Number of decimal places to use – default 0 for dms, 2 for dm, 4 for d.
* @returns {string} Degrees formatted as deg/min/secs according to specified format.
*/Dms.toLat =function(deg, format, dp){var lat =Dms.toDMS(deg, format, dp);return lat===null?'–': lat.slice(1)+Dms.separator +(deg<0?'S':'N');// knock off initial '0' for lat!};/**
* Convert numeric degrees to deg/min/sec longitude (3-digit degrees, suffixed with E/W)
*
* @param {number} deg - Degrees to be formatted as specified.
* @param {string} [format=dms] - Return value as 'd', 'dm', 'dms' for deg, deg+min, deg+min+sec.
* @param {number} [dp=0|2|4] - Number of decimal places to use – default 0 for dms, 2 for dm, 4 for d.
* @returns {string} Degrees formatted as deg/min/secs according to specified format.
*/Dms.toLon =function(deg, format, dp){var lon =Dms.toDMS(deg, format, dp);return lon===null?'–': lon+Dms.separator +(deg<0?'W':'E');};/**
* Converts numeric degrees to deg/min/sec as a bearing (0°..360°)
*
* @param {number} deg - Degrees to be formatted as specified.
* @param {string} [format=dms] - Return value as 'd', 'dm', 'dms' for deg, deg+min, deg+min+sec.
* @param {number} [dp=0|2|4] - Number of decimal places to use – default 0 for dms, 2 for dm, 4 for d.
* @returns {string} Degrees formatted as deg/min/secs according to specified format.
*/Dms.toBrng =function(deg, format, dp){
deg =(Number(deg)+360)%360;// normalise -ve values to 180°..360°var brng =Dms.toDMS(deg, format, dp);return brng===null?'–': brng.replace('360','0');// just in case rounding took us up to 360°!};/**
* Returns compass point (to given precision) for supplied bearing.
*
* @param {number} bearing - Bearing in degrees from north.
* @param {number} [precision=3] - Precision (1:cardinal / 2:intercardinal / 3:secondary-intercardinal).
* @returns {string} Compass point for supplied bearing.
*
* @example
* var point = Dms.compassPoint(24); // point = 'NNE'
* var point = Dms.compassPoint(24, 1); // point = 'N'
*/Dms.compassPoint =function(bearing, precision){if(precision ===undefined) precision =3;// note precision = max length of compass point; it could be extended to 4 for quarter-winds// (eg NEbN), but I think they are little used
bearing =((bearing%360)+360)%360;// normalise to 0..360var point;switch(precision){case1:// 4 compass pointsswitch(Math.round(bearing*4/360)%4){case0: point ='N';break;case1: point ='E';break;case2: point ='S';break;case3: point ='W';break;}break;case2:// 8 compass pointsswitch(Math.round(bearing*8/360)%8){case0: point ='N';break;case1: point ='NE';break;case2: point ='E';break;case3: point ='SE';break;case4: point ='S';break;case5: point ='SW';break;case6: point ='W';break;case7: point ='NW';break;}break;case3:// 16 compass pointsswitch(Math.round(bearing*16/360)%16){case0: point ='N';break;case1: point ='NNE';break;case2: point ='NE';break;case3: point ='ENE';break;case4: point ='E';break;case5: point ='ESE';break;case6: point ='SE';break;case7: point ='SSE';break;case8: point ='S';break;case9: point ='SSW';break;case10: point ='SW';break;case11: point ='WSW';break;case12: point ='W';break;case13: point ='WNW';break;case14: point ='NW';break;case15: point ='NNW';break;}break;default:thrownewRangeError('Precision must be between 1 and 3');}return point;};/* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - *//** Polyfill String.trim for old browsers
* (q.v. blog.stevenlevithan.com/archives/faster-trim-javascript) */if(String.prototype.trim ===undefined){String.prototype.trim =function(){returnString(this).replace(/^\s\s*/,'').replace(/\s\s*$/,'');};}/* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - */if(typeofmodule!='undefined'&&module.exports)module.exports =Dms;// ≡ export default Dms
