| 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 |
|
524
|
0 |
2 |
unless __instance($station, "Astro::Coord::ECI") |
|
530
|
0 |
2 |
unless $end >= $start |
|
535
|
0 |
2 |
if $start > $end |
|
568
|
0 |
0 |
$satlat < $stalat ? : |
|
|
0 |
2 |
$satlat < $stalat ? : |
|
|
0 |
2 |
$zdot > 0 ? : |
|
600
|
32 |
34 |
$asc ? : |
|
607
|
62 |
4 |
unless $elev > $horizon |
|
612
|
0 |
4 |
if $check_time |
|
614
|
0 |
0 |
if $want{'day'} and $sun_elev > $day_limit |
|
615
|
0 |
0 |
unless $want{'am'} || $want{'pm'} and $sun_elev < $night_limit |
|
619
|
0 |
0 |
if $want{'am'} and $time_of_day > 85920 || $time_of_day < 43680 |
|
621
|
0 |
0 |
if $want{'pm'} and $time_of_day > 42720 || $time_of_day < 480 |
|
629
|
0 |
4 |
unless ($self->azel($illum->universal($time)))[1] >= $self->dip - $illum_tolerance |
|
654
|
4 |
64 |
unless ($self->universal($time)->azel($illum->universal($time)))[1] >= $self->dip |
|
681
|
128 |
64 |
unless defined(my $angle = _flare_calculate_angle_list($mma, $illum_vector, $station_vector)) |
|
707
|
4 |
8 |
if @{$flare_potential[$mma];} < 2 |
|
713
|
46 |
10 |
unless $flare_potential[$mma][$_][0] < $angle |
|
717
|
2 |
6 |
if $angle > $max_angle |
|
724
|
0 |
6 |
if ($inx == 0) { } |
|
|
2 |
4 |
elsif ($inx == @{$flare_potential[$mma];} - 1) { } |
|
780
|
0 |
148 |
unless defined $angle |
|
799
|
2 |
4 |
if $angle > $max_mirror_angle |
|
810
|
0 |
4 |
unless ($self->universal($time)->azel($illum->universal($time)))[1] >= $self->dip |
|
821
|
4 |
0 |
if not $flare->{'status'} and $want{$flare->{'type'}} |
|
859
|
6 |
6 |
if (defined(my $angle = _flare_calculate_angle_list($mma, $illum_vector, $station_vector))) { } |
|
967
|
90 |
274 |
unless $eci[2] > 0 |
|
973
|
52 |
222 |
unless $eci[2] > 0 |
|
1004
|
0 |
8 |
if ($elev < $horizon) |
|
1070
|
8 |
0 |
$atm_extinct ? : |
|
1142
|
0 |
8 |
$limb_darkening > 0 ? : |
|
1150
|
0 |
4 |
($self->_time_in_zone($time))[2] > 12 ? : |
|
|
4 |
4 |
$sun_elev >= $twilight ? : |
|
1287
|
0 |
8 |
wantarray ? : |
|
1301
|
0 |
17 |
unless grep({"ARRAY" eq ref $_;} @args) == 3 |
|
1312
|
0 |
17 |
if $A == 0 |
|
1321
|
8 |
9 |
wantarray ? : |
|
1354
|
1045 |
27 |
if (not $accessor{$name}) { } |
|
|
27 |
0 |
elsif (ref $self) { } |
|
1371
|
0 |
8 |
wantarray ? : |
|
1389
|
0 |
4 |
unless defined(my $mag = $self->SUPER::magnitude($sta)) |
|
1396
|
4 |
0 |
if @flare |
|
1437
|
0 |
4 |
unless defined $time |
|
1446
|
0 |
4 |
unless $elev >= 0 |
|
1453
|
0 |
4 |
unless $lit >= 0 |
|
1478
|
0 |
12 |
if $debug |
|
1479
|
0 |
0 |
defined $angle ? : |
|
1482
|
4 |
8 |
defined $angle ? : |
|
1489
|
4 |
0 |
wantarray ? : |
|
1504
|
13 |
65 |
if (not $mutator{$name}) { } |
|
|
65 |
0 |
elsif (ref $self) { } |
|
1526
|
0 |
4 |
unless defined(my $zone = $self->get("zone")) |
|
1529
|
4 |
0 |
if &looks_like_number($zone) |
|
1532
|
0 |
0 |
if ($date_time_available) { } |
|
1555
|
0 |
1 |
if defined $name and $name =~ s/ \s* [[] ( \S ) []] \s* \z //msx |
|
1571
|
0 |
0 |
unless defined $status |
|
1573
|
0 |
0 |
unless defined $encode_status[$status] |
|
1597
|
0 |
295 |
unless defined $value |
|
1599
|
96 |
199 |
unless defined $status_map{$value} |