15 lines
197 B
Text
15 lines
197 B
Text
open nat
|
|
|
|
section
|
|
parameter (A : Type)
|
|
definition f (a b : A) : A := a
|
|
|
|
definition add2 (a : nat) : nat := a + 2
|
|
|
|
postfix `+.2`:100 := add2
|
|
|
|
#reduce 3 +.2
|
|
end
|
|
|
|
example : 3 +.2 = 5 :=
|
|
rfl
|