| line |
true |
false |
branch |
|
27
|
3 |
10 |
unless 'Astro::Coord::ECI::VSOP87D'->can('DEBUG') |
|
91
|
3011 |
0 |
if ($sun->isa('Astro::Coord::ECI::VSOP87D::Sun')) { } |
|
112
|
1719 |
1292 |
if ($Rb) { } |
|
148
|
2070 |
1719 |
if ((my $check = sprintf('%.1f', $tau)) ne $last_tau) { } |
|
164
|
1104 |
615 |
if $lambda < 0 |
|
318
|
1292 |
1719 |
unless ($Rb) |
|
413
|
4 |
242 |
unless defined $time |
|
421
|
130 |
116 |
$lon < 0 ? : |
|
429
|
1 |
0 |
if defined $attr->{'geometric_longitude'} |
|
437
|
1002 |
246 |
if (defined $time) { } |
|
609
|
0 |
8281 |
unless defined $time |
|
615
|
6338 |
1943 |
if (my $memo = "$time $cutoff") eq $memoize_args |
|
653
|
205958 |
0 |
if ($row->[5] and $cutoff <= abs $row->[5]) |
|
656
|
124352 |
81606 |
if ($row->[7] and $cutoff <= abs $row->[7]) |
|
672
|
0 |
15180 |
unless my $ref = ref $self |
|
685
|
27 |
0 |
unless defined $arg->{'id'} |
|
687
|
27 |
0 |
unless defined $arg->{'name'} |
|
690
|
27 |
0 |
unless defined $arg->{'diameter'} |
|
693
|
25 |
2 |
unless defined $arg->{'model_cutoff'} |
|
696
|
27 |
0 |
unless defined $arg->{'nutation_cutoff'} |
|
703
|
0 |
28 |
unless defined $val |
|
705
|
0 |
28 |
unless $self->model_cutoff_definition($val) |
|
713
|
3015 |
3051 |
unless defined $name |
|
716
|
6 |
6060 |
if (@arg) { } |
|
717
|
4 |
2 |
if (defined(my $val = $arg[0])) { } |
|
718
|
2 |
2 |
unless (ref $val) |
|
719
|
0 |
2 |
unless &looks_like_number($val) and not $val =~ / \A Inf (?: inity )? | NaN \z /msx |
|
729
|
34 |
274 |
if $term->[0] < $num |
|
733
|
20 |
14 |
if $count |
|
738
|
3 |
1 |
if ('CODE' eq ref $val) |
|
745
|
0 |
4 |
unless 'HASH' eq ref $val |
|
750
|
4 |
40 |
if 'name' eq $name |
|
752
|
0 |
40 |
unless exists $terms->{$name} |
|
754
|
0 |
40 |
if $val->{$name} > $terms->{$name} |
|
759
|
0 |
2 |
if $self->__model_definition('default_model_cutoff')->{$name} |
|
799
|
118009 |
560 |
$arg{'model_cutoff_definition'} ? : |
|
|
18397 |
100172 |
unless my $limit = $arg{'model_cutoff_definition'} ? $arg{'model_cutoff_definition'}{$series->{'series'}} || 0 : @{$series->{'terms'};} |
|
825
|
0 |
27 |
unless defined $val |
|
827
|
0 |
27 |
unless &looks_like_number($val) and $val >= 0 |
|
837
|
2259 |
3011 |
unless defined $time |