Some improvements to pruning and some additions here and there

This commit is contained in:
Alessandro Ranellucci 2014-03-05 18:43:01 +01:00
parent c2ed6090d3
commit 04d80ca392
6 changed files with 33 additions and 8 deletions

View file

@ -223,6 +223,8 @@ sub make_perimeters {
$self->perimeters->append(@loops);
# process thin walls by collapsing slices to single passes
# the following offset2 ensures nothing in @thin_walls is narrower than $pwidth/10
@thin_walls = @{offset2_ex([ map @$_, @thin_walls ], -$pwidth/10, +$pwidth/10)};
if (@thin_walls) {
# the maximum thickness of our thin wall area is equal to the minimum thickness of a single loop
my @p = map @{$_->medial_axis($pwidth + $pspacing)}, @thin_walls;