val width : unit ‑> [ `Cols of int | `Not_a_tty | `Not_available ]The width in characters of the current output. Returns None if stdout is
not connected to a tty.
val print_list : Core.Out_channel.t ‑> (string * Ansi.attr list) list ‑> unitprint a list in a columnize way (like the output of ls)