line |
true |
false |
branch |
39
|
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} |
116
|
15 |
30 |
if abs $oldphi - $phi < 1e-12 |
162
|
1 |
0 |
if (ref $lat and defined $lat->{'lat'} and defined $lat->{'lon'}) |
169
|
1 |
162 |
if ($lat < $lon) |
173
|
1 |
162 |
exists $options->{'shape'} ? : |
174
|
0 |
163 |
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} |
180
|
12 |
151 |
if ($shape eq 'OSGB36') |
182
|
7 |
5 |
wantarray ? : |
187
|
144 |
7 |
if ($dx) |
189
|
126 |
18 |
wantarray ? : |
200
|
1 |
10 |
wantarray ? : |
256
|
5 |
568 |
if $easting < 0 |
257
|
1 |
567 |
if $easting > 700000 |
258
|
1 |
566 |
if $northing < 0 |
259
|
1 |
565 |
if $northing > 1250000 |
287
|
1 |
0 |
if (ref $e and defined $e->{'e'} and defined $e->{'n'}) |
293
|
0 |
147 |
exists $options->{'shape'} ? : |
295
|
0 |
147 |
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} |
300
|
6 |
141 |
if ($shape eq 'OSGB36') |
306
|
141 |
0 |
if ($dx) |
314
|
1 |
280 |
unless ($dx) |
321
|
140 |
140 |
if abs $dx - $last_dx < 0.0001 and abs $dy - $last_dy < 0.0001 |
325
|
140 |
1 |
if ($in_ostn02_polygon) |
365
|
290 |
740 |
if abs $dn - $M < 1e-05 |