line |
true |
false |
branch |
260
|
0 |
0 |
$any_num_children_2{$$self{'parts'}} ? : |
290
|
0 |
13 |
unless (exists $parts_to_numroots{$parts}) |
309
|
0 |
0 |
if ($n < 0) |
310
|
0 |
0 |
if (is_infinite($n)) |
315
|
0 |
0 |
if ($n != $int) |
326
|
0 |
0 |
if (is_infinite($n)) |
330
|
0 |
0 |
if ($parts eq 'diagonal-1') |
331
|
0 |
0 |
if ($n <= 3) |
353
|
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) { } |
356
|
0 |
0 |
if ($n < $noct) { } |
366
|
0 |
0 |
if ($n < $noct) { } |
380
|
0 |
0 |
if ($n < $noct) { } |
|
0 |
0 |
elsif ($n >= $nwidth - $noct) { } |
397
|
0 |
0 |
if ($n < $noct) { } |
|
0 |
0 |
elsif ($n >= $nwidth - $noct) { } |
423
|
0 |
0 |
if ($parts eq '3') |
424
|
0 |
0 |
if ($quad == 1) |
425
|
0 |
0 |
if ($quad == 2) |
429
|
0 |
0 |
if ($parts eq 'octant_up') { } |
|
0 |
0 |
elsif ($parts eq 'octant_up+1') { } |
447
|
0 |
0 |
if $_ |
464
|
0 |
0 |
if ($quad & 1) |
467
|
0 |
0 |
if ($quad & 2) |
490
|
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') { } |
491
|
0 |
0 |
if ($x < 0) { } |
492
|
0 |
0 |
if ($y < 0) |
498
|
0 |
0 |
if ($y < 0) |
505
|
0 |
0 |
if ($y < 0 or $y > $x) |
507
|
0 |
0 |
if ($x < 0 or $y < 0 or $y > $x + 1) |
510
|
0 |
0 |
if ($x < 0 or $x > $y) |
512
|
0 |
0 |
if ($y < 0 or $x < 0 or $x > $y + 1) |
515
|
0 |
0 |
if ($x < -1 - $y or $x > $y) |
516
|
0 |
0 |
if ($x < 0) |
521
|
0 |
0 |
if ($y < 0 or $x < -2 - $y or $x > $y + 1) |
522
|
0 |
0 |
if ($x < 0) |
528
|
0 |
0 |
if ($x < -1 - $y) |
529
|
0 |
0 |
if ($y < 0) { } |
|
0 |
0 |
elsif ($x < 0) { } |
542
|
0 |
0 |
if ($x == 0 and $y == 0) |
545
|
0 |
0 |
if ($x < -$y) |
546
|
0 |
0 |
if ($y <= 0) { } |
|
0 |
0 |
elsif ($x <= 0) { } |
563
|
0 |
0 |
if ($y < 0) |
564
|
0 |
0 |
if ($parts ne '4') |
572
|
0 |
0 |
if ($x < 0) |
573
|
0 |
0 |
if ($parts eq '1') |
583
|
0 |
0 |
if (is_infinite($x)) |
586
|
0 |
0 |
if (is_infinite($y)) |
609
|
0 |
0 |
$x >= $len || $y >= $len ? : |
|
0 |
0 |
if ($depthbits[$i] = $x >= $len || $y >= $len ? 1 : 0) |
612
|
0 |
0 |
if ($y < $len) { } |
|
0 |
0 |
elsif ($x >= $len) { } |
637
|
0 |
0 |
if ($quad) |
642
|
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') |
649
|
0 |
0 |
if ($parts eq 'diagonal-1') |
650
|
0 |
0 |
if ($depth) |
653
|
0 |
0 |
if ($parts eq 'octant_up+1') { } |
|
0 |
0 |
elsif ($parts eq 'wedge+1') { } |
654
|
0 |
0 |
if ($depth) |
656
|
0 |
0 |
if ($depth) |
678
|
0 |
0 |
if $x1 > $x2 |
679
|
0 |
0 |
if $y1 > $y2 |
683
|
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') { } |
684
|
0 |
0 |
if ($y2 < 0 or $x2 < $y1) |
687
|
0 |
0 |
if ($x2 < 0 or $y2 < 0 or $y1 > $x2 + 1) |
691
|
0 |
0 |
if ($x2 < 0 or $y2 < $x1) |
694
|
0 |
0 |
if ($x2 < 0 or $y2 < 0 or $x1 > $y2 + 1) |
698
|
0 |
0 |
if ($x2 < -1 - $y2 or $x1 > $y2) |
701
|
0 |
0 |
if ($x2 < -2 - $y2 or $x1 > $y2 + 1) |
706
|
0 |
0 |
if ($parts eq 'diagonal') { } |
|
0 |
0 |
elsif ($parts eq 'diagonal-1') { } |
|
0 |
0 |
elsif ($parts eq '1') { } |
707
|
0 |
0 |
if ($x2 < -1 - $y2) |
710
|
0 |
0 |
if ($x2 < -$y2) |
713
|
0 |
0 |
if ($x2 < 0 or $y2 < 0) |
719
|
0 |
0 |
if ($parts eq '2') { } |
720
|
0 |
0 |
if ($y2 < 0) |
725
|
0 |
0 |
if ($parts eq '3') |
726
|
0 |
0 |
if ($x2 < 0 and $y2 < 0) |
735
|
0 |
0 |
if ($parts eq 'diagonal-1') |
757
|
0 |
62 |
if ($depth < 0) |
758
|
0 |
62 |
if (is_infinite($depth)) |
761
|
10 |
52 |
if ($parts eq 'diagonal-1') |
762
|
2 |
8 |
if ($depth <= 1) |
774
|
86 |
55 |
if ($bit) |
780
|
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') { } |
784
|
0 |
0 |
if ($depth) |
789
|
0 |
0 |
if ($depth) |
805
|
0 |
158 |
if ($n < 0) |
807
|
0 |
158 |
if (is_infinite($n)) |
811
|
19 |
139 |
if ($$self{'parts'} eq 'diagonal-1') |
812
|
2 |
17 |
if ($n == 0) |
817
|
17 |
139 |
if ($$self{'parts'} eq 'diagonal-1') |
842
|
18 |
138 |
if ($n < $numroots) |
849
|
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') { } |
871
|
2 |
15 |
if ($n <= 3) |
894
|
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) { } |
902
|
0 |
84 |
if ($parts eq 'octant+1' or $parts eq 'octant_up+1') |
910
|
214 |
133 |
if ($n >= $ncmp) { } |
919
|
136 |
211 |
unless $bitpos >= 0 |
933
|
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) { } |
957
|
0 |
0 |
if ($n < 0) |
964
|
0 |
0 |
if (defined(my $n_surround = $self->xy_to_n($x + $surround8_dx[$i], $y + $surround8_dy[$i]))) |
967
|
0 |
0 |
if ($n_surround > $n) |
970
|
0 |
0 |
if (defined $n_parent and $n_parent == $n) |
986
|
0 |
0 |
if (not defined $want_depth or ($want_depth -= 1) < 0) |
993
|
0 |
0 |
if (defined(my $n_surround = $self->xy_to_n($x + $surround8_dx[$i], $y + $surround8_dy[$i]))) |
998
|
0 |
0 |
if ($depth_surround == $want_depth) |
1011
|
0 |
0 |
if ($n < 0) |
1012
|
0 |
0 |
if (is_infinite($n)) |
1018
|
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) { } |
1019
|
0 |
0 |
if ($ndepth > 0 and $n == $nwidth - 1) |
1027
|
0 |
0 |
if ($n == 0) |
1028
|
0 |
0 |
$ndepth == 0 ? : |
1037
|
0 |
0 |
if ($n < $noct) { } |
1044
|
0 |
0 |
if ($ndepth > 0 and $n == 0 || $n == $nwidth - 1) |
1049
|
0 |
0 |
if ($n < $noct) { } |
1058
|
0 |
0 |
if ($n < $noct) { } |
|
0 |
0 |
elsif ($n >= $nwidth - $noct) { } |
1068
|
0 |
0 |
if (@$depthbits < 2) |
1072
|
0 |
0 |
if ($n == 0 or $n == $nwidth - 1) |
1077
|
0 |
0 |
if ($n < $noct) { } |
|
0 |
0 |
elsif ($n >= $nwidth - $noct) { } |
1098
|
0 |
0 |
unless ($$depthbits[$i] ^= 1) |
1099
|
0 |
0 |
if (_divrem_mutate($n, 3) != 1) |
1111
|
0 |
0 |
if (ref $n and $n->isa('Math::BigInt')) |
1113
|
0 |
0 |
if (not ref $d or $d < 1000000) |
1129
|
0 |
0 |
if (ref $_[0] and $_[0]->isa('Math::BigInt')) { } |
1131
|
0 |
0 |
if (not ref $d or $d < 1000000) |
1151
|
0 |
0 |
unless (defined $depth) |