structure point :=
(x y : nat)

#check point.x