File: rewrite_in_hyp2.v

package info (click to toggle)
coq-doc 8.4pl4-1
  • links: PTS, VCS
  • area: non-free
  • in suites: jessie, jessie-kfreebsd
  • size: 21,816 kB
  • ctags: 24,291
  • sloc: ml: 140,953; ansic: 1,982; lisp: 1,406; sh: 1,347; makefile: 572; sed: 2
file content (8 lines) | stat: -rw-r--r-- 321 bytes parent folder | download | duplicates (5) 
1
2
3
4
5
6
7
8
 
(* Until revision 10221, rewriting in hypotheses of the form
   "(fun x => phi(x)) t" with "t" not rewritable used to behave as a
   beta-normalization tactic instead of raising the expected message
   "nothing to rewrite" *)

Goal forall b, S b = O -> (fun a => 0 = (S a)) b -> True.
  intros b H H0.
  rewrite H in H0.