override this.ToString () =
sprintf "{Ellipse: cx = %f, cy = %f, a = %f, b = %f, alpha = %f}" this.Cx this.Cy this.A this.B this.Alpha
+[<Struct>]
type CellClass = HealthyRBC | InfectedRBC | Peculiar
type Cell =
let result = ResultBuilder ()
-type AnalysisResult =
+type AnalysisResult =
{
Cells : Cell list
RBCSize_μm : float<μm>