10 lines
150 B
Text
10 lines
150 B
Text
|
open nat
|
||
|
|
|
||
|
|
definition foo [irreducible] (x : nat) := x + 1
|
||
|
|
|
||
|
|
example (a b : nat) (H : foo a = b) : a + 1 = b :=
|
||
|
|
begin
|
||
|
|
rewrite ↓foo a,
|
||
|
|
exact H
|
||
|
|
end
|