| line |
true |
false |
branch |
|
41
|
2 |
5 |
if $sx == 1 and $sy == 1 |
|
43
|
1 |
4 |
defined $opts{'center'} ? : |
|
45
|
4 |
1 |
unless $cx or $cy |
|
60
|
2 |
1 |
if $dx == 0 and $dy == 0 |
|
76
|
5 |
0 |
exists $opts{'degrees'} ? : |
|
|
1 |
5 |
exists $opts{'radians'} ? : |
|
78
|
3 |
3 |
unless $angle |
|
83
|
1 |
2 |
defined $opts{'center'} ? : |
|
84
|
2 |
1 |
unless ($cx or $cy) |
|
103
|
3 |
1 |
exists $opts{'raster'} ? : |
|
104
|
1 |
3 |
if $raster == 0 |
|
107
|
1 |
2 |
if $raster > 0.99999 and $raster < 1.00001 |
|
123
|
1 |
7 |
if (defined $opts{'x'}) |
|
128
|
1 |
6 |
if (defined $opts{'y'}) |
|
136
|
3 |
3 |
if (exists $opts{'rc'}) { } |
|
|
3 |
0 |
elsif (my $through = $opts{'line'}) { } |
|
142
|
1 |
2 |
if ($p0->[0] == $p1->[0]) { } |
|
154
|
2 |
4 |
unless (defined $rc) |
|
173
|
4 |
6 |
if $a > 3.1415926535897931 |
|
184
|
0 |
11 |
unless @_ |
|
204
|
16 |
74 |
if ($d01 < $same) |
|
210
|
8 |
8 |
!@new ? : |
|
216
|
67 |
7 |
unless (@_ >= 2 and defined $slope) |
|
226
|
2 |
5 |
if ($d01 + $d12 <= $d02 + $slope) |
|
235
|
1 |
4 |
if (@_ > 2 and abs $d01 - $d12 - $d02 < $slope) |
|
241
|
1 |
0 |
if ($d01 - $d13 <= $d03 + $slope) |
|
253
|
18 |
4 |
if defined $p |
|
255
|
2 |
10 |
if $is_ring and $new[0][0] != $new[-1][0] || $new[0][1] != $new[-1][1] |
|
262
|
9 |
2 |
unless exists $opts{'max_points'} |
|
272
|
1 |
1 |
if ($is_ring) { } |
|
273
|
0 |
1 |
if @_ <= $max_angles |
|
279
|
0 |
1 |
if @_ <= $max_angles |
|
296
|
1 |
1 |
if $is_ring |