open Emgu.CV
open Emgu.CV.Structure
+/// <summary>
+/// Normalize an image between 0 and 'upperLimit'.
+/// FIXME: use to many memory.
+/// </summary>
+/// <param name="img"></param>
+/// <param name="upperLimit"></param>
let normalize (img: Image<Gray, float32>) (upperLimit: float) : Image<Gray, float32> =
let min = ref [| 0.0 |]
let minLocation = ref <| [| Point() |]