Branch Coverage

blib/lib/Math/Shape/Point.pm
Criterion Covered Total %
branch 18 18 100.0


line true false branch
14 2 4 unless @_ == 4
118 1 20 if ($self->get_location->[0] == $p->get_location->[0] and $self->get_location->[1] == $p->get_location->[1])
126 9 11 if ($atan <= 0) { }
6 5 elsif ($atan <= 1.5707963267948966) { }
141 6 14 if ($angle > -0.78539816339744828 and $angle <= 0.78539816339744828) { }
5 9 elsif ($angle > 0.78539816339744828 and $angle <= 2.3561944901923448) { }
4 5 elsif ($angle > 2.3561944901923448 and $angle <= 3.9269908169872414) { }
152 26 10 $pi_ratio < 1 ? :
175 1 440 if ($$self{'x'} == $x and $$self{'y'} == $y) { }