Wumpus.Basic.Graphic.PrimGraphic

Elementary functions for the Graphic and LocGraphic types.

The functions here are generally analogeous to the Picture API in Wumpus.Core, but here they exploit the implicit DrawingContext.

Documentation

drawGraphic :: (Real u, Floating u, FromPtSize u) => DrawingContext -> Graphic u -> Maybe (Picture u)

drawGraphicU :: (Real u, Floating u, FromPtSize u) => DrawingContext -> Graphic u -> Picture u

openStroke :: Num u => PrimPath u -> Graphic u

closedStroke :: Num u => PrimPath u -> Graphic u

filledPath :: Num u => PrimPath u -> Graphic u

borderedPath :: Num u => PrimPath u -> Graphic u

textline :: Num u => String -> LocGraphic u

centermonoTextline :: (Fractional u, Ord u, FromPtSize u) => String -> LocGraphic u

As textline but the supplied point is the center.

Centered is inexact - it is calculated with monospaced font metrics.

textlineMulti :: Fractional u => [String] -> LocGraphic u

Point is the baseline left of the bottom line, text is left-aligned.

hkernline :: Num u => [KerningChar u] -> LocGraphic u

vkernline :: Num u => [KerningChar u] -> LocGraphic u

strokedEllipse :: Num u => u -> u -> LocGraphic u

filledEllipse :: Num u => u -> u -> LocGraphic u

borderedEllipse :: Num u => u -> u -> LocGraphic u

supplyPt :: Point2 u -> LocGraphic u -> Graphic u

Supplying a point to a CFGraphic takes it to a regular Graphic.

localPoint :: (Point2 u -> Point2 u) -> LocGraphic u -> LocGraphic u

vecdisplace :: Num u => Vec2 u -> Point2 u -> Point2 u

displace :: Num u => u -> u -> Point2 u -> Point2 u

hdisplace :: Num u => u -> Point2 u -> Point2 u

vdisplace :: Num u => u -> Point2 u -> Point2 u

straightLine :: Fractional u => Vec2 u -> LocGraphic u

straightLineBetween :: Fractional u => Point2 u -> Point2 u -> Graphic u

curveBetween :: Fractional u => Point2 u -> Point2 u -> Point2 u -> Point2 u -> Graphic u

strokedRectangle :: Fractional u => u -> u -> LocGraphic u

Supplied point is bottom left.

filledRectangle :: Fractional u => u -> u -> LocGraphic u

Supplied point is bottom left.

borderedRectangle :: Fractional u => u -> u -> LocGraphic u

Supplied point is bottom left.

strokedCircle :: Floating u => Int -> u -> LocGraphic u

Supplied point is center. Circle is drawn with Bezier curves.

filledCircle :: Floating u => Int -> u -> LocGraphic u

Supplied point is center. Circle is drawn with Bezier curves.

borderedCircle :: Floating u => Int -> u -> LocGraphic u

Supplied point is center. Circle is drawn with Bezier curves.

strokedDisk :: Num u => u -> LocGraphic u

disk is drawn with Wumpus-Core's ellipse primitive.

This is a efficient representation of circles using PostScript's arc or SVG's circle in the generated output. However, stroked-circles do not draw well after non-uniform scaling - the line width is scaled as well as the shape.

For stroked circles that can be scaled, consider making the circle from Bezier curves.

filledDisk :: Num u => u -> LocGraphic u

borderedDisk :: Num u => u -> LocGraphic u