lean4-htt/tests/lean/run/rewriter13.lean
2016-06-10 18:29:41 -07:00

8 lines
123 B
Text

exit
open nat
example (x y : nat) (H1 : sigma.pr1 ⟨x, y⟩ = 0) : x = 0 :=
begin
rewrite ▸* at H1,
rewrite H1
end