fact: Definition apply_in {P Q} (c : P -> Q) (H : P) : tactic := change_hyp H (c H).
imports: Strings.String ssrmatching.ssrmatching Mtac2(Logic Datatypes List Utils Logic Sorts MTeleMatch) Strings.String NArith.BinNat NArith.BinNatDef