blob: d0fa3f2b33b211db361e3b4c28ec614babf4d9de (
plain)
1
2
3
4
5
6
|
(* Check that rewrite does not apply to single evars *)
Lemma evar_rewrite : (forall a : nat, a = 0 -> True) -> True.
intros; eapply H. (* goal is ?30 = nil *)
Fail rewrite plus_n_Sm.
Abort.
|