Update Location.cs

This commit is contained in:
ClemensFischer 2024-03-14 18:59:11 +01:00
parent dbb9b84067
commit b9c0a6d411

View file

@ -3,6 +3,7 @@
// Licensed under the Microsoft Public License (Ms-PL)
using System;
using System.Diagnostics;
using System.Globalization;
namespace MapControl
@ -107,7 +108,8 @@ namespace MapControl
var cosLon12 = Math.Cos(lon2 - lon1);
var a = cosLat1 * sinLat2 - sinLat1 * cosLat2 * cosLon12;
var b = cosLat2 * sinLon12;
var s12 = Math.Atan2(Math.Sqrt(a * a + b * b), sinLat1 * sinLat2 + cosLat1 * cosLat2 * cosLon12);
var c = sinLat1 * sinLat2 + cosLat1 * cosLat2 * cosLon12;
var s12 = Math.Atan2(Math.Sqrt(a * a + b * b), c);
return earthRadius * s12;
}