namespace Translators module List2 = let setminus a b = List.filter (fun x -> not (List.contains x b)) a let repeat a l = List.map (fun _ -> a) l type Position = { line: int; col: int }