nearest = n items distance ->
  hypotenuse = x1 y1 x2 y2 ->
    sqrt ((x1 - x2) ** 2 +
          (y1 - y2) ** 2)
  ;

  [#] items ( i current -> 
                           current [ i != n && d < distance ] | .
                           ' d = hypotenuse x y current.x current.y 
            )
  ' x = items:n.x,
    y = items:n.y
;