type t = string list let make s = [s] let to_string t = String.concat " " t let empty = [] let combine t1 t2 = t1 @ t2 let concat ts = List.concat ts let ( @+ ) = combine let is_empty = function | [] -> true | _ -> false let of_strings ss = ss let tw = concat