Bugfix in polyline simplification

This commit is contained in:
Alessandro Ranellucci 2011-10-03 20:40:49 +02:00
parent 865e234a44
commit ef201a99cc
3 changed files with 48 additions and 19 deletions

View file

@ -12,7 +12,7 @@ use constant X => 0;
use constant Y => 1;
use constant epsilon => 1E-8;
use constant epsilon2 => epsilon**2;
our $parallel_degrees_limit = abs(deg2rad(10));
our $parallel_degrees_limit = abs(deg2rad(3));
sub slope {
my ($line) = @_;