X-Git-Url: http://git.euphorik.ch/?p=master-thesis.git;a=blobdiff_plain;f=Parasitemia%2FParasitemia%2FConfig.fs;h=a1b06e2b588adc35079d5f0809001d43d75fd68d;hp=55e142cd200efccfd8c402a67d784454a01d6b0d;hb=6d99ab0dadc57e91cd846844b620fc90b52a2f96;hpb=70c9b65e9034c14b5c63345cda3d5d579bbdc57c diff --git a/Parasitemia/Parasitemia/Config.fs b/Parasitemia/Parasitemia/Config.fs index 55e142c..a1b06e2 100644 --- a/Parasitemia/Parasitemia/Config.fs +++ b/Parasitemia/Parasitemia/Config.fs @@ -26,7 +26,7 @@ type Parameters = { infectionArea: float // Factor of a RBC area. 0.5 means the half of RBC area. infectionLevel: float // [0, 1] - infectionPixelsRequired: int + parasitePixelsRequired: int maxDarkStainRatio: float @@ -36,12 +36,12 @@ type Parameters = { type Config (param: Parameters) = member this.Parameters = param member val Debug = DebugOff with get, set - member val RBCSize = 30. with get, set + member val RBCRadius = 30. with get, set - member this.RBCMin = this.RBCSize + param.minRbcRadius * this.RBCSize - member this.RBCMax = this.RBCSize + param.maxRbcRadius * this.RBCSize + member this.RBCMinRadius = this.RBCRadius + param.minRbcRadius * this.RBCRadius + member this.RBCMaxRadius = this.RBCRadius + param.maxRbcRadius * this.RBCRadius - member this.RBCMinArea = param.minimumCellArea * Math.PI * this.RBCSize ** 2.0 + member this.RBCMinArea = param.minimumCellArea * Math.PI * this.RBCRadius ** 2.0 - member this.ParasiteArea = param.infectionArea * Math.PI * this.RBCSize ** 2.0 - member this.StainArea = param.stainArea * Math.PI * this.RBCSize ** 2.0 + member this.InfectionArea = param.infectionArea * Math.PI * this.RBCRadius ** 2.0 + member this.StainArea = param.stainArea * Math.PI * this.RBCRadius ** 2.0