| line |
true |
false |
branch |
|
106
|
0 |
0 |
unless $self->turn_any_right |
|
107
|
0 |
0 |
if ($self->{'ring_shape'} eq 'polygon') |
|
110
|
0 |
0 |
$self->{'step'} < 9 ? : |
|
115
|
0 |
0 |
$self->{'step'} <= $#_UNDOCUMENTED__turn_any_right_at_n ? : |
|
125
|
0 |
0 |
$self->{'ring_shape'} eq 'circle' ? : |
|
|
0 |
0 |
$self->{'step'} <= 2 ? : |
|
155
|
0 |
0 |
$self->{'step'} == 0 ? : |
|
163
|
0 |
0 |
$self->{'step'} == 1 ? : |
|
|
0 |
0 |
$self->{'step'} == 0 ? : |
|
169
|
0 |
0 |
$self->{'step'} <= 2 ? : |
|
|
0 |
0 |
$self->{'step'} == 0 ? : |
|
174
|
0 |
0 |
$self->{'step'} == 0 ? : |
|
190
|
0 |
0 |
if ($step <= 1) |
|
209
|
0 |
0 |
if ($step == 3) |
|
210
|
0 |
0 |
$self->{'ring_shape'} eq 'polygon' ? : |
|
212
|
0 |
0 |
if ($step == 4) |
|
224
|
0 |
0 |
if ($step >= 6 or $self->{'ring_shape'} eq 'polygon') { } |
|
275
|
0 |
0 |
if ($self->{'step'} == 0) |
|
279
|
0 |
0 |
if ($self->{'step'} > 6) |
|
282
|
0 |
0 |
if ($self->{'ring_shape'} eq 'polygon') { } |
|
306
|
0 |
0 |
$self->{'step'} <= 6 ? : |
|
|
0 |
0 |
$self->{'step'} == 6 ? : |
|
|
0 |
0 |
$self->{'step'} == 5 ? : |
|
|
0 |
0 |
$self->{'step'} == 0 ? : |
|
312
|
0 |
0 |
$self->{'step'} <= 6 ? : |
|
|
0 |
0 |
$self->{'step'} == 0 ? : |
|
318
|
0 |
0 |
$self->{'step'} <= 6 ? : |
|
|
0 |
0 |
$self->{'step'} == 0 ? : |
|
323
|
0 |
0 |
$self->{'step'} == 0 ? : |
|
330
|
0 |
0 |
if ($step == 0) |
|
333
|
0 |
0 |
if ($self->{'ring_shape'} eq 'polygon') |
|
334
|
0 |
0 |
if ($step % 2) { } |
|
352
|
0 |
0 |
if ($step == 0) |
|
355
|
0 |
0 |
if ($self->{'ring_shape'} eq 'polygon') |
|
356
|
0 |
0 |
if ($step == 3) |
|
360
|
0 |
0 |
if ($frac == 3) |
|
368
|
0 |
0 |
$self->{'step'} == 0 ? : |
|
380
|
0 |
0 |
$self->{'step'} <= 6 ? : |
|
|
0 |
0 |
$self->{'step'} == 0 ? : |
|
386
|
0 |
0 |
$self->{'step'} <= 6 ? : |
|
|
0 |
0 |
$self->{'step'} == 0 ? : |
|
477
|
0 |
0 |
if ($self->{'ring_shape'} eq 'polygon') |
|
478
|
0 |
0 |
$step == 9 ? : |
|
486
|
0 |
0 |
if ($self->{'step'} == 0) |
|
490
|
0 |
0 |
if ($self->{'ring_shape'} eq 'polygon') |
|
518
|
0 |
144 |
$step < 0 ? : |
|
|
2 |
144 |
!defined($step) ? : |
|
524
|
0 |
146 |
unless ($ring_shape eq 'circle' or $ring_shape eq 'polygon') |
|
527
|
79 |
67 |
if ($step < 3) |
|
532
|
4 |
142 |
if ($ring_shape eq 'polygon') { } |
|
|
18 |
124 |
elsif ($step == 6) { } |
|
|
13 |
111 |
elsif ($step == 4) { } |
|
|
12 |
99 |
elsif ($step == 3) { } |
|
|
83 |
16 |
elsif ($step < 6) { } |
|
534
|
4 |
0 |
if ($step == 6) { } |
|
|
0 |
0 |
elsif ($step == 3) { } |
|
620
|
0 |
179 |
if ($n < 1) |
|
621
|
0 |
179 |
if (is_infinite($n)) |
|
626
|
13 |
166 |
unless ($step) |
|
646
|
2 |
164 |
if (ref $n) |
|
647
|
1 |
1 |
if ($n->isa('Math::BigInt')) { } |
|
|
0 |
1 |
elsif ($n->isa('Math::BigRat')) { } |
|
652
|
2 |
0 |
if ($n->isa('Math::BigFloat')) |
|
666
|
162 |
4 |
if ($self->{'ring_shape'} eq 'circle') { } |
|
669
|
20 |
142 |
if ($step > 6) { } |
|
673
|
17 |
125 |
if ($step == 6) { } |
|
|
21 |
104 |
elsif ($step == 4) { } |
|
|
19 |
85 |
elsif ($step == 3) { } |
|
|
51 |
34 |
elsif ($step == 1) { } |
|
692
|
0 |
4 |
if ($step > 6) { } |
|
704
|
51 |
115 |
if (2 * $n >= $numsides) |
|
711
|
120 |
46 |
if ($numsides % 2 == 0) |
|
712
|
48 |
72 |
if (4 * $n >= $numsides) |
|
716
|
19 |
101 |
if ($numsides % 4 == 0 and 8 * $n >= $numsides) |
|
728
|
25 |
141 |
if ($n) |
|
733
|
3 |
22 |
if (2 * $side == $numsides + 1) { } |
|
|
10 |
12 |
elsif (4 * $side == $numsides + 2 or 4 * $side == 3 * $numsides - 2) { } |
|
755
|
22 |
3 |
if ($to_x != $x) |
|
758
|
14 |
11 |
if ($to_y != $y) |
|
763
|
19 |
147 |
if ($xy_transpose) |
|
766
|
48 |
118 |
if ($x_neg) |
|
769
|
51 |
115 |
if ($y_neg) |
|
819
|
0 |
178 |
if (2 * $side == $numsides) |
|
824
|
4 |
174 |
if (4 * $side == $numsides) |
|
828
|
7 |
167 |
if (6 * $side == $numsides) |
|
833
|
1 |
166 |
if (8 * $side == $numsides) |
|
884
|
0 |
4 |
if ($numsides == 3) |
|
885
|
0 |
4 |
if ($numsides == 4) |
|
886
|
4 |
0 |
if ($numsides == 6) |
|
901
|
0 |
107 |
if ($n < 1) |
|
902
|
0 |
107 |
if (is_infinite($n)) |
|
904
|
55 |
52 |
if (defined(my $r = _n_to_radius_exact($self, $n))) |
|
907
|
26 |
26 |
if ($self->{'step'} == 1) |
|
910
|
12 |
14 |
if ($n >= 4 and $n < 7) |
|
932
|
8 |
6 |
if ($n >= 7 and $n < 11) |
|
947
|
6 |
0 |
if ($n >= 16 and $n < 22) |
|
972
|
0 |
43 |
if ($n < 1) |
|
973
|
0 |
43 |
if (is_infinite($n)) |
|
975
|
30 |
13 |
if (defined(my $r = _n_to_radius_exact($self, $n))) |
|
992
|
0 |
150 |
if ($n < 1) |
|
993
|
0 |
150 |
if (is_infinite($n)) |
|
996
|
13 |
137 |
if ($step == 0) |
|
1000
|
89 |
48 |
if ($step == 1) { } |
|
|
22 |
26 |
elsif ($step == 6) { } |
|
1001
|
26 |
63 |
if ($n < 4) |
|
1002
|
4 |
22 |
if ($n < 2) |
|
1008
|
22 |
41 |
if ($n == int $n) |
|
1013
|
0 |
39 |
if ($two_n == 9 or $two_n == 11 or $two_n == 13) |
|
1021
|
22 |
0 |
if ($n == int $n) |
|
1024
|
22 |
0 |
if ($self->{'ring_shape'} eq 'circle' or $n <= 6) |
|
1061
|
51 |
0 |
if ($r < 0.5) |
|
1068
|
0 |
0 |
if (is_infinite($two_r)) |
|
1075
|
0 |
0 |
if ($self->{'ring_shape'} eq 'polygon') |
|
1091
|
0 |
0 |
if ($step >= 6) { } |
|
1098
|
0 |
0 |
if ($step > 6) { } |
|
1114
|
5 |
51 |
if ($step == 0) { } |
|
1124
|
0 |
51 |
if ($self->{'ring_shape'} eq 'polygon') { } |
|
1143
|
0 |
0 |
if ($step > 6) { } |
|
1153
|
0 |
0 |
$p == 0 ? : |
|
1164
|
0 |
51 |
if ($n >= $d * $step) |
|
1180
|
56 |
0 |
if (my($nx, $ny) = $self->n_to_xy($n)) |
|
1183
|
17 |
39 |
if (&hypot($x - $nx, $y - $ny) <= 0.5) |
|
1204
|
0 |
22 |
if (is_infinite($r_hi)) |
|
1207
|
11 |
11 |
if ($r_hi < 1) |
|
1208
|
0 |
22 |
if ($self->{'ring_shape'} eq 'polygon') |
|
1214
|
0 |
22 |
if ($self->{'ring_shape'} eq 'polygon') { } |
|
1215
|
0 |
0 |
if ($step >= 6) { } |
|
1223
|
8 |
14 |
if ($step > 6) { } |
|
1224
|
0 |
8 |
$r_lo > 0 ? : |
|
1238
|
22 |
0 |
if ($d_lo < 1) |
|
1240
|
20 |
2 |
if ($step) { } |
|
1291
|
53 |
67 |
if ($x == 0 and $y == 0) |
|
1297
|
16 |
51 |
if ($frac < 0) { } |
|
|
0 |
51 |
elsif ($frac >= 1) { } |
|
1306
|
3 |
165 |
if (ref $n) |
|
1307
|
3 |
0 |
if ($n->isa('Math::BigFloat')) |
|
1309
|
2 |
1 |
if (defined($digits = $n->accuracy)) { } |
|
|
0 |
1 |
elsif (defined($digits = $n->precision)) { } |
|
|
0 |
1 |
elsif (defined($digits = 'Math::BigFloat'->accuracy)) { } |
|
|
0 |
1 |
elsif (defined($digits = 'Math::BigFloat'->precision)) { } |