File: workaround_tactics.v

package info (click to toggle)
coq-math-classes 8.19.0-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 1,124 kB
  • sloc: python: 22; makefile: 20; sh: 2
file content (4 lines) | stat: -rw-r--r-- 411 bytes parent folder | download | duplicates (2) 
1
2
3
4
 
Global Ltac posed_rewrite t := let TEMP:=fresh in pose proof t as TEMP; simpl TEMP; rewrite TEMP; clear TEMP.
  (* Workaround around Coq bug, probably same as #2185. *)
Global Ltac apply_simplified x := let TEMP:=fresh in generalize x; simpl; intro TEMP; apply TEMP; clear TEMP.
Tactic Notation "posed_rewrite" "<-" constr(t) := let TEMP:= fresh in pose proof t as TEMP; simpl TEMP; rewrite <-TEMP; clear TEMP.