feat(library/tools/tactic): add 'cases' alias for 'inversion' tactic
This commit is contained in:
parent
8b804f1d22
commit
c2602baf2b
2 changed files with 2 additions and 1 deletions
|
@ -58,6 +58,7 @@ opaque definition unfold (e : expr) : tactic := builtin
|
||||||
opaque definition exact (e : expr) : tactic := builtin
|
opaque definition exact (e : expr) : tactic := builtin
|
||||||
opaque definition trace (s : string) : tactic := builtin
|
opaque definition trace (s : string) : tactic := builtin
|
||||||
opaque definition inversion (e : expr) : tactic := builtin
|
opaque definition inversion (e : expr) : tactic := builtin
|
||||||
|
definition cases := inversion
|
||||||
|
|
||||||
notation a `↦` b := rename a b
|
notation a `↦` b := rename a b
|
||||||
|
|
||||||
|
|
|
@ -123,7 +123,7 @@
|
||||||
(,(rx (not (any "\.")) word-start
|
(,(rx (not (any "\.")) word-start
|
||||||
(or "\\b.*_tac" "Cond" "or_else" "then" "try" "when" "assumption" "eassumption" "rapply" "apply" "rename" "intro" "intros"
|
(or "\\b.*_tac" "Cond" "or_else" "then" "try" "when" "assumption" "eassumption" "rapply" "apply" "rename" "intro" "intros"
|
||||||
"generalize" "generalizes" "clear" "clears" "revert" "reverts" "back" "beta" "done" "exact" "repeat"
|
"generalize" "generalizes" "clear" "clears" "revert" "reverts" "back" "beta" "done" "exact" "repeat"
|
||||||
"whnf" "rotate" "rotate_left" "rotate_right" "inversion")
|
"whnf" "rotate" "rotate_left" "rotate_right" "inversion" "cases")
|
||||||
word-end)
|
word-end)
|
||||||
. 'font-lock-constant-face)
|
. 'font-lock-constant-face)
|
||||||
;; Types
|
;; Types
|
||||||
|
|
Loading…
Reference in a new issue