sig val legend : ?ensstroke:Mlpost.Color.t -> ?colstroke:Mlpost.Color.t -> ?fill:Mlpost.Color.t -> (Mlpost.Color.t * string) list -> Mlpost.Picture.t end