lean4-htt/tests/lean/revertlet.lean
Leonardo de Moura 698908584b fix: revert
2020-12-31 09:47:05 -08:00

8 lines
153 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 from rfl
traceState
subst h
traceState
rfl