Branch Coverage

blib/lib/Math/PlanePath/UlamWarburtonQuarter.pm
Criterion Covered Total %
branch 67 112 59.8


line true false branch
63 0 0 $self->{'parts'} eq 'octant' ? :
67 0 0 $self->{'parts'} eq 'octant_up' ? :
84 0 0 $self->{'parts'} =~ /octant/ ? :
92 8 4 unless (defined $self->{'n_start'})
96 0 12 unless (exists $dir_maximum_dxdy{$parts})
156 0 117 if ($n < $self->{'n_start'})
157 0 117 if (is_infinite($n))
163 0 117 if ($n != $int)
175 13 104 if ($n == 1)
177 0 104 unless my($depthsum, $nrem, $rowwidth) = _n1_to_depthsum_rem_width($self, $n)
182 0 104 if ($self->{'parts'} eq 'octant_up')
200 140 81 if ($ndigit) { }
201 69 71 if ($ndigit == 2)
222 0 346 $parts eq 'octant' ? :
115 231 if ($y < 0 or $x < ($parts eq 'octant' ? $y : 0) or $parts eq 'octant_up' and $x > $y)
227 14 217 if ($x == 0 and $y == 0)
234 0 217 if (is_infinite($exp))
250 501 295 if ($x >= $len or $y >= $len)
262 330 171 if ($x) { }
263 46 284 unless ($y)
267 45 126 if ($y)
273 284 126 if ($x or $y)
276 101 183 if ($y < 0) { }
87 96 elsif ($x >= 0) { }
296 0 126 if ($self->{'parts'} eq 'octant_up')
313 0 50 if $x1 > $x2
314 0 50 if $y1 > $y2
316 0 50 if ($x2 < 0 or $y2 < 0)
320 0 50 if ($x1 < 0)
321 0 50 if ($y1 < 0)
324 22 28 $x1 > $y1 ? :
325 22 28 $x2 > $y2 ? :
330 50 0 if ($dlo)
347 0 9 if ($n < $self->{'n_start'})
355 19 17 if (defined(my $n_child = $self->xy_to_n($x + $dx, $y + $dy)))
356 11 8 if ($n_child > $n)
366 1 11 if ($n <= $self->{'n_start'})
373 24 9 if (defined(my $n_parent = $self->xy_to_n($x + $dx, $y + $dy)))
374 11 13 if ($n_parent < $n)
392 0 893 if (is_infinite($depth))
395 0 893 unless ($depth >= 0)
402 1932 1710 if ($bit)
407 0 893 if ($self->{'parts'} =~ /octant/) { }
419 0 0 if ($n < 1)
422 0 0 unless (my $depthsum, $n) = _n1_to_depthsum_rem_width($self, $n)
441 0 104 $octant ? :
442 0 104 if (is_infinite($exp))
452 0 104 if ($octant)
457 0 0 if ($sub > $n)
477 0 341 if ($octant)
489 221 120 if ($rem >= 0)
515 0 0 if ($n < 1)
518 0 0 unless my($depthsum, $nrem, $rowwidth) = _n1_to_depthsum_rem_width($self, $n)
523 0 0 if ($self->{'parts'} eq 'octant_up')
531 0 0 if (@$depthsum) { }
549 0 0 unless (defined $depth)