Parasitemia/ParasitemiaCore/ImgTools/IO.fs

   1 module ParasitemiaCore.IO
   2
   3 open System
   4 open System.Drawing
   5
   6 open Emgu.CV
   7 open Emgu.CV.Structure
   8
   9 let saveImg (img: Image<'TColor, 'TDepth>) (filepath: string) =
  10     img.Save(filepath)
  11
  12 let saveMat (mat: Matrix<'TDepth>) (filepath: string) =
  13     use img = new Image<Gray, 'TDeph>(mat.Size)
  14     mat.CopyTo(img)
  15     saveImg img filepath