anchor.diff:      for v in inputFstLexer.InitState do
           let stt = new StateInfo<_>(v, new ResizeArray<_>(), new ResizeArray<_>(), v, 0, 0, Unchecked.defaultof<'br>)
           bfs v stt
  -
  -//    let actions = [|(fun lb -> printfn lb.dsfs ; Some NUM(1) ); (fun lb -> None); (fun x -> x*2)|]
  -//        
  -//    let lb = 2
  -//    let tok = actions.[1] lb
  -//    let edg = new Edg(lb._form,tok,lb._to)
  -//    lb.Reset
  -//    lb.Add ch
       
       let final = new ResizeArray<_>()
       for edge in inputFstLexer.Edges do
  
positive.code:             let isNotActionPerformed = ref true
              let idF = ref 0
              let topV,curStt = queueV.Dequeue()
              
  //            if curStt.curBr <> null && !reduce
  //            then 
  //                curStt.Positions.Add(new Position<_>(curStt.start_offset, curStt.cur_offset, curStt.curBr)) 
  //                reduce := false           
  //            if !save 
  //            then curStt.Positions.Add(!pos)
  
              if not <| visited.[topV]
              then
  
negative.code: 
  let Tokenize (fstLexer : FST<_,_>) (actions : array<StateInfo<_> -> _>) eofToken (inputGraph : Appr<_>) =    
      let inputFst = inputGraph.ToFST()
      //inputFst.PrintToDOT @"..\..\Tests\CalcTestInput.dot"  
      let inputFstLexer = FST<_,_>.Compos(inputFst, fstLexer) 
      //inputFstLexer.PrintToDOT @"..\..\Tests\CalcTestLexer.dot"  
      let parserInputGraph = Interpret inputFstLexer actions eofToken 
      let epsRes = EpsClosure.NfaToDfa parserInputGraph
      epsRes 
  