line |
true |
false |
branch |
112
|
1 |
0 |
if (defined $FITS_headers->{'CDELT2'}) { }
|
118
|
0 |
0 |
if (defined $date)
|
119
|
0 |
0 |
if ($date < 19990701) { }
|
|
0 |
0 |
elsif ($date < 20010401) { }
|
|
0 |
0 |
elsif ($date < 20011115) { }
|
136
|
0 |
1 |
if (defined $FITS_headers->{'CTYPE2'} and $FITS_headers->{'CTYPE2'} eq 'DEC--TAN' and abs $scale < 0.001)
|
156
|
0 |
2 |
unless (exists $FITS_headers->{'DHSVER'})
|
171
|
0 |
1 |
if (exists $FITS_headers->{'FILTER'} and $FITS_headers->{'FILTER'} =~ /pol/i) { }
|
199
|
1 |
0 |
if (exists $FITS_headers->{'RABASE'})
|
203
|
0 |
1 |
if (defined $format and $format eq 'HDS' and defined $date and $date > 20000507 and $date < 20000720) { }
|
233
|
1 |
0 |
if (defined $generic_headers->{'RA_BASE'})
|
236
|
0 |
1 |
if (defined $generic_headers->{'FILE_FORMAT'} and $generic_headers->{'FILE_FORMAT'} eq 'HDS' and defined $date and $date > 20000507 and $date < 20000720) { }
|
271
|
1 |
0 |
if (defined $FITS_headers->{'CDELT1'}) { }
|
277
|
0 |
0 |
if (defined $date)
|
278
|
0 |
0 |
if ($date < 19990701) { }
|
|
0 |
0 |
elsif ($date < 20010401) { }
|
|
0 |
0 |
elsif ($date < 20011115) { }
|
295
|
1 |
0 |
if ($scale > 0)
|
302
|
0 |
1 |
if (defined $FITS_headers->{'CTYPE1'} and $FITS_headers->{'CTYPE1'} eq 'RA---TAN' and abs $scale < 0.001)
|
327
|
1 |
0 |
if (defined $generic_headers->{'RA_SCALE'})
|
345
|
5 |
1 |
if (exists $FITS_headers->{'DATE'})
|
352
|
0 |
5 |
if (ref $utdate eq 'ARRAY')
|
374
|
1 |
0 |
if (exists $generic_headers->{'UTDATE'})
|
377
|
0 |
1 |
unless defined $date
|
395
|
1 |
0 |
exists $FITS_headers->{'DATE-END'} ? :
|
398
|
0 |
1 |
if (defined $dateend and not $dateend =~ /\d/)
|
420
|
2 |
0 |
exists $FITS_headers->{'DATE-OBS'} ? :
|
423
|
0 |
2 |
if (defined $dateobs and not $dateobs =~ /\d/)
|
449
|
1 |
0 |
if (exists $FITS_headers->{'RDOUT_X1'} and exists $FITS_headers->{'RDOUT_X2'}) { }
|
458
|
1 |
0 |
if ($xdim == 1024) { }
|
465
|
0 |
1 |
if ($FITS_headers->{'FILTER'} =~ /pol/)
|
501
|
1 |
0 |
if (exists $FITS_headers->{'RDOUT_Y1'} and exists $FITS_headers->{'RDOUT_Y2'}) { }
|
510
|
1 |
0 |
if ($ydim == 1024) { }
|
517
|
0 |
1 |
if ($FITS_headers->{'FILTER'} =~ /pol/)
|