1c6067bac2
see issue #500
9 lines
179 B
Text
9 lines
179 B
Text
open nat
|
|
|
|
example (a b : nat) : a = 0 → b = 1 → a = b → a + b * b ≤ 10000 :=
|
|
begin
|
|
intro a0 b1 ab,
|
|
exfalso, state,
|
|
rewrite [a0 at ab, b1 at ab],
|
|
contradiction
|
|
end
|