* Add the possibility to set an RBC as healthy or infected

[master-thesis.git] / Parasitemia / Parasitemia / GUI / Types.fs

diff --git a/Parasitemia/Parasitemia/GUI/Types.fs b/Parasitemia/Parasitemia/GUI/Types.fs
index d6e9cf9..6e00586 100644 (file)
--- a/Parasitemia/Parasitemia/GUI/Types.fs
+++ b/Parasitemia/Parasitemia/GUI/Types.fs
@@ -8,15 +8,19 @@ open Emgu.CV.Structure
 type RBC = {
     num: int
 
-    infected: bool
-    addedManually: bool
-    removed: bool
+    mutable infected: bool
+    mutable setManually: bool
 
     center: Point
     size: Size
-    stainArea: int }
+    infectedArea: int } with
+    member this.SetAsInfected (infected: bool) =
+        if infected <> this.infected
+        then
+            this.infected <- infected
+            this.setManually <- not this.setManually
 
 type SourceImage = {
     num: int
     img: Image<Bgr, byte>
-    rbcs: RBC list }
\ No newline at end of file
+    mutable rbcs: RBC list }
\ No newline at end of file