Module Mlpost.Brush

module Brush: sig .. end

module Pen: sig .. end

module Dash: sig .. end

type t 

val t : ?color:Color.t ->
       ?pen:Pen.t ->
       ?dash:Dash.t ->
       ?scale:Num.t -> ?brush:t -> unit -> t

val pen : t -> Pen.t option

val dash : t -> Dash.t option

val color : t -> Color.t option

type brush_colored = ?pen:Pen.t ->
       ?dash:Dash.t ->
       ?scale:Num.t -> ?brush:t -> unit -> t 

val white : brush_colored

val black : brush_colored

val red : brush_colored

val blue : brush_colored

val green : brush_colored

val cyan : brush_colored

val yellow : brush_colored

val magenta : brush_colored

val lightred : brush_colored

val lightblue : brush_colored

val lightgreen : brush_colored

val lightcyan : brush_colored

val lightyellow : brush_colored

val lightmagenta : brush_colored

val gray : float -> brush_colored

val lightgray : brush_colored

val mediumgray : brush_colored

val darkgray : brush_colored

val orange : brush_colored

val purple : brush_colored