Wumpus.Drawing.Text.CatText

Left-to-right text.

Documentation

data CatText u

leftAlign :: (Real u, FromPtSize u, Floating u) => [CatText u] -> PosImage u (BoundingBox u)

centerAlign :: (Real u, FromPtSize u, Floating u) => [CatText u] -> PosImage u (BoundingBox u)

rightAlign :: (Real u, FromPtSize u, Floating u) => [CatText u] -> PosImage u (BoundingBox u)

blank :: Num u => CatText u

Build a blank CatText with no output and a 0 width vector.

space :: FromPtSize u => CatText u

Note - a space character is not draw in the output, instead space advances the width vector by the width of a space in the current font.

string :: FromPtSize u => String -> CatText u

Build a CatText from a string.

(<>) :: CatText u -> CatText u -> CatText u

Concatenate two CatTexts separated with no spacing.

(<+>) :: FromPtSize u => CatText u -> CatText u -> CatText u

Concatenate two CatTexts separated with a space.

fontColour :: RGBi -> CatText u -> CatText u