line |
true |
false |
branch |
265
|
0 |
0 |
unless $dir_minimum_dxdy{"$self->{'coordinates'},$self->{'tree_type'}"} |
302
|
0 |
0 |
unless $dir_maximum_dxdy{"$self->{'coordinates'},$self->{'tree_type'}"} |
345
|
0 |
21 |
unless $digit_orders{$digit_order} |
350
|
0 |
21 |
unless $tree_types{$tree_type} |
366
|
0 |
56 |
if ($n < 1) |
367
|
0 |
56 |
if (is_infinite($n)) |
371
|
0 |
56 |
if ($n != $int) |
388
|
0 |
0 |
if ($self->{'coordinates'} eq 'AB' || $self->{'coordinates'} eq 'BA' || $self->{'coordinates'} eq 'SM' and $n == int $n) |
392
|
0 |
0 |
if ($n < 1) |
393
|
0 |
0 |
if (is_infinite($n)) |
407
|
0 |
56 |
if ($self->{'tree_type'} eq 'UArD') |
411
|
56 |
0 |
if ($self->{'digit_order'} eq 'HtoL') |
421
|
26 |
30 |
if ($self->{'tree_type'} eq 'FB') { } |
|
0 |
30 |
elsif ($self->{'tree_type'} eq 'UMT') { } |
429
|
28 |
14 |
if ($digit) { } |
430
|
14 |
14 |
if ($digit == 1) { } |
452
|
0 |
0 |
if ($digit) { } |
453
|
0 |
0 |
if ($digit == 1) { } |
488
|
34 |
18 |
if ($digit) { } |
489
|
18 |
16 |
if ($digit == 1) { } |
532
|
69 |
7 |
if ($n >= 2) |
577
|
3844 |
1369 |
unless my($p, $q) = &{$self->{'xy_to_pq'};}($x, $y) |
580
|
328 |
1041 |
unless ($p >= 2 and $q >= 1) |
583
|
0 |
1041 |
if (is_infinite($p)) |
586
|
0 |
1041 |
if (is_infinite($q)) |
589
|
480 |
561 |
if ($p % 2 == $q % 2) |
594
|
276 |
285 |
if ($self->{'tree_type'} eq 'FB') { } |
|
0 |
285 |
elsif ($self->{'tree_type'} eq 'UMT') { } |
596
|
114 |
771 |
unless ($p > $q and $q >= 1) |
599
|
162 |
609 |
if $q <= 1 and $p <= 2 |
601
|
323 |
286 |
if ($q % 2) { } |
604
|
119 |
204 |
if ($q > $p) { } |
626
|
0 |
0 |
unless ($p > $q and $q >= 1) |
629
|
0 |
0 |
if $q <= 1 and $p <= 2 |
631
|
0 |
0 |
if ($p < 2 * $q) { } |
|
0 |
0 |
elsif ($qmod2) { } |
651
|
90 |
946 |
if ($q <= 0 or $p <= 0 or $p <= $q) |
654
|
166 |
780 |
if $q <= 1 and $p <= 2 |
656
|
317 |
463 |
if ($p > 2 * $q) { } |
657
|
230 |
87 |
if ($p > 3 * $q) { } |
677
|
0 |
328 |
if ($self->{'digit_order'} eq 'LtoH') |
681
|
0 |
328 |
if ($self->{'tree_type'} eq 'UArD') |
710
|
0 |
64 |
if $x1 > $x2 |
711
|
0 |
64 |
if $y1 > $y2 |
715
|
0 |
64 |
if ($self->{'coordinates'} eq 'BA') |
718
|
0 |
64 |
if ($self->{'coordinates'} eq 'SM') |
719
|
0 |
0 |
if ($x2 > $y2) { } |
726
|
28 |
36 |
if ($self->{'coordinates'} eq 'PQ') { } |
727
|
0 |
28 |
if ($x2 < 2 or $y2 < 1) |
731
|
0 |
28 |
if ($y2 >= $x2) |
735
|
0 |
28 |
if ($y2 < $y1) |
741
|
0 |
36 |
if ($x2 < 3 or $y2 < 0) |
747
|
30 |
34 |
if ($self->{'tree_type'} eq 'FB') { } |
749
|
14 |
16 |
if ($self->{'coordinates'} eq 'PQ') |
756
|
14 |
20 |
if ($self->{'coordinates'} eq 'PQ') { } |
776
|
0 |
7 |
unless ($n >= 1) |
784
|
0 |
0 |
$n >= 1 ? : |
788
|
1 |
12 |
unless ($n >= 2) |
796
|
0 |
0 |
unless ($n >= 1) |
805
|
328 |
0 |
$depth >= 0 ? : |
812
|
64 |
0 |
$depth >= 0 ? : |
818
|
0 |
0 |
if ($depth >= 0) { } |
827
|
0 |
0 |
$depth >= 0 ? : |
923
|
0 |
0 |
$a < $b ? : |
989
|
3059 |
1078 |
unless ($b >= 4 and $a % 2 and not $b % 2) |
1011
|
1010 |
68 |
unless ($csquared == $c * $c) |
1023
|
200 |
74 |
unless ($c > $b and $b >= 4 and not $b % 2 and $c % 2) |
1030
|
0 |
74 |
unless ($asquared > 0) |
1036
|
64 |
10 |
unless ($asquared == $a * $a) |
1043
|
2 |
8 |
unless my($p, $q) = _ac_to_pq($a, $c) |
1051
|
234 |
145 |
unless ($c > $a and $a >= 3 and $a % 2 and $c % 2) |
1068
|
72 |
73 |
unless ($psquared == $p * $p) |
1084
|
6 |
67 |
unless ($qsquared == $q * $q) |
1101
|
0 |
0 |
unless ($s < $m) |
1104
|
0 |
0 |
$s % 2 ? : |
1121
|
1 |
1 |
if ($s % 2) { } |
1122
|
0 |
1 |
unless ($p, $q) = _ac_to_pq($s, $c) |
1124
|
0 |
1 |
if ($s > 2 * $p * $q) |
1126
|
0 |
1 |
unless ($p, $q, $a) = _bc_to_pqa($s, $c) |
1128
|
1 |
0 |
if ($s > $a) |
1137
|
0 |
0 |
if ($m % 2) { } |
1139
|
0 |
0 |
unless ($p, $q) = _ac_to_pq($m, $c) |
1141
|
0 |
0 |
if ($m < 2 * $p * $q) |
1144
|
0 |
0 |
unless ($p, $q, $a) = _bc_to_pqa($m, $c) |
1147
|
0 |
0 |
if ($m < $a) |
1165
|
0 |
0 |
if $s % 2 |
1167
|
0 |
0 |
unless $s >= 1 |
1169
|
0 |
0 |
unless $q * $q == $s |
1171
|
0 |
0 |
unless $r >= 1 |
1173
|
0 |
0 |
unless $p_plus_q * $p_plus_q == $r |
1187
|
0 |
0 |
if $s % 2 |
1189
|
0 |
0 |
unless $s >= 1 |
1192
|
0 |
0 |
unless $q * $q == $s |
1194
|
0 |
0 |
if $t % 2 |
1197
|
0 |
0 |
if $t % $q |