-- notation `o` := (10:nat) #check 11 constant f : nat → nat #check o + 1 #check f o + o + o #reduce 9 + (1:nat) #reduce o+4