lean4-htt/tests/lean/run/simpUnfoldAbbrev.lean
2021-11-23 07:34:51 -08:00

14 lines
382 B
Text

example {x y : Nat} (h : y > x) : x < y := by
-- simp should unfold `>` when inserting into the discrimination tree
simp [h]
abbrev good (n : Nat) :=
n > 42
example (h : good n) : n > 42 := by
-- simp should unfold `good` when inserting into the discrimination tree
simp [h]
example {x y : Nat} (h : x ≠ y) : x ≠ y := by
-- ≠ is also an abbreviation
simp [h]