Branch Coverage

blib/lib/Math/PlanePath/AlternatePaper.pm
Criterion Covered Total %
branch 71 128 55.4


line true false branch
95 0 0 $self->arms_count <= 3 ? :
101 0 0 $self->arms_count == 1 ? :
166 0 7847 if ($n < 0)
167 0 7847 if (is_infinite($n))
204 3378 4469 if ($arm & 1)
207 2889 4958 if ($arm & 2)
210 2027 5820 if ($arm & 4)
249 0 159 if (is_infinite($x))
250 0 159 if (is_infinite($y))
257 118 113 if ++$arm >= $arms
261 41 72 if ++$arm >= $arms
276 96 161 if ($y < 0 or $y > $x or $x < 0)
284 0 161 if (is_infinite($level))
301 122 305 if ($rev) { }
302 54 68 if ($x + $y < 2 * $len) { }
304 34 20 if ($x < $len) { }
314 23 45 if ($y > $len or $x == $len and $y == $len) { }
327 174 131 if ($x + $y <= 2 * $len and not $x == $len && $y == $len and not $x == 2 * $len && $y == 0) { }
331 120 54 if ($x <= $len) { }
341 71 60 if ($y >= $len and not $x == 2 * $len && $y == $len) { }
357 169 258 if ($big_rev) { }
358 81 88 if ($big_x + $big_y <= 2 * $len and not $big_x == $len && $big_y == $len and not $big_x == 2 * $len && $big_y == 0) { }
362 59 22 if ($big_x <= $len) { }
372 33 55 if ($big_y >= $len and not $big_x == 2 * $len && $big_y == $len) { }
385 162 96 if ($big_x + $big_y < 2 * $len) { }
387 57 105 if ($big_x < $len) { }
397 54 42 if ($big_y > $len or $big_x == $len and $big_y == $len) { }
412 67 94 if ($x)
413 19 48 $rev ? :
415 67 94 if ($big_x)
416 54 13 $big_rev ? :
422 105 56 $n == $big_n ? :
437 0 40 if $x1 > $x2
438 0 40 if $y1 > $y2
443 0 40 if ($arms == 1 and $y1 > $x2 or $arms <= 2 and $x2 < 0 or $arms <= 4 and $y2 < 0)
456 35 5 $arms >= 2 ? :
25 15 $arms >= 4 ? :
15 25 $arms >= 6 ? :
472 0 2000 if ($n < 0)
473 0 2000 if (is_infinite($n))
489 681 1319 ($#bits ^ $arm) & 1 ? :
497 9088 6903 if ($bit != $prev)
509 0 2000 if ($n)
518 0 0 $arm & 1 ? :
522 0 0 if ($bits[0])
731 0 0 if ($level == 0)
735 0 0 $odd ? :
741 0 0 if ($level == 0)
745 0 0 $odd ? :
752 0 0 $odd ? :
762 0 0 if (not $n >= 0 or is_infinite($n))
769 0 0 if ($arm == 1)
775 0 0 unless ($arm == 0 or $arm == 7 and $n > 0)
786 0 0 if (not $n >= 0 or is_infinite($n))
789 0 0 if ($self->{'arms'} >= 8 and $n == 15)
790 0 0 if (_divrem_mutate($n, $self->{'arms'}) >= 2)
800 0 0 if ($self->{'arms'} >= 8 or not $n >= 0 or is_infinite($n))
807 0 0 if (_divrem_mutate($n, $self->{'arms'}) >= 1)
827 0 0 if ($arms >= 8 or not $n >= 0 or is_infinite($n))
834 0 0 if ($n == 1 and $arms >= 4 or $n == 3 and $arms >= 5 or $n == 5 and $arms == 7)
839 0 0 if (_divrem_mutate($n, $arms) < $arms - 1)
844 0 0 if ($arms % 2) { }
861 0 0 if ($digit >= 2)
869 0 0 if ($digit == 1 or $digit == 3)