X-Git-Url: http://git.euphorik.ch/?a=blobdiff_plain;f=Parasitemia%2FParasitemiaCore%2FImgTools%2FIO.fs;h=f0522719e538c9b339df23df589abcb77c9a988d;hb=95f9edf71456c8bf89a91850800f66efc2c9d4da;hp=219eab66d58437057c7f6d38b7c7a30d2b9664a9;hpb=3f8b0d281b3058faf23dbd0363de440bd04c6574;p=master-thesis.git diff --git a/Parasitemia/ParasitemiaCore/ImgTools/IO.fs b/Parasitemia/ParasitemiaCore/ImgTools/IO.fs index 219eab6..f052271 100644 --- a/Parasitemia/ParasitemiaCore/ImgTools/IO.fs +++ b/Parasitemia/ParasitemiaCore/ImgTools/IO.fs @@ -1,15 +1,12 @@ module ParasitemiaCore.IO -open System -open System.Drawing - open Emgu.CV open Emgu.CV.Structure -let saveImg (img: Image<'TColor, 'TDepth>) (filepath: string) = - img.Save(filepath) +let saveImg (img : Image<'TColor, 'TDepth>) (filepath : string) = + img.Save filepath -let saveMat (mat: Matrix<'TDepth>) (filepath: string) = - use img = new Image(mat.Size) - mat.CopyTo(img) +let saveMat (mat : Matrix<'TDepth>) (filepath : string) = + use img = new Image (mat.Size) + mat.CopyTo img saveImg img filepath