anchor.diff:      printf "Start2"
       let d =(new _2D(400, 400, localWorkSize, localWorkSize))
   
  -    kernelPrepare d cParallel
  +    kernelPrepare d cParallel   
       let _ = commandQueue.Add(kernelRun()).Finish()            
       let _ = commandQueue.Add(cParallel.ToHost provider).Finish()
       commandQueue.Dispose()
  
positive.code:     provider.CloseAllBuffers()
      //ignore (System.Console.Read())
      cParallel
  //let f (a:array<int>) =
  //    for i in 0..(a.Length-1) do
  //        printf "%A" a.[i]
  //f Main
  
  let draw  (image:Bitmap) (arr1:array<int>) =
      let mutable t = -400; 
  
negative.code:     temp.SetBounds(400, 400, 410, 450)
      temp
  
  do Application.Run(form);;