         search-area (polygon 0 0, 1 0, 1 1, 0 0)]
     (visual-interactive-search [polygon-with-holes] search-area))
 
-
   ;; all supported spatial types
   (let [touches-np (m/mbr 45 90 55 70)
         touches-sp (m/mbr -160 -70 -150 -90)

        hole2 (rr/ords->ring :geodetic 5.18,6.92, -1.79,7.01, -2.65,5, 4.29,5.05, 5.18,6.92)
        polygon-with-holes (poly/polygon :geodetic [outer hole1 hole2])

        ;; points
        north-pole (p/point 90 0)
        south-pole (p/point -90 0)
        normal-point (p/point 10 22)
        am-point (p/point 180 22)

        ; search-area (assoc (polygon -6.45,-3.74,12.34,-4.18,12,9.45,-6.69,9.2,-6.45,-3.74)
        ;                    :options {:id "polygon"})

        ;search-area (assoc (m/mbr -23.43 5 25.54 -6.31) :options {:id "bounding_box"})

        search-area (assoc (p/point 0 0) :options {:id "point"})

        ]
    (visual-interactive-search [touches-sp

                                on-sp
                                normal-poly
                                polygon-with-holes
                                wide-north-cart
                                wide-south-cart
                                very-wide-cart
                                very-tall-cart
                                north-pole
                                south-pole
                                normal-point
