glyph/Types

type FlowAtts = { dir : Dir2D; intraPad : Nat; interPad : Nat }

type Dir2D = {#up; #down; #left; #right}

type Fill = Types.Graphics.Fill

type BitMapData = { dim : Types.Dim; bits : [[Bool]] }

type BitMapAtts = { zoom : Nat; fgFill : Fill; bgFill : Fill }

type BitMapTextAtts = { zoom : Nat; fgFill : Fill; bgFill : Fill; flow : FlowAtts }