fetch correct tile from overpass not diagonally adjacent one

This commit is contained in:
Daniel Barlow 2025-06-06 21:39:31 +01:00
parent 0b22a7e538
commit f275190538

View File

@ -46,10 +46,10 @@
(fn overpass [lat lon zoom] (fn overpass [lat lon zoom]
(let [width (/ 360 (^ 2 zoom)) (let [width (/ 360 (^ 2 zoom))
n (+ lat width) ;XXX adjust for latitude n lat
w (- lon width) w lon
s lat s (- lat width)
e lon] e (+ lon width)]
(-> (->
[ [
"[out:json];" "[out:json];"