+ mutable rbcs: RBC list
+
+ mutable healthyRBCBrightness: float32
+ mutable infectedRBCBrightness: float32 } with
+
+ member this.HealthyRBCColor: SolidColorBrush =
+ let mutable color = healthyRBColor * this.healthyRBCBrightness
+ color.A <- 255uy;
+ SolidColorBrush(color)
+
+ member this.InfectedRBCColor: SolidColorBrush =
+ let mutable color = infectedRBColor * this.infectedRBCBrightness
+ color.A <- 255uy;
+ SolidColorBrush(color)
\ No newline at end of file