constant f : nat → nat
notation a `²` := f a
variable a : nat
#check a²