| line |
true |
false |
branch |
|
163
|
0 |
94 |
if $DEBUG |
|
165
|
20 |
27 |
if ($key =~ /^ell/i) { } |
|
|
16 |
11 |
elsif ($key =~ /^uni/i) { } |
|
|
5 |
6 |
elsif ($key =~ /^dis/i) { } |
|
|
4 |
2 |
elsif ($key =~ /^lon/i) { } |
|
|
2 |
0 |
elsif ($key =~ /^bea/i) { } |
|
185
|
0 |
94 |
if $DEBUG |
|
213
|
45 |
66 |
if ($units =~ /deg/i) { } |
|
|
66 |
0 |
elsif ($units =~ /rad/i) { } |
|
218
|
0 |
0 |
unless $units =~ /rad/i |
|
257
|
0 |
95 |
if $DEBUG |
|
261
|
95 |
0 |
if (defined $unit) { } |
|
266
|
0 |
143 |
if $DEBUG |
|
267
|
95 |
48 |
if ($unit =~ /^$re/i) |
|
277
|
0 |
95 |
if ($conversion == 0) |
|
278
|
0 |
0 |
if (&looks_like_number($unit)) { } |
|
309
|
0 |
137 |
if $DEBUG |
|
310
|
0 |
137 |
unless (exists $ellipsoids{$ellipsoid}) |
|
317
|
1 |
136 |
if ($recip == 0) { } |
|
348
|
0 |
3 |
unless defined $recip |
|
349
|
3 |
0 |
if ($major) { } |
|
374
|
94 |
0 |
if ($#_ > 0) { } |
|
400
|
94 |
0 |
if ($#_ > 0) { } |
|
442
|
21 |
24 |
if ($key =~ /^ell/i) { } |
|
|
21 |
3 |
elsif ($key =~ /^uni/i) { } |
|
|
1 |
2 |
elsif ($key =~ /^dis/i) { } |
|
|
1 |
1 |
elsif ($key =~ /^lon/i) { } |
|
|
1 |
0 |
elsif ($key =~ /^bea/i) { } |
|
456
|
0 |
21 |
if $DEBUG |
|
480
|
90 |
0 |
if (defined $lat) { } |
|
481
|
90 |
0 |
if $units eq 'degrees' |
|
499
|
0 |
90 |
if ($DEBUG) |
|
504
|
90 |
0 |
if ($self->{'units'} eq 'degrees') |
|
528
|
0 |
1220 |
if $DEBUG |
|
549
|
0 |
432 |
if $DEBUG |
|
552
|
0 |
432 |
if $DEBUG |
|
573
|
0 |
408 |
if $DEBUG |
|
575
|
0 |
408 |
if $DEBUG |
|
598
|
0 |
252 |
if $DEBUG |
|
600
|
0 |
252 |
if $DEBUG |
|
603
|
252 |
0 |
if (wantarray) { } |
|
628
|
0 |
100 |
if $DEBUG |
|
630
|
0 |
100 |
if $DEBUG |
|
632
|
0 |
100 |
if $DEBUG |
|
656
|
200 |
0 |
if $units eq 'degrees' |
|
657
|
0 |
200 |
if $DEBUG |
|
678
|
0 |
1996 |
if $DEBUG |
|
694
|
0 |
1996 |
if ($DEBUG) |
|
703
|
0 |
1996 |
if $DEBUG |
|
706
|
0 |
9413 |
if $DEBUG |
|
712
|
0 |
9413 |
if $DEBUG |
|
719
|
72 |
9341 |
if ($sy == 0) { } |
|
725
|
0 |
9413 |
if $DEBUG |
|
730
|
8669 |
744 |
if ($c2a > 0) |
|
740
|
0 |
9413 |
if ($DEBUG) |
|
757
|
0 |
1996 |
if ($DEBUG) |
|
767
|
0 |
1996 |
if $DEBUG |
|
770
|
0 |
1996 |
if ($self->{'symmetric'}) { } |
|
771
|
0 |
0 |
if $faz < -3.1415926535897931 |
|
772
|
0 |
0 |
if $faz >= 3.1415926535897931 |
|
774
|
946 |
1050 |
if $faz < 0 |
|
775
|
0 |
1996 |
if $faz >= $twopi |
|
780
|
0 |
1996 |
if $DEBUG |
|
795
|
0 |
400 |
if ($DEBUG) |
|
813
|
400 |
0 |
if $cf != 0 |
|
827
|
0 |
400 |
if ($DEBUG) |
|
875
|
9184 |
56 |
if $units eq 'degrees' |
|
894
|
824 |
676 |
if ($self->{$elem}) { } |
|
903
|
1476 |
24 |
if $self->{'units'} eq 'degrees' |