open Utils
// All ellipses with a score below this are removed.
-let matchingScoreThresholdPerRadiusUnit = 0.02f // For a radius of 1.
+let matchingScoreThresholdPerRadiusUnit = 0.025f // For a radius of 1.
let matchingScorePower = 20.f
let windowSizeRadiusFactor = 1.f / 2.f
-let minimumDistanceFromCenterRadiusFactor = 1.f / 3.f // 1.f / 3.f
+let minimumDistanceFromCenterRadiusFactor = 1.f / 4.f
type private EllipseScoreFlaggedKd (matchingScore: float32, e: Ellipse) =
let mutable matchingScore = matchingScore