Pattern
type t = string
val black : t -> int -> int -> bool
val make : int array -> t
val solid : t
val white : t
val grey : t
val palette : t list