Branch Coverage

blib/lib/Astro/FITS/HdrTrans/IRIS2.pm
Criterion Covered Total %
branch 0 70 0.0


line true false branch
139 0 0 if (exists $FITS_headers->{'ZDEND'})
157 0 0 if (exists $generic_headers->{'AIRMASS_END'})
174 0 0 if (exists $FITS_headers->{'ZDSTART'})
192 0 0 if (exists $generic_headers->{'AIRMASS_START'})
209 0 0 if (exists $FITS_headers->{'EQUINOX'})
210 0 0 if ($FITS_headers->{'EQUINOX'} =~ /1950/) { }
0 0 elsif ($FITS_headers->{'EQUINOX'} =~ /2000/) { }
233 0 0 if ($cd11 * $cd22 - $cd12 * $cd21 < 0) { }
252 0 0 if ($FITS_headers->{'IR2_FILT'} =~ /^OPEN$/i) { }
278 0 0 if ($obsmode eq "spectroscopy")
279 0 0 if (uc $filter eq 'K' or uc $filter eq 'KS') { }
0 0 elsif (uc $filter eq 'JS') { }
0 0 elsif (uc $filter eq 'J' or uc $filter eq 'JL') { }
0 0 elsif (uc $filter eq 'H' or uc $filter eq 'HS' or uc $filter eq 'HL') { }
311 0 0 if ($obsmode eq "spectroscopy")
312 0 0 if (uc $filter eq 'K' or uc $filter eq 'KS') { }
0 0 elsif (uc $filter eq 'JS') { }
0 0 elsif (uc $filter eq 'J' or uc $filter eq 'JL') { }
0 0 elsif (uc $filter eq 'H' or uc $filter eq 'HS' or uc $filter eq 'HL') { }
338 0 0 if (exists $FITS_headers->{'IR2_GRSM'}) { }
0 0 elsif (exists $FITS_headers->{'IR2_SLIT'}) { }
339 0 0 $FITS_headers->{'IR2_GRSM'} =~ /^(SAP|SIL)/i ? :
341 0 0 $FITS_headers->{'IR2_SLIT'} eq 'OPEN1' ? :
371 0 0 if (exists $FITS_headers->{'UTDATE'})
390 0 0 if (exists $generic_headers->{'UTDATE'})
392 0 0 unless defined $date
410 0 0 if (exists $FITS_headers->{'UTDATE'} and exists $FITS_headers->{'UTEND'})
430 0 0 if (exists $generic_headers->{'UTEND'})
451 0 0 if (exists $FITS_headers->{'UTDATE'} and exists $FITS_headers->{'UTSTART'})
471 0 0 if (exists $generic_headers->{'UTSTART'})
492 0 0 if (exists $FITS_headers->{'RABASE'})
509 0 0 if (exists $generic_headers->{'X_BASE'})
529 0 0 if (exists $FITS_headers->{'CD1_2'} and exists $FITS_headers->{'CD2_2'})
552 0 0 if (exists $FITS_headers->{'CD1_1'} and exists $FITS_headers->{'CD1_2'} and exists $FITS_headers->{'CD2_1'} and exists $FITS_headers->{'CD2_2'})
561 0 0 if ($cd11 * $cd22 - $cd12 * $cd21 < 0) { }