anchor.diff:                                  , co
                                   , br)
                           queueV.Enqueue(v.Target, newStt)
  -                    else
  +                    else  
  +                        reduced := true
  +                        flag := true                    
  +                        curStt.Positions.Add(new Position<_>(curStt.start_offset, curStt.cur_offset, curStt.curBr))                         
                           if !isNotActionPerformed //один раз выполняем action код, потому что входящие дуги в одну вершину возвращают одинаковый action код
  -                        then
  +                        then                            
                               isNotActionPerformed := false
                               idF := match v.Tag.OutSymb with
                                       | Smbl x -> x
  
positive.code:                                 (curStt.AccumulatedString 
                                      |> ResizeArray.map (function | Smbl x -> x.ToString() | Eps -> "Eps" | Exclosure y -> y.ToString())
                                      |> String.concat "") 
                       
                          let so,co,br =
                              match v.Tag.InSymb with
  
negative.code:                 for v in inputFstLexer.OutEdges(topV) do                    
                      if not <| (v.Tag.OutSymb = Eps)  
                      then
                      //еще раз пройтись, чтобы найти невыполненные action                        
                          idF := match v.Tag.OutSymb with
                                  | Smbl x -> x
                                  | x -> failwith "Unexpected symbol in function calculation:%A" x 
  