| 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') { }
|
|
163
|
1 |
0 |
if ($utdate < 20080701)
|
|
164
|
0 |
1 |
if ($obstype eq 'skydip' and $dr eq 'REDUCE_SCIENCE')
|
|
171
|
0 |
1 |
if ($standard and $is_sci)
|
|
176
|
0 |
0 |
if ($utdate > 20081115 and $pol and $is_sci)
|
|
177
|
0 |
0 |
unless $dr =~ /_POL$/
|
|
180
|
0 |
1 |
if ($dr eq 'REDUCE_SCIENCE')
|
|
181
|
0 |
0 |
$freq_sw ? :
|
|
198
|
1 |
0 |
if (defined $ut and $ut < 20080615)
|
|
199
|
0 |
1 |
if (defined $dr and $dr eq 'REDUCE_SKYDIP')
|
|
220
|
0 |
0 |
if ($utdate > 20081115 and defined $inbeam and $inbeam =~ /pol/i)
|
|
241
|
0 |
1 |
if ($pol)
|
|
270
|
0 |
1 |
defined $FITS_headers->{'TRACKSYS'} ? :
|
|
272
|
0 |
1 |
if defined $system
|
|
276
|
0 |
1 |
defined $FITS_headers->{'BASEC1'} ? :
|
|
281
|
0 |
1 |
defined $FITS_headers->{'BASEC2'} ? :
|
|
286
|
0 |
1 |
if (defined $system and defined $base_lon)
|
|
293
|
0 |
0 |
if (defined $FITS_headers->{'SKYREFX'})
|
|
305
|
0 |
1 |
if (defined $system and defined $base_lat)
|
|
312
|
0 |
0 |
if (defined $FITS_headers->{'SKYREFY'})
|
|
321
|
0 |
1 |
if (defined $ref_lon and defined $ref_lat)
|
|
341
|
0 |
1 |
if (defined $FITS_headers->{'SAM_MODE'} and uc $FITS_headers->{'SAM_MODE'} eq 'RASTER') { }
|
|
364
|
0 |
1 |
if (defined $FITS_headers->{'SURVEY'}) { }
|
|
369
|
1 |
0 |
if (defined $project)
|
|
370
|
0 |
1 |
if ($project =~ /JLS([GNS])/)
|
|
371
|
0 |
0 |
if ($1 eq 'G') { }
|
|
|
0 |
0 |
elsif ($1 eq 'N') { }
|
|
|
0 |
0 |
elsif ($1 eq 'S') { }
|
|
402
|
1 |
0 |
if (exists $FITS_headers->{'DATE-OBS'} and exists $FITS_headers->{'DATE-END'})
|
|
424
|
1 |
0 |
if (exists $FITS_headers->{'INSTRUME'})
|
|
425
|
0 |
1 |
if ($FITS_headers->{'INSTRUME'} =~ /^HARP/ or $FITS_headers->{'INSTRUME'} =~ /^FE_HARP/) { }
|
|
447
|
1 |
0 |
if (exists $FITS_headers->{'OBSID'} and defined $FITS_headers->{'OBSID'}) { }
|
|
457
|
0 |
0 |
if (defined $backend and defined $obsnum and defined $dateobs)
|
|
486
|
1 |
0 |
if (exists $FITS_headers->{'SAM_MODE'} and exists $FITS_headers->{'SW_MODE'} and exists $FITS_headers->{'OBS_TYPE'})
|
|
491
|
0 |
1 |
if $sam_mode eq 'scan'
|
|
497
|
0 |
1 |
unless $obs_type
|
|
500
|
0 |
1 |
$obs_type =~ /science/i ? :
|
|
530
|
0 |
2 |
unless $ot
|
|
532
|
2 |
0 |
if ($ot)
|
|
535
|
0 |
2 |
if ($obs_type =~ /science/) { }
|
|
|
2 |
0 |
elsif ($obs_type =~ /focus/) { }
|
|
|
0 |
0 |
elsif ($obs_type =~ /pointing/) { }
|
|
|
0 |
0 |
elsif ($obs_type =~ /skydip/) { }
|
|
537
|
0 |
0 |
if (defined $FITS_headers->{'SAM_MODE'})
|
|
541
|
0 |
0 |
if ($sam_mode =~ /raster|scan/) { }
|
|
|
0 |
0 |
elsif ($sam_mode =~ /grid/) { }
|
|
|
0 |
0 |
elsif ($sam_mode =~ /jiggle/) { }
|
|
583
|
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'}) { }
|
|
596
|
0 |
0 |
exists $FITS_headers->{'RESTFREQ'} ? :
|
|
620
|
0 |
1 |
if (exists $FITS_headers->{'DOPPLER'} and defined $FITS_headers->{'DOPPLER'})
|
|
623
|
0 |
0 |
if (defined $frameset and UNIVERSAL::isa($frameset, 'Starlink::AST::FrameSet'))
|
|
631
|
0 |
0 |
unless (defined $return)
|
|
632
|
0 |
0 |
if (exists $FITS_headers->{'SPECSYS'}) { }
|
|
637
|
0 |
0 |
if ($doppler eq 'RADIO') { }
|
|
|
0 |
0 |
elsif ($doppler eq 'OPTICAL') { }
|
|
664
|
0 |
1 |
unless defined $transition
|
|
687
|
1 |
0 |
if (defined $transition)
|
|
716
|
0 |
1 |
if (defined $frameset and UNIVERSAL::isa($frameset, 'Starlink::AST::FrameSet')) { }
|
|
720
|
0 |
0 |
if (defined $FITS_headers->{'DOPPLER'})
|
|
721
|
0 |
0 |
if ($FITS_headers->{'DOPPLER'} =~ /rad/i) { }
|
|
|
0 |
0 |
elsif ($FITS_headers->{'DOPPLER'} =~ /opt/i) { }
|
|
|
0 |
0 |
elsif ($FITS_headers->{'DOPPLER'} =~ /red/i) { }
|
|
737
|
0 |
1 |
if (exists $FITS_headers->{'DOPPLER'} and exists $FITS_headers->{'ZSOURCE'} || exists $FITS_headers->{'SUBHEADERS'}[0]{'ZSOURCE'})
|
|
743
|
0 |
0 |
exists $FITS_headers->{'ZSOURCE'} ? :
|
|
745
|
0 |
0 |
if ($doppler eq 'REDSHIFT') { }
|
|
|
0 |
0 |
elsif ($doppler eq 'OPTICAL') { }
|
|
|
0 |
0 |
elsif ($doppler eq 'RADIO') { }
|
|
768
|
0 |
1 |
defined $general ? :
|
|
784
|
0 |
1 |
if (defined $fsw and $fsw =~ /freqsw/i)
|