fact: Definition of_list := List.fold_right (uncurry (@add _)) (@empty elt).
imports: Coq(Bool Equalities Orders OrdersFacts OrdersLists) Coq(Morphisms Permutation SetoidPermutation) MMaps(Utils Comparisons Interface)