Branch Coverage

blib/lib/Astro/Coord/ECI/Sun.pm
Criterion Covered Total %
branch 48 86 55.8


line true false branch
109 0 138 if ref $class
110 136 2 if ($Singleton and $weaken and __classisa($class, __PACKAGE__)) { }
112 97 39 if ($self = $object{$class}) { }
113 1 96 if @args
184 8 2 if $inx < @events
227 1 1 if $Singleton and $weaken
261 0 1459 unless defined $self->{'_sun_geometric_longitude'}
282 0 0 ref $self ? :
0 67722 $attrib{$name} ? :
0 67722 'sun' eq $name ? :
285 17 67705 wantarray ? :
324 0 0 if embodies($args[0], "Astro::Coord::ECI")
327 0 0 unless defined $theta
328 0 0 unless (defined $omega)
333 0 0 unless (defined $central_mag)
343 0 0 if ($theta < $omega)
356 0 0 wantarray ? :
387 12 4 if $sgn < 0
396 708 648 if $sgn < 0
398 8 1348 if ($sgn != $prev_sgn[$rise])
401 8 0 wantarray ? :
471 0 7 if $self->{'iterate_for_quarters'}
475 0 7 if (defined $quarter) { }
480 0 0 if $season < $time
495 1 6 if ($time - $season > 15552000)
502 3 4 if ($season < $time)
504 0 3 if ($quarter > 3)
513 2 5 wantarray ? :
551 4 0 $self->__object_is_self_named ? :
558 2 0 $self->__object_is_self_named ? :
569 0 2 if $station = $self->get("station") and ($station->geodetic)[0] < 0
575 4 0 $self->__object_is_self_named ? :
582 4 0 $self->__object_is_self_named ? :
615 0 11 $year < 1000 ? :
636 0 11 if $self->{'debug'}
640 0 11 if $self->{'debug'}
672 0 11 if $self->{'debug'}
675 0 11 if $self->{'debug'}
681 0 11 if $self->{'debug'}
696 0 209 if ('sun' eq $name) { }
41 168 elsif ($attrib{$name}) { }
698 41 0 if (ref $self) { }
761 0 69578 if $self->{'debug'}