let total, infected = Utils.countCells cells
fprintf resultFile "File: %s %d %d %.2f\n" file total infected (100. * (float infected) / (float total))
with
- | _ as ex -> Utils.log (sprintf "Unable to open the image '%A': %A" file ex)
+ | :? IOException as ex -> Utils.log (sprintf "Unable to open the image '%A': %A" file ex)
0
| Window ->