anchor.diff:          setP.Clear()
           reductions.Clear()
           setN.Clear()
  +        nonTermChildren.Clear()
   
       let rec run pos =                                                      
           if tokenEnum.MoveNext()
  
positive.code: 
      createEpsNodesAndPtr()
      run 0
      getResult()
  
      
negative.code:         let family = new Family(prod, new Nodes(nodes))
          let nonTermNodeNum = findSppfNode checkNode
          match nonTermNodeNum with
          | Some i ->
              if not (nonTermChildren.[i].Contains children)
              then 
                  addFamily sppfNodes.[i] family
                  nonTermChildren.[i].Add children
              i
          | None -> 
              let newNodeNum = addNode (new AST(family, [||], pos))
              nonTermChildren.Add (newNodeNum, new ResizeArray<_>([children]))
              newNodeNum
                   
      let getPointer nodes set =        
          let pointerNum = set |> Seq.tryFind (fun i -> pointers.[int i] = nodes)
          match pointerNum with
          | Some i -> i
  