anchor.diff:  open Brahma.FSharp.OpenCL.Extensions
   
   open System.Collections.Generic
  -
   
   type GPUWork(extRowSize, extNTermsCount, extRecTable:_[], extRules, extRulesIndexed:_[]) =
   
  
positive.code:         // Write quotation
          let command = 
              <@
                  fun (r:_3D) (rulesIndexed:_[]) (recTable:_[]) -> 
                      let tx = r.GlobalID0 // len
                      let ty = r.GlobalID1 // i
  
  
negative.code:                 | 0uy -> "0"
                  | _ -> lblNameArr.[(int lbl) - 1]
                  
      let calcDiff columnIndex =
          if columnIndex < 2
          then 0
          else 
              let diff = ref 0
              [|1..columnIndex-1|]
              |> Array.iter (fun i -> diff := (!diff + i))
              !diff
  
      let recognitionTable (_,_) (s:Microsoft.FSharp.Core.uint16[]) weightCalcFun =
  
          nTermsCount <- 
  