Xpm
type color = (int * int * int) option
type t = {
name : string;
colors : (char * color) list;
rows : string list;
}
val parse : string -> t
val print : t -> string