+
+ maxDarkStainRatio: float
+
+ minimumCellArea: float // Factor of RBC area.
+}
+
+type Config (param: Parameters) =
+ member this.Parameters = param
+ member val Debug = DebugOff with get, set
+ member val RBCSize = 30. with get, set
+
+ member this.RBCMin = this.RBCSize + param.minRbcRadius * this.RBCSize
+ member this.RBCMax = this.RBCSize + param.maxRbcRadius * this.RBCSize
+
+ member this.RBCMinArea = param.minimumCellArea * Math.PI * this.RBCSize ** 2.0
+
+ member this.ParasiteArea = param.infectionArea * Math.PI * this.RBCSize ** 2.0
+ member this.StainArea = param.stainArea * Math.PI * this.RBCSize ** 2.0