anchor.diff:      let time3 = (System.DateTime.Now - start).TotalMilliseconds / (float cnt)
       let countOfPairs3 = probabilityAnalyzer root3.[0]*)
   
  +    //SparseGPU --- managedCuda
       (*let start = System.DateTime.Now
       let root4 =
           [for i in 0..cnt-1 ->
  
positive.code:                 with grammar = cnfConv.ConvertGrammar (loadIL.grammar, [||])
          }*)
  
  
      (*let start = System.DateTime.Now
      let root1 =
          [for i in 0..cnt-1 ->
  
negative.code:     let time5 = (System.DateTime.Now - start).TotalMilliseconds / (float cnt)
      let countOfPairs5 = sparseAnalyzer root5.[0]*)
      
      //SparseCPUParallel2 --- MailBoxProcessors (any number of threads)
      let start = System.DateTime.Now
      let root6 =
          [for i in 0..cnt-1 ->
  