X-Git-Url: http://git.euphorik.ch/?p=master-thesis.git;a=blobdiff_plain;f=Parasitemia%2FParasitemiaCore%2FMatchingEllipses.fs;h=c7a06279be6c7bb375098543ad3993bc743dbe5a;hp=4cc3d2ba891b4120d2b369a6d44c3227d9c1b0c9;hb=94fbffc758bf0299b077e344ebcbecca408ae564;hpb=cb90b01c85183b2c75ee6d22b378b3ca99df6bf3 diff --git a/Parasitemia/ParasitemiaCore/MatchingEllipses.fs b/Parasitemia/ParasitemiaCore/MatchingEllipses.fs index 4cc3d2b..c7a0627 100644 --- a/Parasitemia/ParasitemiaCore/MatchingEllipses.fs +++ b/Parasitemia/ParasitemiaCore/MatchingEllipses.fs @@ -47,7 +47,7 @@ type MatchingEllipses (radius: float32) = let tree = KdTree.Tree.BuildTree (List.ofSeq ellipses) // 2) Compute the matching score of each ellipses. - let windowSize = radius / 2.f + let windowSize = radius / 3.f for e in ellipses do e.Processed <- true let areaE = e.Ellipse.Area