找到一个简洁的库,foundyou,用于简化在Common Lisp中使用Google的地理编码API。它支持地理编码和反向地理编码,且不需要谷歌开发者密钥。可在以下示例中查看用法:

  • 地理编码

调用 foundyou:geocode 函数即可

```

CL-USER> (foundyou:geocode \"Havenkant 2a, 3000 Leuven\")

;返回结果

(15902323/312500 4700311399999/1000)

9 \"Tussen Twee Waters, Havenkant 2, 3000 Leuven, Belgium\"

```

  • 反向地理编码

使用 foundyou:reverse-geocode 函数

```

CL-USER> (foundyou:reverse-geocode 15902323/312500 47003113999)

```