feat: activate new rfl tactic implementation

This commit is contained in:
Leonardo de Moura 2022-04-09 12:01:56 -07:00
parent 47e7e03f79
commit 628e33bf8a
3 changed files with 2 additions and 4 deletions

View file

@ -119,7 +119,7 @@ theorem mod_one (x : Nat) : x % 1 = 0 := by
have : (y : Nat) → y < 1 → y = 0 := by
intro y
cases y with
| zero => intro h; rfl
| zero => intro h; exact rfl -- TODO remove exact
| succ y => intro h; apply absurd (Nat.lt_of_succ_lt_succ h) (Nat.not_lt_zero y)
exact this _ h

View file

@ -38,7 +38,7 @@ theorem one_le_csize (c : Char) : 1 ≤ csize c := by
theorem eq_empty_of_bsize_eq_zero (h : s.endPos = {}) : s = "" := by
match s with
| ⟨[]⟩ => rfl
| ⟨[]⟩ => exact rfl -- TODO: remove exact
| ⟨c::cs⟩ =>
injection h with h
simp [endPos, utf8ByteSize, utf8ByteSize.go] at h

View file

@ -351,8 +351,6 @@ macro:1 x:tactic " <;> " y:tactic:0 : tactic => `(tactic| focus ($x:tactic; all_
/-- `rfl` is equivalent to `exact rfl`, but has a few optimizatons. -/
syntax (name := refl) "rfl" : tactic
macro_rules | `(tactic| rfl) => `(tactic| exact rfl)
/--
Similar to `rfl`, but disables smart unfolding and unfolds all kinds of definitions,
theorems included (relevant for declarations defined by well-founded recursion). -/