3D-printing/OrcaSlicer
1
0
Fork 0
mirror of https://github.com/SoftFever/OrcaSlicer.git synced 2025-08-06 05:24:01 -06:00
Code Issues Projects Releases Packages Wiki Activity Actions 3

Refactoring, new size_3D function

Browse source
This commit is contained in:
Alessandro Ranellucci 2012-09-22 16:12:54 +02:00
parent b5672de3ca
commit 82ac4722d2
2 changed files with 9 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

9
lib/Slic3r/Geometry.pm
View file

@ -20,7 +20,7 @@ our @EXPORT_OK = qw(
shortest_path collinear scale unscale merge_collinear_lines
rad2deg_dir bounding_box_center line_intersects_any douglas_peucker
polyline_remove_short_segments normal triangle_normal polygon_is_convex
scaled_epsilon bounding_box_3D
scaled_epsilon bounding_box_3D size_3D
);
@ -721,6 +721,13 @@ sub bounding_box_3D {
return @extents;
}
sub size_3D {
my ($points) = @_;
my @extents = bounding_box_3D($points);
return map $extents[$_][MAX] - $extents[$_][MIN], (X,Y,Z);
}
sub angle3points {
my ($p1, $p2, $p3) = @_;
# p1 is the center