fact: Fixpoint list2LocSet (l : list Location) : LocSet.t := match l with | nil => LocSet.empty | (h::t) => LocSet.add h (list2LocSet t) end.
imports: Coq(List) Coq(Relation_Operators) Coq(DecidableType) Coq(FSetInterface)