                (println "Actual:" (pr-str (map :name (:refs refs)))))
              result)
            :polygon [20.16,-13.7,21.64,12.43,12.47,11.84,-22.57,7.06,20.16,-13.7]
-           [whole-world normal-poly normal-brs polygon-with-holes normal-line normal-line-cart]
-
-           :box [23.59,-4,25.56,-15.47] [whole-world normal-line-cart]
-           :point [17.73 2.21] [whole-world normal-brs]
+           [whole-world whole-world-poly normal-poly normal-brs polygon-with-holes normal-line normal-line-cart]
+
+           :box [23.59,-4,25.56,-15.47] [whole-world whole-world-poly normal-line-cart]
+           :point [17.73 2.21] [whole-world whole-world-poly normal-brs]
            :line [-0.37,-14.07,4.75,1.27,25.13,-15.51]
-           [whole-world polygon-with-holes polygon-with-holes-cart normal-line-cart normal-line
+           [whole-world whole-world-poly polygon-with-holes polygon-with-holes-cart normal-line-cart normal-line
             normal-poly-cart]))))
 
 

             matches?)

           [20.16,-13.7,21.64,12.43,12.47,11.84,-22.57,7.06,20.16,-13.7]
           [whole-world normal-poly normal-brs polygon-with-holes normal-line normal-line-cart]

           ;; Intersects 2nd of normal-brs
           [-16.79,-12.71,-6.32,-10.95,-5.74,-6.11,-15.18,-7.63,-16.79,-12.71]
           [whole-world normal-poly normal-brs]

           [0.53,39.23,21.57,59.8,-112.21,84.48,-13.37,40.91,0.53,39.23]
           [whole-world on-np wide-north very-wide-cart]

           ;; around north pole
           [58.41,76.95,163.98,80.56,-122.99,81.94,-26.18,82.82,58.41,76.95]
           [whole-world on-np touches-np north-pole very-tall-cart]

           ;; around south pole
           [-161.53,-69.93,25.43,-51.08,13.89,-39.94,-2.02,-40.67,-161.53,-69.93]
           [whole-world on-sp wide-south touches-sp south-pole very-tall-cart]

           ;; Across antimeridian
           [-163.9,49.6,171.51,53.82,166.96,-11.32,-168.36,-14.86,-163.9,49.6]
           [whole-world across-am-poly across-am-br am-point very-wide-cart]

           [-2.212 -12.44, 0.103 -15.911, 2.185 -11.161 -2.212 -12.44]
           [whole-world normal-poly-cart polygon-with-holes-cart]

           ;; Interactions with lines
           ;; Covers both lines
           [15.42,-15.13,36.13,-14.29,25.98,-0.75,13.19,0.05,15.42,-15.13]
           [whole-world normal-line normal-line-cart normal-brs]

           ;; Intersects both lines
           [23.33,-14.96,24.02,-14.69,19.73,-6.81,18.55,-6.73,23.33,-14.96]
           [whole-world normal-line normal-line-cart]

           ;; Related to the geodetic polygon with the holes
           ;; Inside holes
           [4.1,0.64,4.95,0.97,6.06,1.76,3.8,1.5,4.1,0.64] [whole-world]
           [1.41,5.12,3.49,5.52,2.66,6.11,0.13,6.23,1.41,5.12] [whole-world]
           ;; Partially inside a hole
           [3.58,-1.34,4.95,0.97,6.06,1.76,3.8,1.5,3.58,-1.34] [whole-world polygon-with-holes]
           ;; Covers a hole
           [3.58,-1.34,5.6,0.05,7.6,2.33,2.41,2.92,3.58,-1.34] [whole-world polygon-with-holes]
           ;; points inside both holes
           [4.44,0.66,5.4,1.35,2.66,6.11,0.13,6.23,4.44,0.66] [whole-world polygon-with-holes]
           ;; completely covers the polygon with holes
           [-6.45,-3.74,12.34,-4.18,12,9.45,-6.69,9.2,-6.45,-3.74] [whole-world polygon-with-holes normal-brs]

           ;; Related to the cartesian polygon with the holes
           ;; Inside holes
           [-1.39,-14.32,2.08,-14.38,1.39,-13.43,-1.68,-13.8,-1.39,-14.32]
           [whole-world normal-poly-cart]
           ;; Partially inside a hole
           [-1.39,-14.32,2.08,-14.38,1.64,-12.45,-1.68,-13.8,-1.39,-14.32]
           [whole-world polygon-with-holes-cart normal-poly-cart]
           ;; Covers a hole
           [-3.24,-15.58,5.22,-15.16,6.05,-12.37,-1.98,-12.46,-3.24,-15.58]
           [whole-world polygon-with-holes-cart normal-poly-cart]
           ;; points inside both holes
           [3.98,-18.64,5.08,-18.53,3.7,-13.78,-0.74,-13.84,3.98,-18.64]
           [whole-world polygon-with-holes-cart normal-poly-cart]
           ;; completely covers the polygon with holes
           [-5.95,-23.41,12.75,-23.69,11.11,-10.38,-6.62,-10.89,-5.95,-23.41]
           [whole-world polygon-with-holes-cart wide-south-cart normal-poly-cart]))

    (testing "AQL spatial search"
      (are [type ords items]

             matches?)

           ;; normal two points
           [-24.28,-12.76,10,10] [whole-world whole-world-poly polygon-with-holes normal-poly normal-brs]

           ;; normal multiple points
           [-0.37,-14.07,4.75,1.27,25.13,-15.51] [whole-world whole-world-poly polygon-with-holes
                                                  polygon-with-holes-cart normal-line-cart
                                                  normal-line normal-poly-cart]
           ;; across antimeridian
           [-167.85,-9.08,171.69,43.24] [whole-world whole-world-poly across-am-br across-am-poly very-wide-cart]

           ;; across north pole
           [0 85, 180 85] [whole-world whole-world-poly north-pole on-np touches-np]

           ;; across north pole where cartesian polygon touches it
           [-155 85, 25 85] [whole-world whole-world-poly north-pole on-np very-tall-cart]

           ;; across south pole
           [0 -85, 180 -85] [whole-world whole-world-poly south-pole on-sp]

           ;; across north pole where cartesian polygon touches it
           [-155 -85, 25 -85] [whole-world whole-world-poly south-pole on-sp touches-sp very-tall-cart]))

    (testing "point searches"
      (are [lon_lat items]
