fact: Definition change (P : Type) : tactic := fun g => gT <- M.goal_type g; e <- M.evar P; exact e g;; M.ret [m:(m: tt, AnyMetavar Typeₛ _ e)].
imports: Strings.String ssrmatching.ssrmatching Mtac2(Logic Datatypes List Utils Logic Sorts MTeleMatch) Strings.String NArith.BinNat NArith.BinNatDef