Wumpus.Basic.Kernel.Objects.Bounded

Helpers for working with Images and LocImages that produce bounding boxes.

Type synonyms

type BoundedGraphic u = Image u (BoundingBox u)

type BoundedLocGraphic u = LocImage u (BoundingBox u)

type BoundedLocThetaGraphic u = LocThetaImage u (BoundingBox u)

Bounding box graphic helpers

centerOrthoBBox :: (Real u, Floating u, Ord u) => Radian -> BoundingBox u -> BoundingBox u

centerOrthoBBox : theta * bbox -> BBox

Rotate a bounding box by theta about its center. Take the new bounding box.

Remember that bounding boxes are always orthonormal rectangles, so the dimensions as well as the positions may change under rotation.

emptyBoundedLocGraphic :: InterpretUnit u => LocImage u (BoundingBox u)

Build an empty LocGraphic returning a bounding box.

The emptyBoundedLocGraphic is treated as a null primitive by Wumpus-Core and is not drawn, although it does generate the minimum bounding box with both the bottom-left and upper-right corners at the implicit start point.

emptyBoundedLocThetaGraphic :: InterpretUnit u => LocThetaImage u (BoundingBox u)

Build an empty LocThetaGraphic returning a bounding box.

The emptyBoundedLocThetaGraphic is treated as a null primitive by Wumpus-Core and is not drawn, although it does generate the minimum bounding box with both the bottom-left and upper-right corners at the implicit start point

illustrateBoundedGraphic :: InterpretUnit u => Image u (BoundingBox u) -> Image u (BoundingBox u)

Draw a BoundedGraphic, illustrating the bounding box.

illustrateBoundedLocGraphic :: InterpretUnit u => LocImage u (BoundingBox u) -> LocImage u (BoundingBox u)

Draw a BoundedLocGraphic, illustrating the bounding box.

illustrateBoundedLocThetaGraphic :: InterpretUnit u => LocThetaImage u (BoundingBox u) -> LocThetaImage u (BoundingBox u)

Draw a BoundedLocThetaGraphic, illustrating the bounding box.

bbrectangle :: InterpretUnit u => BoundingBox u -> Graphic u