lean4-htt/tests/lean/notation7.lean
2017-05-25 18:24:16 -07:00

13 lines
203 B
Text

--
open nat
constant f : nat → nat
constant g : nat → nat → nat
notation A `:+1`:100000 := f A
#check g 0:+1:+1 (1:+1 + 2:+1):+1
set_option pp.notation false
#check g 0:+1:+1 (1:+1 + 2:+1):+1