(FILECREATED "25-DEC-77 20:10:10" <KRL1>TREE1.;3
 1927   

     previous date: "16-DEC-77 12:07:36" <KRL1>TREE1.;2)


(PRETTYCOMPRINT TREE1COMS)

(RPAQQ TREE1COMS
 ((UNITS: TREE1UNITS)))
(PRETTYCOMPRINT (UNITS: TREE1UNITS))
(RPAQQ TREE1UNITS (TreeNode1 TreeNode2 TreeNode3 TreeNode4 TreeNode5 TreeNode6 TreeNode7 TreeNode8))

(READWHITEUNITS NIL NIL T)(

# TreeNode1
   self:  A TreeNode with
              type = 'AND 
              contents = 1 
              children = {TreeNode2}

# TreeNode2
   self:  A TreeNode with
              parent = TreeNode1
              type = 'OR 
              contents = 0 
              children = {TreeNode3,TreeNode5}

# TreeNode3
   self:  A TreeNode with
              parent = TreeNode2
              type = 'AND 
              contents = 1 
              children = {TreeNode4,TreeNode8}

# TreeNode4
   self:  A TreeNode with
              parent = TreeNode3
              type = 'OR 
              contents = 3 

# TreeNode5
   self:  A TreeNode with
              parent = TreeNode2
              type = 'AND 
              contents = 2 
              children = {TreeNode6,TreeNode7}

# TreeNode6
   self:  A TreeNode with
              parent = TreeNode5
              type = 'OR 
              contents = -3 

# TreeNode7
   self:  A TreeNode with
              parent = TreeNode5
              type = 'OR 
              contents = 0 

# TreeNode8
   self:  A TreeNode with
              parent = TreeNode3
              type = 'OR
              contents = 1

ENDUNITS)

(DECLARE: DONTCOPY
  (FILEMAP (NIL)))
STOP