| line |
true |
false |
branch |
|
259
|
0 |
0 |
$any_num_children_2{$$self{'parts'}} ? : |
|
289
|
0 |
13 |
unless (exists $parts_to_numroots{$parts}) |
|
308
|
0 |
0 |
if ($n < 0) |
|
309
|
0 |
0 |
if (is_infinite($n)) |
|
314
|
0 |
0 |
if ($n != $int) |
|
325
|
0 |
0 |
if (is_infinite($n)) |
|
329
|
0 |
0 |
if ($parts eq 'diagonal-1') |
|
330
|
0 |
0 |
if ($n <= 3) |
|
352
|
0 |
0 |
if ($parts eq 'wedge') { } |
|
|
0 |
0 |
elsif ($parts eq 'wedge+1') { } |
|
|
0 |
0 |
elsif ($parts eq 'diagonal') { } |
|
|
0 |
0 |
elsif ($parts eq 'diagonal-1') { } |
|
|
0 |
0 |
elsif ((my $numroots = $parts_to_numroots{$parts}) > 1) { } |
|
355
|
0 |
0 |
if ($n < $noct) { } |
|
365
|
0 |
0 |
if ($n < $noct) { } |
|
379
|
0 |
0 |
if ($n < $noct) { } |
|
|
0 |
0 |
elsif ($n >= $nwidth - $noct) { } |
|
396
|
0 |
0 |
if ($n < $noct) { } |
|
|
0 |
0 |
elsif ($n >= $nwidth - $noct) { } |
|
422
|
0 |
0 |
if ($parts eq '3') |
|
423
|
0 |
0 |
if ($quad == 1) |
|
424
|
0 |
0 |
if ($quad == 2) |
|
428
|
0 |
0 |
if ($parts eq 'octant_up') { } |
|
|
0 |
0 |
elsif ($parts eq 'octant_up+1') { } |
|
446
|
0 |
0 |
if $_ |
|
463
|
0 |
0 |
if ($quad & 1) |
|
466
|
0 |
0 |
if ($quad & 2) |
|
489
|
0 |
0 |
if ($parts eq '3') { } |
|
|
0 |
0 |
elsif ($parts eq 'octant') { } |
|
|
0 |
0 |
elsif ($parts eq 'octant+1') { } |
|
|
0 |
0 |
elsif ($parts eq 'octant_up') { } |
|
|
0 |
0 |
elsif ($parts eq 'octant_up+1') { } |
|
|
0 |
0 |
elsif ($parts eq 'wedge') { } |
|
|
0 |
0 |
elsif ($parts eq 'wedge+1') { } |
|
|
0 |
0 |
elsif ($parts eq 'diagonal') { } |
|
|
0 |
0 |
elsif ($parts eq 'diagonal-1') { } |
|
490
|
0 |
0 |
if ($x < 0) { } |
|
491
|
0 |
0 |
if ($y < 0) |
|
497
|
0 |
0 |
if ($y < 0) |
|
504
|
0 |
0 |
if ($y < 0 or $y > $x) |
|
506
|
0 |
0 |
if ($x < 0 or $y < 0 or $y > $x + 1) |
|
509
|
0 |
0 |
if ($x < 0 or $x > $y) |
|
511
|
0 |
0 |
if ($y < 0 or $x < 0 or $x > $y + 1) |
|
514
|
0 |
0 |
if ($x < -1 - $y or $x > $y) |
|
515
|
0 |
0 |
if ($x < 0) |
|
520
|
0 |
0 |
if ($y < 0 or $x < -2 - $y or $x > $y + 1) |
|
521
|
0 |
0 |
if ($x < 0) |
|
527
|
0 |
0 |
if ($x < -1 - $y) |
|
528
|
0 |
0 |
if ($y < 0) { } |
|
|
0 |
0 |
elsif ($x < 0) { } |
|
541
|
0 |
0 |
if ($x == 0 and $y == 0) |
|
544
|
0 |
0 |
if ($x < -$y) |
|
545
|
0 |
0 |
if ($y <= 0) { } |
|
|
0 |
0 |
elsif ($x <= 0) { } |
|
562
|
0 |
0 |
if ($y < 0) |
|
563
|
0 |
0 |
if ($parts ne '4') |
|
571
|
0 |
0 |
if ($x < 0) |
|
572
|
0 |
0 |
if ($parts eq '1') |
|
582
|
0 |
0 |
if (is_infinite($x)) |
|
585
|
0 |
0 |
if (is_infinite($y)) |
|
608
|
0 |
0 |
$x >= $len || $y >= $len ? : |
|
|
0 |
0 |
if ($depthbits[$i] = $x >= $len || $y >= $len ? 1 : 0) |
|
611
|
0 |
0 |
if ($y < $len) { } |
|
|
0 |
0 |
elsif ($x >= $len) { } |
|
636
|
0 |
0 |
if ($quad) |
|
641
|
0 |
0 |
if ($parts eq 'octant_up' or $parts eq 'octant_up+1' or $parts eq 'wedge' or $parts eq 'wedge+1' or $parts eq 'diagonal' or $parts eq 'diagonal-1') |
|
648
|
0 |
0 |
if ($parts eq 'diagonal-1') |
|
649
|
0 |
0 |
if ($depth) |
|
652
|
0 |
0 |
if ($parts eq 'octant_up+1') { } |
|
|
0 |
0 |
elsif ($parts eq 'wedge+1') { } |
|
653
|
0 |
0 |
if ($depth) |
|
655
|
0 |
0 |
if ($depth) |
|
677
|
0 |
0 |
if $x1 > $x2 |
|
678
|
0 |
0 |
if $y1 > $y2 |
|
682
|
0 |
0 |
if ($parts eq 'octant') { } |
|
|
0 |
0 |
elsif ($parts eq 'octant+1') { } |
|
|
0 |
0 |
elsif ($parts eq 'octant_up') { } |
|
|
0 |
0 |
elsif ($parts eq 'octant_up+1') { } |
|
|
0 |
0 |
elsif ($parts eq 'wedge') { } |
|
|
0 |
0 |
elsif ($parts eq 'wedge+1') { } |
|
683
|
0 |
0 |
if ($y2 < 0 or $x2 < $y1) |
|
686
|
0 |
0 |
if ($x2 < 0 or $y2 < 0 or $y1 > $x2 + 1) |
|
690
|
0 |
0 |
if ($x2 < 0 or $y2 < $x1) |
|
693
|
0 |
0 |
if ($x2 < 0 or $y2 < 0 or $x1 > $y2 + 1) |
|
697
|
0 |
0 |
if ($x2 < -1 - $y2 or $x1 > $y2) |
|
700
|
0 |
0 |
if ($x2 < -2 - $y2 or $x1 > $y2 + 1) |
|
705
|
0 |
0 |
if ($parts eq 'diagonal') { } |
|
|
0 |
0 |
elsif ($parts eq 'diagonal-1') { } |
|
|
0 |
0 |
elsif ($parts eq '1') { } |
|
706
|
0 |
0 |
if ($x2 < -1 - $y2) |
|
709
|
0 |
0 |
if ($x2 < -$y2) |
|
712
|
0 |
0 |
if ($x2 < 0 or $y2 < 0) |
|
718
|
0 |
0 |
if ($parts eq '2') { } |
|
719
|
0 |
0 |
if ($y2 < 0) |
|
724
|
0 |
0 |
if ($parts eq '3') |
|
725
|
0 |
0 |
if ($x2 < 0 and $y2 < 0) |
|
734
|
0 |
0 |
if ($parts eq 'diagonal-1') |
|
756
|
0 |
62 |
if ($depth < 0) |
|
757
|
0 |
62 |
if (is_infinite($depth)) |
|
760
|
10 |
52 |
if ($parts eq 'diagonal-1') |
|
761
|
2 |
8 |
if ($depth <= 1) |
|
773
|
86 |
55 |
if ($bit) |
|
779
|
13 |
47 |
if ($parts eq 'octant' or $parts eq 'octant_up') { } |
|
|
0 |
47 |
elsif ($parts eq 'octant+1' or $parts eq 'octant_up+1') { } |
|
|
9 |
38 |
elsif ($parts eq 'wedge') { } |
|
|
0 |
38 |
elsif ($parts eq 'wedge+1') { } |
|
|
9 |
29 |
elsif ($parts eq 'diagonal') { } |
|
|
8 |
21 |
elsif ($parts eq 'diagonal-1') { } |
|
783
|
0 |
0 |
if ($depth) |
|
788
|
0 |
0 |
if ($depth) |
|
804
|
0 |
158 |
if ($n < 0) |
|
806
|
0 |
158 |
if (is_infinite($n)) |
|
810
|
19 |
139 |
if ($$self{'parts'} eq 'diagonal-1') |
|
811
|
2 |
17 |
if ($n == 0) |
|
816
|
17 |
139 |
if ($$self{'parts'} eq 'diagonal-1') |
|
841
|
18 |
138 |
if ($n < $numroots) |
|
848
|
32 |
106 |
if ($parts eq 'octant' or $parts eq 'octant_up') { } |
|
|
0 |
106 |
elsif ($parts eq 'octant+1' or $parts eq 'octant_up+1') { } |
|
|
28 |
78 |
elsif ($parts eq 'wedge') { } |
|
|
0 |
78 |
elsif ($parts eq 'wedge+1') { } |
|
|
15 |
63 |
elsif ($parts eq 'diagonal') { } |
|
|
17 |
46 |
elsif ($parts eq 'diagonal-1') { } |
|
870
|
2 |
15 |
if ($n <= 3) |
|
893
|
109 |
238 |
if ($parts eq 'wedge' or $parts eq 'diagonal') { } |
|
|
0 |
238 |
elsif ($parts eq 'wedge+1') { } |
|
|
48 |
190 |
elsif ($parts eq 'diagonal-1') { } |
|
|
84 |
106 |
elsif ($nhalf) { } |
|
901
|
0 |
84 |
if ($parts eq 'octant+1' or $parts eq 'octant_up+1') |
|
909
|
214 |
133 |
if ($n >= $ncmp) { } |
|
918
|
136 |
211 |
unless $bitpos >= 0 |
|
932
|
43 |
93 |
if ($parts eq 'wedge' or $parts eq 'diagonal') { } |
|
|
0 |
93 |
elsif ($parts eq 'wedge+1') { } |
|
|
15 |
78 |
elsif ($parts eq 'diagonal-1') { } |
|
|
0 |
78 |
elsif ($parts eq 'octant+1' or $parts eq 'octant_up+1') { } |
|
|
32 |
46 |
elsif ($nhalf) { } |
|
956
|
0 |
0 |
if ($n < 0) |
|
963
|
0 |
0 |
if (defined(my $n_surround = $self->xy_to_n($x + $surround8_dx[$i], $y + $surround8_dy[$i]))) |
|
966
|
0 |
0 |
if ($n_surround > $n) |
|
969
|
0 |
0 |
if (defined $n_parent and $n_parent == $n) |
|
985
|
0 |
0 |
if (not defined $want_depth or ($want_depth -= 1) < 0) |
|
992
|
0 |
0 |
if (defined(my $n_surround = $self->xy_to_n($x + $surround8_dx[$i], $y + $surround8_dy[$i]))) |
|
997
|
0 |
0 |
if ($depth_surround == $want_depth) |
|
1010
|
0 |
0 |
if ($n < 0) |
|
1011
|
0 |
0 |
if (is_infinite($n)) |
|
1017
|
0 |
0 |
if ($parts eq 'octant+1') { } |
|
|
0 |
0 |
elsif ($parts eq 'octant_up') { } |
|
|
0 |
0 |
elsif ($parts eq 'octant_up+1') { } |
|
|
0 |
0 |
elsif ($parts eq 'wedge') { } |
|
|
0 |
0 |
elsif ($parts eq 'wedge+1') { } |
|
|
0 |
0 |
elsif ($parts eq 'diagonal') { } |
|
|
0 |
0 |
elsif ($parts eq 'diagonal-1') { } |
|
|
0 |
0 |
elsif ((my $numroots = $parts_to_numroots{$parts}) > 1) { } |
|
1018
|
0 |
0 |
if ($ndepth > 0 and $n == $nwidth - 1) |
|
1026
|
0 |
0 |
if ($n == 0) |
|
1027
|
0 |
0 |
$ndepth == 0 ? : |
|
1036
|
0 |
0 |
if ($n < $noct) { } |
|
1043
|
0 |
0 |
if ($ndepth > 0 and $n == 0 || $n == $nwidth - 1) |
|
1048
|
0 |
0 |
if ($n < $noct) { } |
|
1057
|
0 |
0 |
if ($n < $noct) { } |
|
|
0 |
0 |
elsif ($n >= $nwidth - $noct) { } |
|
1067
|
0 |
0 |
if (@$depthbits < 2) |
|
1071
|
0 |
0 |
if ($n == 0 or $n == $nwidth - 1) |
|
1076
|
0 |
0 |
if ($n < $noct) { } |
|
|
0 |
0 |
elsif ($n >= $nwidth - $noct) { } |
|
1097
|
0 |
0 |
unless ($$depthbits[$i] ^= 1) |
|
1098
|
0 |
0 |
if (_divrem_mutate($n, 3) != 1) |
|
1110
|
0 |
0 |
if (ref $n and $n->isa('Math::BigInt')) |
|
1112
|
0 |
0 |
if (not ref $d or $d < 1000000) |
|
1128
|
0 |
0 |
if (ref $_[0] and $_[0]->isa('Math::BigInt')) { } |
|
1130
|
0 |
0 |
if (not ref $d or $d < 1000000) |
|
1150
|
0 |
0 |
unless (defined $depth) |