Update test - allow slack in MinAreaCircle

Villavu · Dec 18, 2024 · 4af06dc · 4af06dc
1 parent 33b877b
commit 4af06dc
Showing 1 changed file with 2 additions and 5 deletions.
diff --git a/Tests/tpa_minareacircle.simba b/Tests/tpa_minareacircle.simba
@@ -18,11 +18,8 @@ begin
   for I := 0 to High(ATPA) do
   begin
     C := ATPA[I].MinAreaCircle();
-    Assert(C = expected[i]);
-    Assert(Round(ATPA[I].Circularity()*100) = expectedCircularity[I]);
-
-    //img.DrawCircle(C, 255);
-    //img.DrawText('%.2f'.Format([ATPA[I].Circularity()]), C.Bounds, True, 255);
+    Assert(Abs(C.Radius - expected[i].Radius) <= 1);
+    Assert(Abs(ATPA[I].Circularity()*100 - expectedCircularity[I]) <= 1);
   end;
 
   //img.Show();