| line |
true |
false |
branch |
|
140
|
0 |
1029 |
unless exists $args{'type'}
|
|
145
|
1 |
1028 |
ref $args{'units'} ? :
|
|
149
|
1026 |
3 |
if exists $args{'ra'}
|
|
151
|
1026 |
3 |
if exists $args{'dec'}
|
|
153
|
3 |
1026 |
if exists $args{'long'}
|
|
155
|
3 |
1026 |
if exists $args{'lat'}
|
|
159
|
2 |
1027 |
if (exists $args{'parallax'}) { }
|
|
164
|
2 |
1027 |
if (exists $args{'pm'}) { }
|
|
172
|
0 |
1029 |
unless ref $pm eq "ARRAY"
|
|
181
|
525 |
504 |
if ($args{'type'} =~ /^j([0-9\.]+)/i) { }
|
|
|
501 |
3 |
elsif ($args{'type'} =~ /^b([0-9\.]+)/i) { }
|
|
|
3 |
0 |
elsif ($args{'type'} =~ /^gal/i) { }
|
|
|
0 |
0 |
elsif ($args{'type'} =~ /^supergal/i) { }
|
|
182
|
0 |
525 |
unless exists $args{'ra'} and exists $args{'dec'}
|
|
183
|
0 |
525 |
unless defined $args{'ra'} and defined $args{'dec'}
|
|
194
|
0 |
525 |
if ($equinox != 2000)
|
|
202
|
0 |
525 |
exists $args{'epoch'} && defined $args{'epoch'} ? :
|
|
206
|
0 |
0 |
if ($epoch != 2000 and $pm1 != 0 || $pm2 != 0 || $parallax != 0)
|
|
209
|
0 |
0 |
exists $args{'rv'} && $args{'rv'} ? :
|
|
211
|
0 |
0 |
if $pm1 != 0 || $pm2 != 0 and not $parallax
|
|
225
|
0 |
501 |
unless exists $args{'ra'} and exists $args{'dec'}
|
|
226
|
0 |
501 |
unless defined $args{'ra'} and defined $args{'dec'}
|
|
239
|
2 |
499 |
exists $args{'epoch'} && defined $args{'epoch'} ? :
|
|
244
|
0 |
500 |
if ($pm1 != 0 or $pm2 != 0 or $parallax != 0)
|
|
246
|
1 |
0 |
exists $args{'rv'} && $args{'rv'} ? :
|
|
248
|
0 |
1 |
if $pm1 != 0 || $pm2 != 0 and not $parallax
|
|
262
|
2 |
499 |
if ($equinox != 1950)
|
|
280
|
0 |
3 |
unless exists $args{'long'} and exists $args{'lat'}
|
|
281
|
0 |
3 |
unless defined $args{'long'} and defined $args{'lat'}
|
|
286
|
0 |
0 |
unless exists $args{'long'} and exists $args{'lat'}
|
|
287
|
0 |
0 |
unless defined $args{'long'} and defined $args{'lat'}
|
|
294
|
0 |
0 |
defined $args{'type'} ? :
|
|
309
|
1 |
1028 |
if (exists $args{'redshift'}) { }
|
|
312
|
2 |
1026 |
if exists $args{'rv'}
|
|
313
|
1 |
1027 |
if exists $args{'vdefn'}
|
|
314
|
1 |
1027 |
if exists $args{'vframe'}
|
|
367
|
104 |
3 |
unless @pm
|
|
368
|
104 |
3 |
unless defined $par
|
|
372
|
0 |
104 |
if ($pm[0] != 0 or $pm[1] != 0 or $par != 0)
|
|
380
|
3 |
0 |
if $self->vframe eq "HEL"
|
|
393
|
105 |
2 |
if ($sys eq 'FK5' and $equ == 2000) { }
|
|
|
0 |
2 |
elsif ($sys eq 'FK5') { }
|
|
434
|
1 |
8 |
if ref $retval eq "ARRAY"
|
|
504
|
0 |
2729 |
if ref $retval eq "ARRAY"
|
|
544
|
0 |
5762 |
if (@_)
|
|
567
|
0 |
5762 |
if (@_)
|
|
570
|
0 |
0 |
unless (defined $pm1)
|
|
574
|
0 |
0 |
unless (defined $pm2)
|
|
581
|
0 |
0 |
if $pm1 != 0 || $pm2 != 0 and not $parallax
|
|
584
|
1021 |
4741 |
unless (defined $self->{'pm'})
|
|
609
|
2616 |
18 |
unless (defined $ra_app and defined $dec_app)
|
|
617
|
2616 |
0 |
unless @pm
|
|
618
|
2616 |
0 |
unless defined $par
|
|
623
|
0 |
2616 |
if ($par != 0 or $pm[0] != 0 or $pm[1] != 0)
|
|
628
|
0 |
0 |
if $self->vframe eq "HEL"
|
|
702
|
0 |
0 |
unless defined $name
|
|
722
|
0 |
0 |
if defined $rv
|
|
723
|
0 |
0 |
if defined $vdefn
|
|
724
|
0 |
0 |
if defined $vframe
|
|
752
|
0 |
1492 |
if $self->parallax or $self->pm
|
|
758
|
0 |
1492 |
if (not defined $event or $event != 1 and $event != -1)
|
|
768
|
780 |
712 |
if ($diff >= 0 and $event == 1 or $diff <= 0 and $event == -1) { }
|
|
774
|
708 |
4 |
if ($dtime) { }
|
|
796
|
0 |
1547 |
if $self->parallax or $self->pm
|
|
804
|
1 |
1546 |
if abs $el - $refel > $tol
|