Interface for qBeta module object

Origin: workspace

PointSys: obj  

   Point: 

      in X: var integer

      in Y: var integer

      move: 

         in X1: var integer

         in Y1: var integer

      :=: 

         in P: obj Point(,)

      print: 

   P1: obj Point(,)

   P2: obj Point(,)