Interface for qBeta module object

Origin: Coroutines

SimpleEx: obj  

   Fisk: 

      ch: var char

   TFP: 

      in ch: var char

      in R: ref Fisk

      next: 

         in c: var char

         in S: ref Fisk

      X: var integer

   TF: obj TFP(,Fisk)

      --TF('q',Fisk)