Interface for qBeta module object

Origin: workspace

SmallVirtEx: obj  

   Point: 

      in X: var integer

      in Y: var integer

      move: 

         in dx: var integer

      print:< 

   ColorPoint: Point

      in c: var integer

      print::< 

   MyClass: 

      elm:< Point

      S: ref elm

      set: 

         in R: ref elm

      print: 

   YourClass: MyClass

      elm::< ColorPoint

   P: ref Point

   C: ref MyClass