Branch Coverage

blib/lib/Astro/Fluxes.pm
Criterion Covered Total %
branch 60 114 52.6


line true false branch
64 3 0 if @_
110 0 25 unless (defined $args{'waveband'})
115 18 7 defined $args{'derived'} ? :
117 0 25 unless (UNIVERSAL::isa($waveband, 'Astro::WaveBand'))
123 0 25 if (defined $datetime)
124 0 0 unless (UNIVERSAL::isa($datetime, 'DateTime'))
130 24 1 unless (defined $args{'type'})
139 17 11 unless (defined $flux->reference_waveband)
140 0 17 if (defined $datetime and defined $flux->datetime) { }
141 0 0 if (($datetime <=> $flux->datetime) == 0)
142 0 0 if (lc $type eq lc $flux->type)
148 16 1 if (lc $type eq lc $flux->type)
156 16 9 if defined $result
159 3 6 unless $derived
162 0 6 unless $type =~ /^mag/i
172 6 0 if (defined $flux->reference_waveband and scalar(@{${$$self{'FLUXES'};}{$flux->reference_waveband->natural};} > 1) || ${$${$$self{'FLUXES'};}{$flux->reference_waveband->natural};}[0]->reference_waveband != $waveband)
175 0 6 if (defined $args{'datetime'}) { }
176 0 0 if (defined $flux->datetime)
194 6 0 if (defined $ref_flux)
197 0 6 if (defined $args{'datetime'}) { }
198 0 0 if (defined $ref_datetime)
200 0 0 if defined $err
204 6 0 if defined $err
208 6 0 if defined $running_error
212 0 6 if (not defined $running_total) { }
216 6 0 if (defined $running_error) { }
223 0 6 if (defined $args{'datetime'}) { }
266 0 4 unless (defined $args{'upper'})
269 0 4 unless (defined $args{'lower'})
277 0 4 unless (UNIVERSAL::isa($upper, 'Astro::WaveBand'))
280 0 4 unless (UNIVERSAL::isa($lower, 'Astro::WaveBand'))
289 4 4 if (defined $flux->reference_waveband)
291 0 4 if (defined $args{'datetime'})
292 0 0 unless defined $flux->datetime
293 0 0 if (($flux->datetime <=> $args{'datetime'}) != 0) { }
302 2 2 if ($ref_key eq $upper_key)
305 2 0 if (defined $flux->error('mag')) { }
312 0 2 if (defined $flux->datetime) { }
331 0 2 if (defined $args{'datetime'}) { }
340 2 0 if (defined $upper_mag and defined $lower_mag)
344 0 2 if (defined $upper_mag->error('mag') and $lower_mag->error('mag')) { }
352 0 2 if (defined $lower_mag->datetime and defined $upper_mag->datetime) { }
392 6 4 if (UNIVERSAL::isa($arg, 'Astro::Flux')) { }
4 0 elsif (UNIVERSAL::isa($arg, 'Astro::FluxColor')) { }
407 0 4 if (defined $arg->datetime) { }
456 1 1 if (@_)
458 1 0 if ($arg eq 'derived')
475 8 4 if defined $quality
477 8 4 if (defined $derived) { }
478 4 4 if defined $flag
504 0 1 unless (defined $args{'waveband'})
509 0 1 defined $args{'derived'} ? :
511 1 0 unless (UNIVERSAL::isa($waveband, 'Astro::WaveBand'))
550 0 1 unless @_
553 0 1 unless lc $arg eq 'filters'
575 0 0 unless UNIVERSAL::isa($other, 'Astro::Fluxes')
596 0 0 unless UNIVERSAL::isa($timestamp, 'DateTime')