anchor.diff:  //    f.[0].Add e5
   //    let tmp = convertToParserInputGraph seqE s f
       
  -    let path = "D:/YC/YaccConstructor/Tests/bio/problem_with_shift_2/g"
  -    let inputGraphPath = System.IO.Path.Combine(System.IO.Path.GetDirectoryName path, System.IO.Path.GetFileNameWithoutExtension path)
  -    searchMain inputGraphPath Shift_problem 1
  -    //let parseBioGraph = 
  +//    let path = "D:/YC/YaccConstructor/Tests/bio/problem_with_shift_2/g"
  +//    let inputGraphPath = System.IO.Path.Combine(System.IO.Path.GetDirectoryName path, System.IO.Path.GetFileNameWithoutExtension path)
  +//    searchMain inputGraphPath Shift_problem 1
  +//    //let parseBioGraph = 
       0
  
positive.code:     val LowLengthLimit: int
      val StartNonterm: int
  
      new(withoutSppf(*, withSppf*), getSmb, lowLengthLimit, hightLengthLimit, startNonterm) = 
          {
              SearchWithoutSPPF = withoutSppf
              //SearchWithSPPF = withSppf
              Tokenizer = getSmb
              HightLengthLimit = hightLengthLimit
              LowLengthLimit = lowLengthLimit
  
negative.code:             | x ->   failwithf "Strange symbol in input: %A" x
              |> GLL.r16s.H22_H23.tokenToNumber
      
      new SearchConfig(GLL.r16s.H22_H23.buildAbstract, GLL.r16s.H22_H23.buildAbstractAst, getSmb, 
                          //318, 370, 13)
                          //400, 550, 13)
                          800, 910, 13)
  
  let shift_problem_SearchConfig =
  
  