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: 
      /// generates a sequence of CUDA calls from streams
      let generateCalls (streams: StreamCmdsT<CudaExecItemT> list) cache =    
          /// the number of times WaitOnEvent is called for a particular correlation
          let correlationIdWaiters =
              seq {
  
negative.code:                 ()
  
          calls |> List.ofSeq
  
      /// generates init and dispose calls for CUDA resources
      let generateAllocAndDispose compileEnv memAllocs streamCnt eventObjCnt =
  