X-Git-Url: http://git.euphorik.ch/?a=blobdiff_plain;f=Parasitemia%2FParasitemia%2FTypes.fs;h=5db6bb68dc29a84719a95ab67593ab0028fa8506;hb=81d1b86719a1ebaf649c1de4c1364603155a53e1;hp=6240519d02f70fe904d9030c1c96a0d343facadb;hpb=044b0ae69df3ac565432545b2fa934589016f9bd;p=master-thesis.git

diff --git a/Parasitemia/Parasitemia/Types.fs b/Parasitemia/Parasitemia/Types.fs
index 6240519..5db6bb6 100644
--- a/Parasitemia/Parasitemia/Types.fs
+++ b/Parasitemia/Parasitemia/Types.fs
@@ -42,12 +42,13 @@ type Ellipse (cx: float32, cy: float32, a: float32, b: float32, alpha: float32)
     override this.ToString () =
         sprintf "(cx: %A, cy: %A, a: %A, b: %A, alpha: %A)" this.Cx this.Cy this.A this.B this.Alpha
 
-
 type CellClass = HealthyRBC | InfectedRBC | Peculiar
 
 type Cell = {
     cellClass: CellClass
     center: Point
+    infectedArea: int
+    stainArea: int
     elements: Matrix<byte> }
 
 [<Struct>]