lean4-htt/tests/lean/revertlet.lean
Leonardo de Moura 04b7924154 chore: fix tests
2021-09-16 10:29:38 -07:00

8 lines
155 B
Text

theorem ex (n : Nat) (h : n = 0) : 0 + n = 0 := by
let m := n + 1
let v := m + 1
have : v = n + 2 := rfl
trace_state
subst h
trace_state
rfl