| line |
true |
false |
branch |
|
271
|
7 |
1 |
if (defined $attrs) { } |
|
276
|
0 |
8 |
unless "HASH" eq ref $attrs |
|
281
|
65 |
7 |
unless defined $attrs->{$key} |
|
284
|
35 |
72 |
unless $retain{$key} |
|
295
|
0 |
0 |
exists $accessor{$name} ? : |
|
329
|
1 |
7 |
if defined $spare and "all" eq $spare |
|
523
|
0 |
2 |
unless __instance($station, "Astro::Coord::ECI") |
|
529
|
0 |
2 |
unless $end >= $start |
|
534
|
0 |
2 |
if $start > $end |
|
567
|
0 |
0 |
$satlat < $stalat ? : |
|
|
0 |
2 |
$satlat < $stalat ? : |
|
|
0 |
2 |
$zdot > 0 ? : |
|
599
|
32 |
34 |
$asc ? : |
|
606
|
62 |
4 |
unless $elev > $horizon |
|
611
|
0 |
4 |
if $check_time |
|
613
|
0 |
0 |
if $want{'day'} and $sun_elev > $day_limit |
|
614
|
0 |
0 |
unless $want{'am'} || $want{'pm'} and $sun_elev < $night_limit |
|
618
|
0 |
0 |
if $want{'am'} and $time_of_day > 85920 || $time_of_day < 43680 |
|
620
|
0 |
0 |
if $want{'pm'} and $time_of_day > 42720 || $time_of_day < 480 |
|
628
|
0 |
4 |
unless ($self->azel($illum->universal($time)))[1] >= $self->dip - $illum_tolerance |
|
653
|
4 |
64 |
unless ($self->universal($time)->azel($illum->universal($time)))[1] >= $self->dip |
|
680
|
128 |
64 |
unless defined(my $angle = _flare_calculate_angle_list($mma, $illum_vector, $station_vector)) |
|
706
|
4 |
8 |
if @{$flare_potential[$mma];} < 2 |
|
712
|
46 |
10 |
unless $flare_potential[$mma][$_][0] < $angle |
|
716
|
2 |
6 |
if $angle > $max_angle |
|
723
|
0 |
6 |
if ($inx == 0) { } |
|
|
2 |
4 |
elsif ($inx == @{$flare_potential[$mma];} - 1) { } |
|
779
|
0 |
148 |
unless defined $angle |
|
798
|
2 |
4 |
if $angle > $max_mirror_angle |
|
809
|
0 |
4 |
unless ($self->universal($time)->azel($illum->universal($time)))[1] >= $self->dip |
|
820
|
4 |
0 |
if not $flare->{'status'} and $want{$flare->{'type'}} |
|
858
|
6 |
6 |
if (defined(my $angle = _flare_calculate_angle_list($mma, $illum_vector, $station_vector))) { } |
|
966
|
90 |
274 |
unless $eci[2] > 0 |
|
972
|
52 |
222 |
unless $eci[2] > 0 |
|
1003
|
0 |
8 |
if ($elev < $horizon) |
|
1069
|
8 |
0 |
$atm_extinct ? : |
|
1141
|
0 |
8 |
$limb_darkening > 0 ? : |
|
1149
|
0 |
4 |
($self->_time_in_zone($time))[2] > 12 ? : |
|
|
4 |
4 |
$sun_elev >= $twilight ? : |
|
1286
|
0 |
8 |
wantarray ? : |
|
1300
|
0 |
17 |
unless grep({"ARRAY" eq ref $_;} @args) == 3 |
|
1311
|
0 |
17 |
if $A == 0 |
|
1320
|
8 |
9 |
wantarray ? : |
|
1353
|
1045 |
27 |
if (not $accessor{$name}) { } |
|
|
27 |
0 |
elsif (ref $self) { } |
|
1370
|
0 |
8 |
wantarray ? : |
|
1388
|
0 |
4 |
unless defined(my $mag = $self->SUPER::magnitude($sta)) |
|
1395
|
4 |
0 |
if @flare |
|
1436
|
0 |
4 |
unless defined $time |
|
1445
|
0 |
4 |
unless $elev >= 0 |
|
1452
|
0 |
4 |
unless $lit >= 0 |
|
1477
|
0 |
12 |
if $debug |
|
1478
|
0 |
0 |
defined $angle ? : |
|
1481
|
4 |
8 |
defined $angle ? : |
|
1488
|
4 |
0 |
wantarray ? : |
|
1503
|
13 |
65 |
if (not $mutator{$name}) { } |
|
|
65 |
0 |
elsif (ref $self) { } |
|
1525
|
0 |
4 |
unless defined(my $zone = $self->get("zone")) |
|
1528
|
4 |
0 |
if &looks_like_number($zone) |
|
1531
|
0 |
0 |
if ($date_time_available) { } |
|
1554
|
0 |
1 |
if defined $name and $name =~ s/ \s* [[] ( \S ) []] \s* \z //msx |
|
1570
|
0 |
0 |
unless defined $status |
|
1572
|
0 |
0 |
unless defined $encode_status[$status] |
|
1596
|
0 |
295 |
unless defined $value |
|
1598
|
96 |
199 |
unless defined $status_map{$value} |