Interface for qBeta module object

Origin: OOPM

TextProcessingSystem: obj
   %visible Containers.OrderedList,StringLib
   TextProcessor:
      Template:
         Style:
            font: ref FontFamily
            par: ref ParagraphStyle
            isNumbered: var Boolean
            id:<
            print:<
         Styles: obj OrderedList
         newStyle:< -- perhaps not virtual?
         ParagraphStyle:
            justification: var integer
            indentation: obj
               left: var integer
               right: var integer
               special: obj
         format: obj
            noOfColoums: var integer
         pageSetUp: obj
            direction: obj
            size:
         heading: ref Style
         bodyText: ref Style
         defaultHeading: Style
            secNo: var integer
            id::
            print::<
         defaultBodyText: Style
            id::
            print::<
      Document:
         Paragraph:style:
            print:
         temp: ref Template
         content: obj OrderedList
         addPar:
         print:
            --"document.print:\n".print
            
      StandardTemplate: Template
      Letter: Template
      ACM: Template
      IEEE: Template
   FontFamily:
      name: ref String
      size: var integer
   Times12: FontFamily
   Times14: FontFamily
   Text:
      print:
   myText: obj TextProcessor
      doc: obj Document
         addCont:style: