Interface for qBeta module object

Origin: TST

RemoteExp: obj
   doRE:
      RemotePtn:
         in cx: var char
         print:
         @put::at:
            in put: var char
            at:< object
      TargetPtn:
         in c: var char
         foo:
            in cy: var char
            out res: ref RemotePtn
         print:
      Bar:
         in a: var integer
         out res: ref TargetPtn
      simpleRE:
         simple_foo:
            simple_bar: obj
               c1: var char
               simple_fisk:
         S: obj simple_foo
      bracketedExp:
         chx: var char
         print:
            in ch: var char
         printer:
            emit:
               in ch: var char
      Hest: obj
         length:
            in x: var integer
            out res: var integer
      R: obj TargetPtn()
      S: ref TargetPtn
      ch: var Char
      length: var integer