constant f : nat → nat → nat open nat #check f $ succ $ 10 + 20