| line |
true |
false |
branch |
|
37
|
2 |
5 |
if $sx == 1 and $sy == 1 |
|
39
|
1 |
4 |
defined $opts{'center'} ? : |
|
41
|
4 |
1 |
unless $cx or $cy |
|
56
|
2 |
1 |
if $dx == 0 and $dy == 0 |
|
72
|
5 |
0 |
exists $opts{'degrees'} ? : |
|
|
1 |
5 |
exists $opts{'radians'} ? : |
|
74
|
3 |
3 |
unless $angle |
|
79
|
1 |
2 |
defined $opts{'center'} ? : |
|
80
|
2 |
1 |
unless ($cx or $cy) |
|
99
|
3 |
1 |
exists $opts{'raster'} ? : |
|
100
|
1 |
3 |
if $raster == 0 |
|
103
|
1 |
2 |
if $raster > 0.99999 and $raster < 1.00001 |
|
119
|
1 |
7 |
if (defined $opts{'x'}) |
|
124
|
1 |
6 |
if (defined $opts{'y'}) |
|
132
|
3 |
3 |
if (exists $opts{'rc'}) { } |
|
|
3 |
0 |
elsif (my $through = $opts{'line'}) { } |
|
138
|
1 |
2 |
if ($p0->[0] == $p1->[0]) { } |
|
150
|
2 |
4 |
unless (defined $rc) |
|
169
|
4 |
6 |
if $a > 3.1415926535897931 |
|
180
|
0 |
11 |
unless @_ |
|
200
|
16 |
74 |
if ($d01 < $same) |
|
206
|
8 |
8 |
!@new ? : |
|
212
|
67 |
7 |
unless (@_ >= 2 and defined $slope) |
|
222
|
2 |
5 |
if ($d01 + $d12 <= $d02 + $slope) |
|
231
|
1 |
4 |
if (@_ > 2 and abs $d01 - $d12 - $d02 < $slope) |
|
237
|
1 |
0 |
if ($d01 - $d13 <= $d03 + $slope) |
|
249
|
18 |
4 |
if defined $p |
|
251
|
2 |
10 |
if $is_ring and $new[0][0] != $new[-1][0] || $new[0][1] != $new[-1][1] |
|
257
|
9 |
2 |
unless exists $opts{'max_points'} |
|
267
|
1 |
1 |
if ($is_ring) { } |
|
268
|
0 |
1 |
if @_ <= $max_angles |
|
274
|
0 |
1 |
if @_ <= $max_angles |
|
291
|
1 |
1 |
if $is_ring |