bbIntersection
  :: (Additive v, Foldable v, Fractional n, Ord n)
  => BoundingBox v n -> Point v n -> v n -> Intersect n
bbIntersection EmptyBox _ _          = None
bbIntersection
  :: (Additive v, Foldable v, Fractional n, Ord n)
  => BoundingBox v n -> Point v n -> v n -> Intersect n
bbIntersection EmptyBox _ _          = None
bbIntersection EmptyBox _ _          = None