如何在 ColdFusion 中锻炼 Haversine 公式

Question

我在 CF 中找不到 Haversine 公式的任何示例（用于计算球体上两点之间从经度和纬度的距​​离的公式）。

维基百科有其他语言的示例 (http://en.wikipedia.org/wiki/Haversine_formula)，但 CF 中没有。

CF 中的解释由另一位内部开发人员提供，未经过全面测试。我很想看看其他人是如何在 CF 中计算的。我也有兴趣就下面的示例获得如何简化的意见。

var variables.intEarthRadius = 6371;    // in km

var local.decRadius = arguments.radius / 1000;  // convert radius given in metres to kilometres

var local.latMax = arguments.latitude + degree(local.decRadius / variables.intEarthRadius);
var local.latMin = arguments.latitude - degree(local.decRadius / variables.intEarthRadius);

var local.lngMax = arguments.longitude + degree(local.decRadius / variables.intEarthRadius / cos(radian(arguments.latitude)));
var local.lngMin = arguments.longitude - degree(local.decRadius / variables.intEarthRadius / cos(radian(arguments.latitude)));





private numeric function degree(required numeric radian) hint="I convert radians to degrees." {
        return arguments.radian * 180 / pi();
    }

    private numeric function radian(required numeric degrees) hint="I convert degrees to radians."  {
        return arguments.degrees * pi() / 180;
    }

Answer 1

你看过这个吗……

http://cflib.org/udf/getHaversineDistance

（自从 CFLib.org 切换到静态站点生成器后的新 URL）