Interface for qBeta module object

Origin: bmp

Program2: obj
   %include LIB.String
   -- %include Random
   
   mood: var Integer
   Array:
      in range: var integer
      rep: obj Indexed(range,integer)
      put:
         in ix: var integer
         :=:
            in V: var integer
      get:
         in ix: var integer
         out res: var integer
   tilfeldigx:
      in min: var integer
      in max: var integer
      out r: var Integer
   tilfeldig:
      in min: var integer
      in max: var integer
      out r: var Integer
   antall: obj Array()
   nullstill:
   printResultat:
   Terning:
      eyes: var Integer
      kast:
   tern: ref Terning
   eyes: var integer
   kastTerning:
      out v: var integer