fact: Definition exists_witness (f : SS.elt -> bool) (s : SS.t) : option SS.elt := SS.choose (SS.filter f s).
imports: Recdef NArith Sorting GeoCoq.Tactics.Coinc.Permutations GeoCoq.Utils.general_tactics GeoCoq.Utils.sets