X-Git-Url: http://git.euphorik.ch/?p=master-thesis.git;a=blobdiff_plain;f=Parasitemia%2FParasitemiaCore%2FTypes.fs;fp=Parasitemia%2FParasitemiaCore%2FTypes.fs;h=32f2f8f0f8b380ba1e760b240664961ff9b190cd;hp=f696c2713e8af31693c6730f070d24fbb6c4d65a;hb=a498bc4223a22cd38b91b3348912301e15c077ae;hpb=cd9c55f80bcdc4fc6b85eb1b81474aed005e5016 diff --git a/Parasitemia/ParasitemiaCore/Types.fs b/Parasitemia/ParasitemiaCore/Types.fs index f696c27..32f2f8f 100644 --- a/Parasitemia/ParasitemiaCore/Types.fs +++ b/Parasitemia/ParasitemiaCore/Types.fs @@ -45,6 +45,7 @@ type Ellipse (cx : float32, cy : float32, a : float32, b : float32, alpha : floa override this.ToString () = $"{{{nameof Ellipse}: {nameof this.Cx} = %f{this.Cx}, {nameof this.Cy} = %f{this.Cy}, {nameof this.A} = %f{this.A}, {nameof this.B} = %f{this.B}, {nameof this.Alpha} = %f{this.Alpha}}}" + override this.Equals (other : obj) = match other with | :? Ellipse as otherEllipse ->