Branch Coverage

blib/lib/Math/PlanePath/AlternatePaper.pm
Criterion Covered Total %
branch 69 124 55.6


line true false branch
95 0 0 $self->arms_count <= 3 ? :
101 0 0 $self->arms_count == 1 ? :
172 0 7847 if ($n < 0)
173 0 7847 if (is_infinite($n))
210 3368 4479 if ($arm & 1)
213 2888 4959 if ($arm & 2)
216 2026 5821 if ($arm & 4)
254 0 159 if (is_infinite($x))
255 0 159 if (is_infinite($y))
262 118 113 if ++$arm >= $arms
266 41 72 if ++$arm >= $arms
281 93 165 if ($y < 0 or $y > $x or $x < 0)
289 0 165 if (is_infinite($level))
306 121 308 if ($rev) { }
307 39 82 if ($x + $y < 2 * $len) { }
309 19 20 if ($x < $len) { }
319 28 54 if ($y > $len or $x == $len and $y == $len) { }
332 178 130 if ($x + $y <= 2 * $len and not $x == $len && $y == $len and not $x == 2 * $len && $y == 0) { }
336 117 61 if ($x <= $len) { }
346 70 60 if ($y >= $len and not $x == 2 * $len && $y == $len) { }
362 161 268 if ($big_rev) { }
363 67 94 if ($big_x + $big_y <= 2 * $len and not $big_x == $len && $big_y == $len and not $big_x == 2 * $len && $big_y == 0) { }
367 44 23 if ($big_x <= $len) { }
377 34 60 if ($big_y >= $len and not $big_x == 2 * $len && $big_y == $len) { }
390 170 98 if ($big_x + $big_y < 2 * $len) { }
392 65 105 if ($big_x < $len) { }
402 56 42 if ($big_y > $len or $big_x == $len and $big_y == $len) { }
417 61 104 if ($x)
418 18 43 $rev ? :
420 61 104 if ($big_x)
421 48 13 $big_rev ? :
427 109 56 $n == $big_n ? :
442 0 40 if $x1 > $x2
443 0 40 if $y1 > $y2
448 0 40 if ($arms == 1 and $y1 > $x2 or $arms <= 2 and $x2 < 0 or $arms <= 4 and $y2 < 0)
461 35 5 $arms >= 2 ? :
25 15 $arms >= 4 ? :
15 25 $arms >= 6 ? :
492 681 1319 ($#bits ^ $arm) & 1 ? :
500 9088 6903 if ($bit != $prev)
512 0 2000 if ($n)
521 0 0 $arm & 1 ? :
525 0 0 if ($bits[0])
734 0 0 if ($level == 0)
738 0 0 $odd ? :
744 0 0 if ($level == 0)
748 0 0 $odd ? :
755 0 0 $odd ? :
765 0 0 if (not $n >= 0 or is_infinite($n))
772 0 0 if ($arm == 1)
778 0 0 unless ($arm == 0 or $arm == 7 and $n > 0)
789 0 0 if (not $n >= 0 or is_infinite($n))
792 0 0 if ($self->{'arms'} >= 8 and $n == 15)
793 0 0 if (_divrem_mutate($n, $self->{'arms'}) >= 2)
803 0 0 if ($self->{'arms'} >= 8 or not $n >= 0 or is_infinite($n))
810 0 0 if (_divrem_mutate($n, $self->{'arms'}) >= 1)
830 0 0 if ($arms >= 8 or not $n >= 0 or is_infinite($n))
837 0 0 if ($n == 1 and $arms >= 4 or $n == 3 and $arms >= 5 or $n == 5 and $arms == 7)
842 0 0 if (_divrem_mutate($n, $arms) < $arms - 1)
847 0 0 if ($arms % 2) { }
864 0 0 if ($digit >= 2)
872 0 0 if ($digit == 1 or $digit == 3)