PointEx: obj
Point:
in X: var integer
in Y: var integer
add:
in P: ref Point
out res: ref Point
:=:
in P: ref Point
display:
P1: obj Point(,) -- shall implement var with initial valuew
P2: obj Point(,)