Branch Coverage

blib/lib/Math/PlanePath/TriangularHypot.pm
Criterion Covered Total %
branch 62 90 68.8


line true false branch
136 0 0 $self->{'points'} eq 'hex_centred' ? :
0 0 $self->{'points'} eq 'odd' ? :
143 0 0 $self->{'points'} eq 'odd' ? :
160 0 0 defined $n ? :
182 0 0 $self->{'points'} eq 'hex' || $self->{'points'} eq 'odd' ? :
197 0 0 defined $n ? :
207 13 0 unless (defined $self->{'n_start'})
212 2 11 if ($points eq 'all') { }
4 7 elsif ($points eq 'even') { }
2 5 elsif ($points eq 'odd') { }
2 3 elsif ($points eq 'hex') { }
1 2 elsif ($points eq 'hex_rotated') { }
2 0 elsif ($points eq 'hex_centred') { }
316 2443 83253 if ($hypot == $y_next_hypot->[$i]) { }
7689 75564 elsif ($hypot > $y_next_hypot->[$i]) { }
328 259 3465 if ($y[-1] == $#$y_next_x)
335 28 231 if ($points eq 'even') { }
55 176 elsif ($points eq 'odd') { }
56 120 elsif ($points eq 'hex') { }
45 75 elsif ($points eq 'hex_rotated') { }
32 43 elsif ($points eq 'hex_centred') { }
349 20 36 $y % 3 == 1 ? :
355 15 30 $y % 3 == 2 ? :
387 1110 4470 if (defined $self->{'skip_hex'} and ($x + 2 + 3 * $_) % 6 == $self->{'skip_hex'}) { }
411 765 2959 if ($self->{'symmetry'} == 12) { }
1106 1853 elsif ($self->{'symmetry'} == 6) { }
416 84 681 unless ($y[0])
420 26 739 if ($x[-1] == 3 * $y[-1])
451 67 1039 unless ($y[0])
455 66 1040 if ($x[-1] == $y[-1])
487 68 1785 if ($x[$p1] == 0)
491 119 1734 if ($y[-1] == 0)
520 0 29994 if ($n < 0)
521 0 29994 if (is_infinite($n))
542 0 0 if (defined $self->{'skip_parity'})
545 0 0 if (($x % 2 ^ $y % 2) == $self->{'skip_parity'})
550 0 0 if (defined $self->{'skip_hex'})
553 0 0 if (($x % 6 + 3 * ($y % 6)) % 6 == $self->{'skip_hex'})
570 881 1324 if (defined $self->{'skip_parity'} and ($x % 2 ^ $y % 2) == $self->{'skip_parity'})
575 147 1177 if (defined $self->{'skip_hex'} and ($x % 6 + 3 * ($y % 6)) % 6 == $self->{'skip_hex'})
583 0 1177 if (is_infinite($hypot))
598 1177 4178 if ($x == $n_to_x->[$n] and $y == $n_to_y->[$n])
603 0 4178 if ($n_to_x->[$n] ** 2 + 3 * $n_to_y->[$n] ** 2 != $hypot)
619 0 5 if ($x1 > $x2)
620 0 5 if ($y1 > $y2)