| line |
true |
false |
branch |
|
112
|
2 |
3075 |
!($id =~ /\D/) ? : |
|
116
|
3077 |
0 |
defined $el ? : |
|
126
|
0 |
1039 |
if $longitude < -180 or $longitude > 180 |
|
138
|
0 |
999 |
if $longitude < -180 or $longitude > 180 |
|
145
|
0 |
999 |
unless defined $zone_number and $zone_number <= 60 |
|
155
|
1 |
61 |
if ($latitude >= 56 and $latitude < 64 and $long2 >= 3 and $long2 < 12) |
|
158
|
82 |
957 |
if ($latitude >= 72 and $latitude < 84) |
|
159
|
2 |
71 |
$long2 >= 33 && $long2 < 42 ? : |
|
|
4 |
73 |
$long2 >= 21 && $long2 < 33 ? : |
|
|
2 |
77 |
$long2 >= 9 && $long2 < 21 ? : |
|
|
3 |
79 |
$long2 >= 0 && $long2 < 9 ? : |
|
171
|
0 |
2038 |
unless my($name, $radius, $eccentricity) = ellipsoid_info $ellips |
|
207
|
992 |
1046 |
if $latitude < 0 |
|
209
|
144 |
0 |
-72 > $latitude && $latitude >= -80 ? : |
|
|
102 |
144 |
-64 > $latitude && $latitude >= -72 ? : |
|
|
107 |
246 |
-56 > $latitude && $latitude >= -64 ? : |
|
|
87 |
353 |
-48 > $latitude && $latitude >= -56 ? : |
|
|
81 |
440 |
-40 > $latitude && $latitude >= -48 ? : |
|
|
119 |
521 |
-32 > $latitude && $latitude >= -40 ? : |
|
|
92 |
640 |
-24 > $latitude && $latitude >= -32 ? : |
|
|
87 |
732 |
-16 > $latitude && $latitude >= -24 ? : |
|
|
86 |
819 |
-8 > $latitude && $latitude >= -16 ? : |
|
|
87 |
905 |
0 > $latitude && $latitude >= -8 ? : |
|
|
116 |
992 |
8 > $latitude && $latitude >= 0 ? : |
|
|
113 |
1108 |
16 > $latitude && $latitude >= 8 ? : |
|
|
91 |
1221 |
24 > $latitude && $latitude >= 16 ? : |
|
|
74 |
1312 |
32 > $latitude && $latitude >= 24 ? : |
|
|
108 |
1386 |
40 > $latitude && $latitude >= 32 ? : |
|
|
103 |
1494 |
48 > $latitude && $latitude >= 40 ? : |
|
|
93 |
1597 |
56 > $latitude && $latitude >= 48 ? : |
|
|
118 |
1690 |
64 > $latitude && $latitude >= 56 ? : |
|
|
68 |
1808 |
72 > $latitude && $latitude >= 64 ? : |
|
|
162 |
1876 |
84 >= $latitude && $latitude >= 72 ? : |
|
244
|
0 |
1039 |
unless my($name, $radius, $eccentricity) = ellipsoid_info $ellips |
|
250
|
0 |
1039 |
unless _valid_utm_zone $zone_letter |
|
259
|
505 |
534 |
unless $hemisphere |
|
290
|
0 |
39 |
unless _valid_utm_zone $zone_letter |
|
296
|
0 |
39 |
if $north_split < 0 |
|
299
|
0 |
39 |
if $rnd_north < 0 |
|
301
|
14 |
25 |
unless $zone_number % 2 |
|
307
|
0 |
39 |
if $east_split < 0 |
|
310
|
0 |
39 |
unless $num_east |
|
315
|
15 |
0 |
$mgrs_zone == 3 ? : |
|
|
13 |
15 |
$mgrs_zone == 2 ? : |
|
|
11 |
28 |
$mgrs_zone == 1 ? : |
|
321
|
0 |
39 |
unless my $lett_east = substr($easting_zones, $num_east, 1) |
|
338
|
7 |
32 |
unless $zone =~ /^\d+$/ |
|
343
|
0 |
39 |
unless _valid_utm_zone $zone_letter |
|
347
|
0 |
39 |
unless $first_letter =~ /[ABCDEFGHJKLMNPQRSTUVWXYZ]/ |
|
351
|
0 |
39 |
unless $second_letter =~ /[ABCDEFGHJKLMNPQRSTUV]/ |
|
356
|
0 |
39 |
unless $coord_len > 0 and $coord_len <= 10 and not $coord_len % 2 |
|
365
|
15 |
0 |
$first_letter =~ /[STUVWXYZ]/ ? : |
|
|
13 |
15 |
$first_letter =~ /[JKLMNPQR]/ ? : |
|
|
11 |
28 |
$first_letter =~ /[ABCDEFGH]/ ? : |
|
370
|
0 |
39 |
if $east_pos < 0 |
|
377
|
0 |
39 |
if $north_pos < 0 |
|
379
|
14 |
25 |
unless $zone_number % 2 |
|
381
|
21 |
18 |
if ($zone_letter =~ /[NPQRSTUVWX]/) { } |
|
402
|
16 |
2 |
if $zone_letter ne 'C' |