From 807ba5b3024fb82823d2f3fb9dafa1702470e56a Mon Sep 17 00:00:00 2001 From: Ian Jackson Date: Thu, 22 Nov 2018 00:29:29 +0000 Subject: [PATCH] distort-stl: Subdivide only those triangles which need it Signed-off-by: Ian Jackson --- distort-stl | 12 ++++++++---- 1 file changed, 8 insertions(+), 4 deletions(-) diff --git a/distort-stl b/distort-stl index cc03ec5..7a0ebee 100755 --- a/distort-stl +++ b/distort-stl @@ -121,14 +121,18 @@ sub op__project_cylinder () { $project_cylinder_radius = shift_arg; $project_cylinder_max_d_theta = $fa * TAU/360; - while (project_cylinder_need_subdivide()) { - $output = []; - foreach my $t (@$triangles) { + my @small_enough = (); + while (my $t = shift @$triangles) { + if (!project_cylinder_triangle_need_subdivide $t) { + push @small_enough, $t; + } else { + local $output = $triangles; subdivide_triangle $t, \&append_triangle; } - $triangles = $output; } + $triangles = \@small_enough; + $output = []; foreach my $t (@$triangles) { project_cylinder_tri $t; -- 2.30.2