Branch Coverage

blib/lib/Math/PlanePath/OneOfEight.pm
Criterion Covered Total %
branch 136 394 34.5


line true false branch
209 0 11 unless (exists $dir_maximum_dxdy{$parts})
245 0 92 if ($n < 0)
246 0 92 if (is_infinite($n))
252 0 92 if ($n != $int)
267 22 70 if ($n <= $#$initial)
322 0 70 if ($parts eq 'octant') { }
0 70 elsif ($parts eq 'octant_up') { }
0 70 elsif ($parts eq 'wedge') { }
70 0 elsif ($parts eq '1' or $parts eq '2' or $parts eq '4') { }
0 0 elsif ($parts eq '3mid') { }
0 0 elsif ($parts eq '3side') { }
0 0 elsif ($parts eq 'side') { }
336 0 0 if ($n < $add) { }
354 42 28 if ($parts eq '4')
357 18 24 if ($n >= $hadd)
364 42 28 if ($parts eq '2' or $parts eq '4')
367 19 23 if ($n >= $qadd)
374 24 46 if ($n >= $add)
384 0 0 _is_pow2($depth + 2) ? :
387 0 0 if ($n < $add) { }
398 0 0 if ($n < $add) { }
405 0 0 if ($n < $add) { }
411 0 0 if ($n < $add) { }
421 0 0 if ($n < $add) { }
444 0 0 _is_pow2($depth + 2) ? :
447 0 0 if ($n < $add) { }
461 0 0 if ($n < $add) { }
469 0 0 if ($n < $add) { }
478 0 0 if ($n < $add) { }
488 0 0 if ($n < $add) { }
512 0 0 if ($n < $add) { }
537 36 86 if ($depth < $pow)
543 46 40 if ($depth <= 3)
544 17 29 if ($mirror) { }
546 0 17 if ($depth == $top_no_extra_pow - 1)
554 1 28 if (not $log2_extras and $depth == 3)
572 24 16 if ($depth <= 1)
574 7 17 if ($mirror)
585 9 7 if ($mirror == 0) { }
590 3 6 if ($depth + 1 < $pow) { }
592 3 0 if (_is_pow2($depth + 2))
598 1 2 if ($n < $add)
618 0 8 if (not $log2_extras and $depth + 1 == $pow)
623 4 4 if ($n < $add)
628 4 0 $log2_extras ? :
648 0 7 if ($depth == $top_no_extra_pow - 1)
653 2 5 if ($n < $eadd)
663 4 1 if ($n < $add)
665 4 0 $log2_extras ? :
731 0 70 if (is_infinite($exp))
750 141 125 if ($try_n_depth <= $n)
817 0 60 if (is_infinite($x))
820 0 60 if (is_infinite($y))
830 0 60 if (is_infinite($exp))
847 0 60 if ($parts eq 'octant') { }
0 60 elsif ($parts eq 'octant_up') { }
0 60 elsif ($parts eq 'wedge') { }
60 0 elsif ($parts eq '1' or $parts eq '4') { }
0 0 elsif ($parts eq '3mid') { }
0 0 elsif ($parts eq '3side') { }
0 0 elsif ($parts eq 'side') { }
0 0 elsif ($parts eq '2') { }
849 0 0 if ($y < 0 or $y > $x)
852 0 0 if ($x <= 1 and $y <= 1)
858 0 0 if ($x < 0 or $x > $y)
862 0 0 if ($x <= 1 and $y <= 1)
872 0 0 if ($x > $y or $x < -$y)
875 0 0 if (abs $x <= 1 and $y <= 1)
878 0 0 if ($x >= 0) { }
891 0 60 if ($parts eq '1') { }
893 0 0 if ($x < 0 or $y < 0)
896 0 0 if ($x <= 1 and $y <= 1)
901 18 42 if (abs $x <= 1 and abs $y <= 1)
904 18 24 if ($y < 0)
911 19 23 if ($x < 0)
920 13 29 if ($y > $x)
927 34 8 if ($mult)
936 0 0 if (abs $x <= 1 and abs $y <= 1)
940 0 0 if ($y < 0) { }
941 0 0 if ($x < 0)
946 0 0 if ($y >= $x) { }
963 0 0 if ($x >= 0) { }
964 0 0 if ($y <= $x) { }
1002 0 0 if ($y >= $x) { }
1045 0 0 if (abs $x <= 1 and abs $y <= 2)
1049 0 0 if ($y < 0) { }
1050 0 0 if ($x < 0)
1055 0 0 if ($y >= $x) { }
1072 0 0 if ($x > 0) { }
1073 0 0 if ($y <= $x) { }
1114 0 0 if ($y >= $x) { }
1171 0 0 if ($x < 0 or $y < 0)
1174 0 0 if ($x <= 1 and $y <= 1)
1178 0 0 if ($y > $x)
1212 0 42 if ($x == 0 or $y == 0)
1224 24 18 if ($x <= 3)
1228 20 4 if ($x == 3)
1229 0 20 unless ($log2_extras)
1230 0 0 if ($y == 1)
1234 0 0 unless ($mirror)
1239 0 20 if ($top_no_extra_pow == 4)
1240 0 0 if ($y == 3)
1251 0 24 unless (defined $nyx)
1260 4 14 if ($x == $pow) { }
14 0 elsif ($x == $pow + 1) { }
1261 4 0 if ($y == $pow)
1269 5 9 if ($y == $pow - 1)
1272 2 3 $mirror ? :
1275 6 3 if ($y == $pow)
1281 3 0 if ($y == $pow + 1)
1284 0 3 $mirror ? :
1289 0 0 if ($x < $pow) { }
1296 0 0 if ($y < $pow) { }
1300 0 0 if ($y > $x) { }
1305 0 0 unless ($y and $x < $pow)
1312 0 0 if ($mirror)
1323 0 0 if ($mirror) { }
1330 0 0 if ($x < $pow - 1)
1339 0 0 $log2_extras ? :
1345 0 0 unless ($x)
1349 0 0 if ($mirror) { }
1352 0 0 if ($x < $pow - 1)
1363 0 0 $log2_extras ? :
1377 0 0 if (--$exp < 0)
1379 0 0 if ($x == 1 and $y == 1) { }
0 0 elsif ($x == 1 and $y == 2) { }
1403 34 8 if (@add_offset)
1407 0 34 if ($d + 1 == $add_top_no_extra_pow[$i])
1411 0 0 if (not $add_log2_extras[$i] and $d >= 3 and _is_pow2($d + 1))
1440 0 0 if $x1 > $x2
1441 0 0 if $y1 > $y2
1444 0 0 $parts eq '3side' ? :
1452 0 0 if ($parts eq '1')
1481 0 0 if ($n < 0)
1496 0 0 unless my($x, $y) = $self->n_to_xy($n)
1512 0 0 if ($n < 0)
1515 0 0 unless my($x, $y) = $self->n_to_xy($n)
1522 0 0 if (defined $pn and $self->tree_n_to_depth($pn) == $parent_depth)
1839 0 413 if ($depth < 0)
1846 21 392 if ($depth <= $#$initial)
1855 0 392 if (is_infinite($exp))
1874 209 183 if ($parts eq '4') { }
123 60 elsif ($parts eq '1') { }
27 33 elsif ($parts eq 'octant' or $parts eq 'octant_up') { }
9 24 elsif ($parts eq 'wedge') { }
12 12 elsif ($parts eq '3mid') { }
12 0 elsif ($parts eq '3side') { }
0 0 elsif ($parts eq 'side') { }
1906 3 9 $depth == $pow - 1 ? :
1928 3 563 if ($depth <= 1)
1934 24 539 if ($rem < 0)
1946 474 65 if ($rem <= 1) { }
1947 297 177 if ($rem == 0) { }
1967 16 49 if ($rem1 == $pow) { }
0 49 elsif (@new_pending and $new_pending[-1] == $rem1) { }
2031 0 122 if (is_infinite($exp))
2052 17 115 if ($depth <= $#_depth_to_octant_added)
2057 0 115 if ($depth < $pow)
2070 99 16 if ($rem <= 1) { }
2071 8 91 if ($rem == 0) { }
2080 11 5 if ($rem1 == $pow) { }
2089 5 0 _is_pow2($rem + 2) ? :
2091 0 5 if (@new_depth and $new_depth[-1] == $rem1) { }
2145 0 0 if ($n < 0)
2146 0 0 if (is_infinite($n))
2154 0 0 if (my $initial = $tree_n_to_subheight{$parts}[$depth])
2159 0 0 if ($parts eq 'octant') { }
0 0 elsif ($parts eq 'octant_up') { }
0 0 elsif ($parts eq 'wedge') { }
0 0 elsif ($parts eq '3mid') { }
0 0 elsif ($parts eq '3side') { }
2169 0 0 if ($n >= $add)
2176 0 0 if (_is_pow2($depth + 2))
2181 0 0 if ($n < 0)
2191 0 0 if ($n >= $end) { }
2197 0 0 if ($n >= $add)
2205 0 0 if (_is_pow2($depth + 2))
2210 0 0 if ($n < 0)
2217 0 0 if ($n < 2 * $add) { }
2218 0 0 if ($n >= $add)
2225 0 0 if ($n < 2 * $add) { }
2227 0 0 if ($n >= $add)
2237 0 0 if ($depth == 1)
2238 0 0 $n % 2 ? :
2246 0 0 if ($n < 0) { }
2262 0 0 if ($n == 0)
2266 0 0 if $depth < $pow
2268 0 0 if (defined $dbase)
2272 0 0 if ($depth == 1)
2274 0 0 if ($n == 1)
2284 0 0 if ($n < $add) { }
2291 0 0 if ($n < 0) { }
2306 0 0 defined $dbase ? :
2316 60 10 unless ($$self{'parts'} eq '3side')
2322 0 0 unless (defined $depth)
2323 0 0 unless ($$self{'parts'} eq '3side')
2338 0 0 if ($n < 2)