fact: Definition abstract_from_sort (s:Sort) {A} (x:A) (B:s) : M (moption (A -> s)) := abstract_from_sort_dep s x B (fun _ => moption (A -> s)) (fun C => M.ret (mSome C)) (M.ret mNone).
imports: Strings.String ssrmatching.ssrmatching Mtac2(Logic Datatypes List Utils Logic intf.Sorts) Strings.String NArith.BinNat NArith.BinNatDef