X-Git-Url: http://git.euphorik.ch/?a=blobdiff_plain;f=Parasitemia%2FParasitemiaUI%2FTypes.fs;h=fa99d9023a72f0ee1f6848b31d7669019419baa8;hb=9343c4deb0bf88c58d9c92d465d8e99f64656875;hp=5de71e6ee967f5a2df1a481586a555445cbead9e;hpb=cb90b01c85183b2c75ee6d22b378b3ca99df6bf3;p=master-thesis.git

diff --git a/Parasitemia/ParasitemiaUI/Types.fs b/Parasitemia/ParasitemiaUI/Types.fs
index 5de71e6..fa99d90 100644
--- a/Parasitemia/ParasitemiaUI/Types.fs
+++ b/Parasitemia/ParasitemiaUI/Types.fs
@@ -7,13 +7,20 @@ open System.Windows.Media
 open Emgu.CV
 open Emgu.CV.Structure
 
+open Newtonsoft.Json
+
+open ParasitemiaCore.UnitsOfMeasure
+
 let healthyRBColor = Color.FromRgb(255uy, 255uy, 0uy) // Yellow-green.
 let infectedRBColor = Color.FromRgb(255uy, 0uy, 40uy) // Red with a bit of blue.
 
 type RBC = {
     num: int
 
+    [<JsonIgnore>]
     mutable infected: bool
+
+    [<JsonIgnore>]
     mutable setManually: bool
 
     center: Point
@@ -22,6 +29,8 @@ type RBC = {
 
 type SourceImage = {
     mutable num: int
+    mutable name: string
+
     mutable config: ParasitemiaCore.Config.Config
     mutable dateLastAnalysis: DateTime // UTC.
     img: Image<Bgr, byte>
@@ -38,4 +47,33 @@ type SourceImage = {
     member this.InfectedRBCColor: SolidColorBrush =
         let mutable color = infectedRBColor * this.infectedRBCBrightness
         color.A <- 255uy;
-        SolidColorBrush(color)
\ No newline at end of file
+        SolidColorBrush(color)
+
+type PredefinedPPI = {
+    ppi: int<ppi>
+    label: string } with
+    override this.ToString() =
+        sprintf "%s: %d" this.label this.ppi
+
+type SensorSize = {
+    w: float<mm>
+    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 + ")")
+
+let defaultPredefinedPPI = [
+    { ppi = 230000<ppi>; label = "50×" }
+    { ppi = 460000<ppi>; label = "100×" } ]
+
+let defaultSensorSizes = [
+    { w = 3.2<mm>;  h = 2.4<mm>;  label = "1/4″" }
+    { w = 4.8<mm>;  h = 3.6<mm>;  label = "1/3″" }
+    { w = 5.76<mm>; h = 4.29<mm>; label = "1/2.5″" }
+    { w = 6.4<mm>;  h = 4.8<mm>;  label = "1/2″" }
+    { w = 7.18<mm>; h = 5.32<mm>; label = "1/1.8″" }
+    { w = 7.6<mm>;  h = 5.7<mm>;  label = "1/1.7″" }
+    { w = 8.8<mm>;  h = 6.6<mm>;  label = "2/3″" }
+    { w = 13.2<mm>; h = 8.8<mm>;  label = "1″" } ]
+
+