anchor.diff:                      lastCallOnStream.[strmId] <-
                           if strmId = strmIdToProcess then 0
                           else lastCallOnStream.[strmId] + 1
  -                //let streamCallHistory = strmIdToProcess :: streamCallHistory
   
                   // generate CUDA call template
                   let cmdCalls = callsForExecItem cmd cache strmIdToProcess
  
positive.code:             printfn "Used CUDA memory:       %.3f MiB" (float memUsage / 2.**20.)
              printfn "Used CUDA streams:      %d" streams.Length
              printfn "Used CUDA events:       %d" eventObjCnt
              printfn "Total CUDA work calls:  %d" cmdCounts
  
          //exit 0
  
          {
              KernelCode     = kernelModuleHeader + TmplInstCache.getCodeForDomain KernelFunc tmplInstCache
  
negative.code:                 ()
  
          calls |> List.ofSeq
  
      /// generates init and dispose calls for CUDA resources
      let generateAllocAndDispose compileEnv memAllocs streamCnt eventObjCnt =
  