| line |
true |
false |
branch |
|
38
|
0 |
2 |
unless exists {ETRS89 => [6378137, 6356752.31414, 298.257222101, 0.0066943800229007869], GRS80 => [6378137, 6356752.31414, 298.257222101, 0.0066943800229007869], OSGB36 => [6377563.396, 6356256.909, 299.3249612665, 0.0066705400741492319], WGS84 => [6378137, 6356752.31424518, 298.257223563, 0.0066943799901413165]}->{$s} |
|
104
|
29 |
58 |
if abs $oldphi - $phi < 1e-12 |
|
149
|
1 |
0 |
if (ref $lat and defined $lat->{'lat'} and defined $lat->{'lon'}) |
|
156
|
1 |
213 |
if ($lat < $lon) |
|
160
|
1 |
213 |
exists $options->{'shape'} ? : |
|
162
|
0 |
214 |
unless exists {ETRS89 => [6378137, 6356752.31414, 298.257222101, 0.0066943800229007869], GRS80 => [6378137, 6356752.31414, 298.257222101, 0.0066943800229007869], OSGB36 => [6377563.396, 6356256.909, 299.3249612665, 0.0066705400741492319], WGS84 => [6378137, 6356752.31424518, 298.257223563, 0.0066943799901413165]}->{$shape} |
|
169
|
12 |
202 |
if ($shape eq 'OSGB36') |
|
171
|
7 |
5 |
wantarray ? : |
|
176
|
188 |
14 |
if ($dx) |
|
178
|
178 |
10 |
wantarray ? : |
|
189
|
1 |
17 |
wantarray ? : |
|
245
|
2 |
816 |
if $x < 0 |
|
246
|
0 |
816 |
if $y < 0 |
|
251
|
2 |
814 |
if $n_index + 1 > $#ostn_data |
|
253
|
12 |
802 |
unless my $lo_pair_ref = _get_ostn_pair_reference($e_index, $n_index) |
|
254
|
6 |
796 |
unless my $hi_pair_ref = _get_ostn_pair_reference($e_index, $n_index + 1) |
|
285
|
1022 |
594 |
if (exists $ostn_shifts_for{$k}) |
|
291
|
6 |
588 |
if $x < $leading_zeros |
|
294
|
8 |
580 |
if $index + 12 > length $ostn_data[$y] |
|
299
|
4 |
576 |
if 0 == $shifts[0] |
|
300
|
0 |
576 |
if 0 == $shifts[1] |
|
301
|
0 |
576 |
if 0 == $shifts[2] |
|
302
|
0 |
576 |
if 0 == $shifts[3] |
|
316
|
1 |
0 |
if (ref $e and defined $e->{'e'} and defined $e->{'n'}) |
|
322
|
1 |
213 |
exists $options->{'shape'} ? : |
|
324
|
0 |
214 |
unless exists {ETRS89 => [6378137, 6356752.31414, 298.257222101, 0.0066943800229007869], GRS80 => [6378137, 6356752.31414, 298.257222101, 0.0066943800229007869], OSGB36 => [6377563.396, 6356256.909, 299.3249612665, 0.0066705400741492319], WGS84 => [6378137, 6356752.31424518, 298.257223563, 0.0066943799901413165]}->{$shape} |
|
329
|
7 |
207 |
if ($shape eq 'OSGB36') |
|
335
|
200 |
7 |
if ($dx) |
|
343
|
1 |
398 |
unless ($dx) |
|
350
|
199 |
199 |
if abs $dx - $last_dx < 0.0001 and abs $dy - $last_dy < 0.0001 |
|
354
|
199 |
1 |
if ($in_ostn02_polygon) |
|
394
|
416 |
1088 |
if abs $dn - $M < 1e-05 |