Nmm_ocaml : Txt_utils.max_length_of_margin

let max_length_of_margin_labels (margin_labels : string list) : int =
        let rec aux (i : int) (labels : string list) : int =
                match  labels with
                |[] -> i
                |hd::tl -> aux (Int.max i (utf_8_length hd)) tl
        in
        aux 0 margin_labels