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

13 lines
162 B
Text

exit
open nat
example (a b : nat) (Ha : a = 0) (Hb : b = 0) : a + b = 0 :=
begin
rewrite [Ha, Ha]
end
example (a : nat) : a = a :=
begin
esimp,
esimp
end