anchor.diff:              let sndSeq = sndSeq |> BioArray.toString |> Conversion.stringToInts
   
               // Generate cell matrix
  -            let matrix = createCellMatrix id costs fstSeq sndSeq true
  +            let matrix = createCellMatrix id costs fstSeq sndSeq <@ fun x -> max x 0 @>
   
               // Get alignment from cell matrix
               let i, j = Array2D.indexMaxBy (fun (c:Cell) -> c.M.Value) matrix
  
positive.code:         let matrixGpu = gpu.Allocate<Cell>(matrix)
  
          let lp = LaunchParam(1, 512)
          let transformKernel = <@ kernel @> |> Compiler.makeKernel
          gpu.Launch transformKernel lp matrixGpu costs fstSeqGpu sndSeqGpu mMaxsGpu local
  
          let matrix = Gpu.CopyToHost(matrixGpu)
          Gpu.Free(fstSeqGpu)
  
negative.code:                 matrix
  
              // Generate cell matrix
              let matrix = createCellMatrix initFirstRowCol costs fstSeq sndSeq <@id@>
  
              // Get alignment from cell matrix
              let i, j = Array2D.length1 matrix - 1, Array2D.length2 matrix - 1
  