[sin,0] is sin 0我想写一组规则,找出用prolog语言写的数学表达式的数值。我首先编写了一个名为"check“的函数,它检查列表是否按照我们所使用的语言以正确的方式编写:check1([L|Ls]):- number(L),check1(Ls).
check现在,我需要编写函数</em
(资料来源:https://en.wikipedia.org/wiki/Haversine_公式)d = r * acos(sin ϕ1 sin ϕ2 + cos ϕ1 cos ϕ2cos(λ2 - λ1)) @miles“公式”.
d = r * acos(cos(ϕ1 - ϕ2) + cos ϕ1 cos ϕ2 (cos(λ2 - λ1) - 1)) @Neil“公式”.不需要处理无效的纬度/经度值