Branch Coverage

blib/lib/Math/PlanePath/OneOfEight.pm
Criterion Covered Total %
branch 136 392 34.6


line true false branch
208 0 11 unless (exists $dir_maximum_dxdy{$parts})
244 0 92 if ($n < 0)
245 0 92 if (is_infinite($n))
251 0 92 if ($n != $int)
266 22 70 if ($n <= $#$initial)
321 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') { }
335 0 0 if ($n < $add) { }
353 42 28 if ($parts eq '4')
356 18 24 if ($n >= $hadd)
363 42 28 if ($parts eq '2' or $parts eq '4')
366 19 23 if ($n >= $qadd)
373 24 46 if ($n >= $add)
383 0 0 _is_pow2($depth + 2) ? :
386 0 0 if ($n < $add) { }
397 0 0 if ($n < $add) { }
404 0 0 if ($n < $add) { }
410 0 0 if ($n < $add) { }
420 0 0 if ($n < $add) { }
443 0 0 _is_pow2($depth + 2) ? :
446 0 0 if ($n < $add) { }
460 0 0 if ($n < $add) { }
468 0 0 if ($n < $add) { }
477 0 0 if ($n < $add) { }
487 0 0 if ($n < $add) { }
511 0 0 if ($n < $add) { }
536 36 86 if ($depth < $pow)
542 46 40 if ($depth <= 3)
543 17 29 if ($mirror) { }
545 0 17 if ($depth == $top_no_extra_pow - 1)
553 1 28 if (not $log2_extras and $depth == 3)
571 24 16 if ($depth <= 1)
573 7 17 if ($mirror)
584 9 7 if ($mirror == 0) { }
589 3 6 if ($depth + 1 < $pow) { }
591 3 0 if (_is_pow2($depth + 2))
597 1 2 if ($n < $add)
617 0 8 if (not $log2_extras and $depth + 1 == $pow)
622 4 4 if ($n < $add)
627 4 0 $log2_extras ? :
647 0 7 if ($depth == $top_no_extra_pow - 1)
652 2 5 if ($n < $eadd)
662 4 1 if ($n < $add)
664 4 0 $log2_extras ? :
730 0 70 if (is_infinite($exp))
749 141 125 if ($try_n_depth <= $n)
816 0 60 if (is_infinite($x))
819 0 60 if (is_infinite($y))
829 0 60 if (is_infinite($exp))
846 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') { }
848 0 0 if ($y < 0 or $y > $x)
851 0 0 if ($x <= 1 and $y <= 1)
857 0 0 if ($x < 0 or $x > $y)
861 0 0 if ($x <= 1 and $y <= 1)
871 0 0 if ($x > $y or $x < -$y)
874 0 0 if (abs $x <= 1 and $y <= 1)
877 0 0 if ($x >= 0) { }
890 0 60 if ($parts eq '1') { }
892 0 0 if ($x < 0 or $y < 0)
895 0 0 if ($x <= 1 and $y <= 1)
900 18 42 if (abs $x <= 1 and abs $y <= 1)
903 18 24 if ($y < 0)
910 19 23 if ($x < 0)
919 13 29 if ($y > $x)
926 34 8 if ($mult)
935 0 0 if (abs $x <= 1 and abs $y <= 1)
939 0 0 if ($y < 0) { }
940 0 0 if ($x < 0)
945 0 0 if ($y >= $x) { }
962 0 0 if ($x >= 0) { }
963 0 0 if ($y <= $x) { }
1001 0 0 if ($y >= $x) { }
1044 0 0 if (abs $x <= 1 and abs $y <= 2)
1048 0 0 if ($y < 0) { }
1049 0 0 if ($x < 0)
1054 0 0 if ($y >= $x) { }
1071 0 0 if ($x > 0) { }
1072 0 0 if ($y <= $x) { }
1113 0 0 if ($y >= $x) { }
1170 0 0 if ($x < 0 or $y < 0)
1173 0 0 if ($x <= 1 and $y <= 1)
1177 0 0 if ($y > $x)
1211 0 42 if ($x == 0 or $y == 0)
1223 24 18 if ($x <= 3)
1227 20 4 if ($x == 3)
1228 0 20 unless ($log2_extras)
1229 0 0 if ($y == 1)
1233 0 0 unless ($mirror)
1238 0 20 if ($top_no_extra_pow == 4)
1239 0 0 if ($y == 3)
1250 0 24 unless (defined $nyx)
1259 4 14 if ($x == $pow) { }
14 0 elsif ($x == $pow + 1) { }
1260 4 0 if ($y == $pow)
1268 5 9 if ($y == $pow - 1)
1271 2 3 $mirror ? :
1274 6 3 if ($y == $pow)
1280 3 0 if ($y == $pow + 1)
1283 0 3 $mirror ? :
1288 0 0 if ($x < $pow) { }
1295 0 0 if ($y < $pow) { }
1299 0 0 if ($y > $x) { }
1304 0 0 unless ($y and $x < $pow)
1311 0 0 if ($mirror)
1322 0 0 if ($mirror) { }
1329 0 0 if ($x < $pow - 1)
1338 0 0 $log2_extras ? :
1344 0 0 unless ($x)
1348 0 0 if ($mirror) { }
1351 0 0 if ($x < $pow - 1)
1362 0 0 $log2_extras ? :
1376 0 0 if (--$exp < 0)
1378 0 0 if ($x == 1 and $y == 1) { }
0 0 elsif ($x == 1 and $y == 2) { }
1402 34 8 if (@add_offset)
1406 0 34 if ($d + 1 == $add_top_no_extra_pow[$i])
1410 0 0 if (not $add_log2_extras[$i] and $d >= 3 and _is_pow2($d + 1))
1439 0 0 if $x1 > $x2
1440 0 0 if $y1 > $y2
1443 0 0 $parts eq '3side' ? :
1451 0 0 if ($parts eq '1')
1480 0 0 if ($n < 0)
1495 0 0 unless my($x, $y) = $self->n_to_xy($n)
1511 0 0 if ($n < 0)
1514 0 0 unless my($x, $y) = $self->n_to_xy($n)
1521 0 0 if (defined $pn and $self->tree_n_to_depth($pn) == $parent_depth)
1838 0 413 if ($depth < 0)
1845 21 392 if ($depth <= $#$initial)
1854 0 392 if (is_infinite($exp))
1873 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') { }
1905 3 9 $depth == $pow - 1 ? :
1927 3 563 if ($depth <= 1)
1933 24 539 if ($rem < 0)
1945 474 65 if ($rem <= 1) { }
1946 297 177 if ($rem == 0) { }
1966 16 49 if ($rem1 == $pow) { }
0 49 elsif (@new_pending and $new_pending[-1] == $rem1) { }
2030 0 122 if (is_infinite($exp))
2051 17 115 if ($depth <= $#_depth_to_octant_added)
2056 0 115 if ($depth < $pow)
2069 99 16 if ($rem <= 1) { }
2070 8 91 if ($rem == 0) { }
2079 11 5 if ($rem1 == $pow) { }
2088 5 0 _is_pow2($rem + 2) ? :
2090 0 5 if (@new_depth and $new_depth[-1] == $rem1) { }
2144 0 0 if ($n < 0)
2145 0 0 if (is_infinite($n))
2153 0 0 if (my $initial = $tree_n_to_subheight{$parts}[$depth])
2158 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') { }
2168 0 0 if ($n >= $add)
2175 0 0 if (_is_pow2($depth + 2))
2180 0 0 if ($n < 0)
2190 0 0 if ($n >= $end) { }
2196 0 0 if ($n >= $add)
2204 0 0 if (_is_pow2($depth + 2))
2209 0 0 if ($n < 0)
2216 0 0 if ($n < 2 * $add) { }
2217 0 0 if ($n >= $add)
2224 0 0 if ($n < 2 * $add) { }
2226 0 0 if ($n >= $add)
2236 0 0 if ($depth == 1)
2237 0 0 $n % 2 ? :
2245 0 0 if ($n < 0) { }
2261 0 0 if ($n == 0)
2265 0 0 if $depth < $pow
2267 0 0 if (defined $dbase)
2271 0 0 if ($depth == 1)
2273 0 0 if ($n == 1)
2283 0 0 if ($n < $add) { }
2290 0 0 if ($n < 0) { }
2305 0 0 defined $dbase ? :
2315 60 10 unless ($$self{'parts'} eq '3side')
2321 0 0 unless (defined $depth)
2336 0 0 if ($n < 2)