| line |
true |
false |
branch |
|
100
|
2 |
19 |
if (exists $headers->{'BACKEND'} and defined $headers->{'BACKEND'} and $headers->{'BACKEND'} =~ /^ACSIS/i) { }
|
|
|
0 |
19 |
elsif (exists $headers->{'BACKEND'} and defined $headers->{'BACKEND'} and $headers->{'BACKEND'} =~ /^DAS/i and not exists $headers->{'GSDFILE'} && exists $headers->{'SCA#'}) { }
|
|
|
0 |
19 |
elsif (exists $headers->{'INST_DHS'} and defined $headers->{'INST_DHS'} and $headers->{'INST_DHS'} eq 'ACSIS') { }
|
|
157
|
1 |
0 |
if (defined $dr) { }
|
|
169
|
1 |
0 |
if ($utdate < 20080701)
|
|
170
|
0 |
1 |
if ($obstype eq 'skydip' and $dr eq 'REDUCE_SCIENCE')
|
|
177
|
0 |
1 |
if ($standard and $is_sci)
|
|
182
|
0 |
0 |
if ($utdate > 20081115 and $pol and $is_sci)
|
|
183
|
0 |
0 |
unless $dr =~ /_POL$/
|
|
186
|
0 |
1 |
if ($dr eq 'REDUCE_SCIENCE')
|
|
187
|
0 |
0 |
$freq_sw ? :
|
|
204
|
1 |
0 |
if (defined $ut and $ut < 20080615)
|
|
205
|
0 |
1 |
if (defined $dr and $dr eq 'REDUCE_SKYDIP')
|
|
226
|
0 |
0 |
if ($utdate > 20081115 and defined $inbeam and $inbeam =~ /pol/i)
|
|
247
|
0 |
1 |
if ($pol)
|
|
276
|
0 |
1 |
defined $FITS_headers->{'TRACKSYS'} ? :
|
|
278
|
0 |
1 |
if defined $system
|
|
282
|
0 |
1 |
defined $FITS_headers->{'BASEC1'} ? :
|
|
287
|
0 |
1 |
defined $FITS_headers->{'BASEC2'} ? :
|
|
292
|
0 |
1 |
if (defined $system and defined $base_lon)
|
|
299
|
0 |
0 |
if (defined $FITS_headers->{'SKYREFX'})
|
|
311
|
0 |
1 |
if (defined $system and defined $base_lat)
|
|
318
|
0 |
0 |
if (defined $FITS_headers->{'SKYREFY'})
|
|
327
|
0 |
1 |
if (defined $ref_lon and defined $ref_lat)
|
|
347
|
0 |
1 |
if (defined $FITS_headers->{'SAM_MODE'} and uc $FITS_headers->{'SAM_MODE'} eq 'RASTER') { }
|
|
370
|
0 |
1 |
if (defined $FITS_headers->{'SURVEY'}) { }
|
|
375
|
1 |
0 |
if (defined $project)
|
|
376
|
0 |
1 |
if ($project =~ /JLS([GNS])/)
|
|
377
|
0 |
0 |
if ($1 eq 'G') { }
|
|
|
0 |
0 |
elsif ($1 eq 'N') { }
|
|
|
0 |
0 |
elsif ($1 eq 'S') { }
|
|
408
|
1 |
0 |
if (exists $FITS_headers->{'DATE-OBS'} and exists $FITS_headers->{'DATE-END'})
|
|
430
|
1 |
0 |
if (exists $FITS_headers->{'INSTRUME'})
|
|
431
|
0 |
1 |
if ($FITS_headers->{'INSTRUME'} =~ /^HARP/ or $FITS_headers->{'INSTRUME'} =~ /^FE_HARP/) { }
|
|
453
|
1 |
0 |
if (exists $FITS_headers->{'OBSID'} and defined $FITS_headers->{'OBSID'}) { }
|
|
463
|
0 |
0 |
if (defined $backend and defined $obsnum and defined $dateobs)
|
|
492
|
1 |
0 |
if (exists $FITS_headers->{'SAM_MODE'} and exists $FITS_headers->{'SW_MODE'} and exists $FITS_headers->{'OBS_TYPE'})
|
|
497
|
0 |
1 |
if $sam_mode eq 'scan'
|
|
503
|
0 |
1 |
unless $obs_type
|
|
506
|
0 |
1 |
$obs_type =~ /science/i ? :
|
|
536
|
0 |
2 |
unless $ot
|
|
538
|
2 |
0 |
if ($ot)
|
|
541
|
0 |
2 |
if ($obs_type =~ /science/) { }
|
|
|
2 |
0 |
elsif ($obs_type =~ /focus/) { }
|
|
|
0 |
0 |
elsif ($obs_type =~ /pointing/) { }
|
|
|
0 |
0 |
elsif ($obs_type =~ /skydip/) { }
|
|
543
|
0 |
0 |
if (defined $FITS_headers->{'SAM_MODE'})
|
|
547
|
0 |
0 |
if ($sam_mode =~ /raster|scan/) { }
|
|
|
0 |
0 |
elsif ($sam_mode =~ /grid/) { }
|
|
|
0 |
0 |
elsif ($sam_mode =~ /jiggle/) { }
|
|
589
|
0 |
1 |
if (defined $frameset and UNIVERSAL::isa($frameset, 'Starlink::AST::FrameSet')) { }
|
|
|
0 |
1 |
elsif (exists $FITS_headers->{'RESTFREQ'} or exists $FITS_headers->{'SUBHEADERS'} and exists $FITS_headers->{'SUBHEADERS'}[0]{'RESTFREQ'}) { }
|
|
602
|
0 |
0 |
exists $FITS_headers->{'RESTFREQ'} ? :
|
|
626
|
0 |
1 |
if (exists $FITS_headers->{'DOPPLER'} and defined $FITS_headers->{'DOPPLER'})
|
|
629
|
0 |
0 |
if (defined $frameset and UNIVERSAL::isa($frameset, 'Starlink::AST::FrameSet'))
|
|
637
|
0 |
0 |
unless (defined $return)
|
|
638
|
0 |
0 |
if (exists $FITS_headers->{'SPECSYS'}) { }
|
|
643
|
0 |
0 |
if ($doppler eq 'RADIO') { }
|
|
|
0 |
0 |
elsif ($doppler eq 'OPTICAL') { }
|
|
670
|
0 |
1 |
unless defined $transition
|
|
693
|
1 |
0 |
if (defined $transition)
|
|
722
|
0 |
1 |
if (defined $frameset and UNIVERSAL::isa($frameset, 'Starlink::AST::FrameSet')) { }
|
|
726
|
0 |
0 |
if (defined $FITS_headers->{'DOPPLER'})
|
|
727
|
0 |
0 |
if ($FITS_headers->{'DOPPLER'} =~ /rad/i) { }
|
|
|
0 |
0 |
elsif ($FITS_headers->{'DOPPLER'} =~ /opt/i) { }
|
|
|
0 |
0 |
elsif ($FITS_headers->{'DOPPLER'} =~ /red/i) { }
|
|
743
|
0 |
1 |
if (exists $FITS_headers->{'DOPPLER'} and exists $FITS_headers->{'ZSOURCE'} || exists $FITS_headers->{'SUBHEADERS'}[0]{'ZSOURCE'})
|
|
749
|
0 |
0 |
exists $FITS_headers->{'ZSOURCE'} ? :
|
|
751
|
0 |
0 |
if ($doppler eq 'REDSHIFT') { }
|
|
|
0 |
0 |
elsif ($doppler eq 'OPTICAL') { }
|
|
|
0 |
0 |
elsif ($doppler eq 'RADIO') { }
|
|
774
|
0 |
1 |
defined $general ? :
|
|
790
|
0 |
1 |
if (defined $fsw and $fsw =~ /freqsw/i)
|