Ported Polygon->area

This commit is contained in:
Alessandro Ranellucci 2013-08-26 22:44:40 +02:00
parent 1f734807b9
commit 792fcba7be
5 changed files with 12 additions and 7 deletions

View file

@ -8,7 +8,6 @@ use parent 'Slic3r::Polyline';
use Slic3r::Geometry qw(polygon_remove_parallel_continuous_edges
polygon_remove_acute_vertices polygon_segment_having_point
PI X1 X2 Y1 Y2 epsilon);
use Slic3r::Geometry::Clipper qw(JT_MITER);
sub wkt {
my $self = shift;
@ -34,11 +33,6 @@ sub encloses_point {
return Boost::Geometry::Utils::point_covered_by_polygon($point->pp, [$self->pp]);
}
sub area {
my $self = shift;
return Slic3r::Geometry::Clipper::area($self->pp);
}
sub grow {
my $self = shift;
return $self->split_at_first_point->grow(@_);