let edges, xGradient, yGradient = logTimeWithName "Finding edges" (fun () ->
let edges, xGradient, yGradient = ImgTools.findEdges filteredGreenWhitoutStain
let edges, xGradient, yGradient = logTimeWithName "Finding edges" (fun () ->
let edges, xGradient, yGradient = ImgTools.findEdges filteredGreenWhitoutStain