module Console: Consolemodule Ansi:sig..end
val is_color_tty : unit -> boolval width : unit -> [ `Cols of int | `Not_a_tty | `Not_available ]None if stdout is
not connected to a tty.val print_list : Pervasives.out_channel -> (string * Ansi.attr list) list -> unit