anchor.diff:              fun (r:_2D) (a:array<float32>) (b:array<float32>) (c:array<float32>) -> 
                   let tx = r.GlobalID0i
                   let ty = r.GlobalID1i
  -                let columns = 100
  +                let columns = 200
                   for k in 0 .. columns - 1 do
                       c.[ty * columns + tx] <- c.[ty * columns + tx] + (a.[ty * columns + k] * b.[k * columns + tx])
           @>
  
positive.code: 
  let Main () =
  
      let platformName = "*";
  
      let rows = 100;
      let columns = 100;
      let localWorkSize = 10;
      let iterations = 100;
      let deviceType = Cl.DeviceType.Default;
  
      let provider =
          try  ComputeProvider.Create(platformName, deviceType)
  
negative.code: 
  module FsMatrixMultiply
  
  open System.Text.RegularExpressions
  
  open Brahma.Samples
  open OpenCL.Net
  