fact: Definition get_binder_name {A} (x : A) : gtactic string := fun '(Metavar _ _ g) => s <- M.get_binder_name x; M.ret [m:(m: s,AnyMetavar _ _ g)].
imports: Strings.String ssrmatching.ssrmatching Mtac2(Logic Datatypes List Utils Logic intf.Sorts) Strings.String NArith.BinNat NArith.BinNatDef