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 }