Geo::Geos::Noding::ScaledNoder - Wraps a Noder and transforms its input into the integer domain.
use Geo::Geos::Coordinate; use Geo::Geos::PrecisionModel; use Geo::Geos::Noding::NodedSegmentString; use Geo::Geos::Noding::IteratedNoder; use Geo::Geos::Noding::ScaledNoder; my $c1 = Geo::Geos::Coordinate->new(0,1); my $c2 = Geo::Geos::Coordinate->new(2,1); my $c3 = Geo::Geos::Coordinate->new(1,0); my $c4 = Geo::Geos::Coordinate->new(1,2); my $pm = Geo::Geos::PrecisionModel->new; my $ss1 = Geo::Geos::Noding::NodedSegmentString->new([$c1, $c2]); my $ss2 = Geo::Geos::Noding::NodedSegmentString->new([$c3, $c4]); my $n = Geo::Geos::Noding::IteratedNoder->new($pm); $n->computeNodes([$ss1, $ss2]); my $nScaleFactor = 2; my $nOffsetX = 0.0; my $nOffsetY = 0.0; my $sn = Geo::Geos::Noding::ScaledNoder->new($n, $nScaleFactor, $nOffsetX, $nOffsetY); # => isa 'Geo::Geos::Noding::ScaledNoder' Geo::Geos::Noding::ScaledNoder->new($n, $nScaleFactor, $nOffsetX, $nOffsetY); # => isa 'Geo::Geos::Noding::Noder' $sn->isIntegerPrecision; # => '' $sn->getNodedSubstrings->[0]; # => isa 'Geo::Geos::Noding::SegmentString';
GEOS C++ Library
geos::noding::ScaledNoder
Geo::Geos
Geo::Geos::Noding::Noder
Geo::Geos::Noding::SegmentString
Ivan Baidakou <i.baydakov@crazypanda.ru>, Crazy Panda, CP Decision LTD
You may distribute this code under the same terms as Perl itself.
To install Geo::Geos, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Geo::Geos
CPAN shell
perl -MCPAN -e shell install Geo::Geos
For more information on module installation, please visit the detailed CPAN module installation guide.