X-Git-Url: http://git.euphorik.ch/?p=master-thesis.git;a=blobdiff_plain;f=Parasitemia%2FParasitemiaUI%2FTypes.fs;h=a98d7b0270d29d0c396ec4731d697a330481b0af;hp=3a3cf564558273c79c04bd1c6afe92a79cff3f3f;hb=8cf2153bd18919de41745534d3dbf134f085e13c;hpb=42d4db26f30bccbcc2e1b6d1f82a5b04a1f3dcd2

diff --git a/Parasitemia/ParasitemiaUI/Types.fs b/Parasitemia/ParasitemiaUI/Types.fs
index 3a3cf56..a98d7b0 100644
--- a/Parasitemia/ParasitemiaUI/Types.fs
+++ b/Parasitemia/ParasitemiaUI/Types.fs
@@ -1,11 +1,6 @@
 module ParasitemiaUI.Types
 
-open System
 open System.Windows
-open System.Windows.Media
-
-open Emgu.CV
-open Emgu.CV.Structure
 
 open Newtonsoft.Json
 
@@ -31,9 +26,8 @@ type PredefinedPPI =
         ppi : int<ppi>
         label : string
     }
-    with
-        override this.ToString () =
-            sprintf "%s: %d" this.label this.ppi
+    override this.ToString () =
+        sprintf "%s: %d" this.label this.ppi
 
 type SensorSize =
     {
@@ -41,9 +35,8 @@ type SensorSize =
         h : float<mm>
         label : string
     }
-    with
-        override this.ToString () =
-            sprintf "%g mm × %g mm%s" this.w this.h (if this.label = "" then "" else " (" + this.label + ")")
+    override this.ToString () =
+        sprintf "%g mm × %g mm%s" this.w this.h (if this.label = "" then "" else " (" + this.label + ")")
 
 let defaultPredefinedPPI =
     [
@@ -62,5 +55,3 @@ let defaultSensorSizes =
         { w = 8.8<mm>;  h = 6.6<mm>;  label = "2/3″" }
         { w = 13.2<mm>; h = 8.8<mm>;  label = "1″" }
     ]
-
-