| line |
true |
false |
branch |
|
103
|
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') { }
|
|
160
|
1 |
0 |
if (defined $dr) { }
|
|
172
|
1 |
0 |
if ($utdate < 20080701)
|
|
173
|
0 |
1 |
if ($obstype eq "skydip" and $dr eq "REDUCE_SCIENCE")
|
|
180
|
0 |
1 |
if ($standard and $is_sci)
|
|
185
|
0 |
0 |
if ($utdate > 20081115 and $pol and $is_sci)
|
|
186
|
0 |
0 |
unless $dr =~ /_POL$/
|
|
189
|
0 |
1 |
if ($dr eq "REDUCE_SCIENCE")
|
|
190
|
0 |
0 |
$freq_sw ? :
|
|
207
|
1 |
0 |
if (defined $ut and $ut < 20080615)
|
|
208
|
0 |
1 |
if (defined $dr and $dr eq "REDUCE_SKYDIP")
|
|
229
|
0 |
0 |
if ($utdate > 20081115 and defined $inbeam and $inbeam =~ /pol/i)
|
|
250
|
0 |
1 |
if ($pol)
|
|
279
|
0 |
1 |
defined $FITS_headers->{'TRACKSYS'} ? :
|
|
281
|
0 |
1 |
if defined $system
|
|
285
|
0 |
1 |
defined $FITS_headers->{'BASEC1'} ? :
|
|
290
|
0 |
1 |
defined $FITS_headers->{'BASEC2'} ? :
|
|
295
|
0 |
1 |
if (defined $system and defined $base_lon)
|
|
302
|
0 |
0 |
if (defined $FITS_headers->{'SKYREFX'})
|
|
314
|
0 |
1 |
if (defined $system and defined $base_lat)
|
|
321
|
0 |
0 |
if (defined $FITS_headers->{'SKYREFY'})
|
|
330
|
0 |
1 |
if (defined $ref_lon and defined $ref_lat)
|
|
350
|
0 |
1 |
if (defined $FITS_headers->{'SAM_MODE'} and uc $FITS_headers->{'SAM_MODE'} eq 'RASTER') { }
|
|
373
|
0 |
1 |
if (defined $FITS_headers->{'SURVEY'}) { }
|
|
378
|
1 |
0 |
if (defined $project)
|
|
379
|
0 |
1 |
if ($project =~ /JLS([GNS])/)
|
|
380
|
0 |
0 |
if ($1 eq 'G') { }
|
|
|
0 |
0 |
elsif ($1 eq 'N') { }
|
|
|
0 |
0 |
elsif ($1 eq 'S') { }
|
|
411
|
1 |
0 |
if (exists $FITS_headers->{'DATE-OBS'} and exists $FITS_headers->{'DATE-END'})
|
|
415
|
1 |
0 |
if (defined $start and defined $end)
|
|
435
|
1 |
0 |
if (exists $FITS_headers->{'INSTRUME'})
|
|
436
|
0 |
1 |
if ($FITS_headers->{'INSTRUME'} =~ /^HARP/ or $FITS_headers->{'INSTRUME'} =~ /^FE_HARP/) { }
|
|
458
|
1 |
0 |
if (exists $FITS_headers->{'OBSID'} and defined $FITS_headers->{'OBSID'}) { }
|
|
468
|
0 |
0 |
if (defined $backend and defined $obsnum and defined $dateobs)
|
|
497
|
1 |
0 |
if (exists $FITS_headers->{'SAM_MODE'} and exists $FITS_headers->{'SW_MODE'} and exists $FITS_headers->{'OBS_TYPE'})
|
|
502
|
0 |
1 |
if $sam_mode eq "scan"
|
|
508
|
0 |
1 |
unless $obs_type
|
|
511
|
0 |
1 |
$obs_type =~ /science/i ? :
|
|
541
|
0 |
2 |
unless $ot
|
|
543
|
2 |
0 |
if ($ot)
|
|
546
|
0 |
2 |
if ($obs_type =~ /science/) { }
|
|
|
2 |
0 |
elsif ($obs_type =~ /focus/) { }
|
|
|
0 |
0 |
elsif ($obs_type =~ /pointing/) { }
|
|
|
0 |
0 |
elsif ($obs_type =~ /skydip/) { }
|
|
548
|
0 |
0 |
if (defined $FITS_headers->{'SAM_MODE'})
|
|
552
|
0 |
0 |
if ($sam_mode =~ /raster|scan/) { }
|
|
|
0 |
0 |
elsif ($sam_mode =~ /grid/) { }
|
|
|
0 |
0 |
elsif ($sam_mode =~ /jiggle/) { }
|
|
594
|
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'}) { }
|
|
607
|
0 |
0 |
exists $FITS_headers->{'RESTFREQ'} ? :
|
|
631
|
0 |
1 |
if (exists $FITS_headers->{'DOPPLER'} and defined $FITS_headers->{'DOPPLER'})
|
|
634
|
0 |
0 |
if (defined $frameset and UNIVERSAL::isa($frameset, "Starlink::AST::FrameSet"))
|
|
642
|
0 |
0 |
unless (defined $return)
|
|
643
|
0 |
0 |
if (exists $FITS_headers->{'SPECSYS'}) { }
|
|
648
|
0 |
0 |
if ($doppler eq 'RADIO') { }
|
|
|
0 |
0 |
elsif ($doppler eq 'OPTICAL') { }
|
|
675
|
0 |
1 |
unless defined $transition
|
|
698
|
1 |
0 |
if (defined $transition)
|
|
727
|
0 |
1 |
if (defined $frameset and UNIVERSAL::isa($frameset, 'Starlink::AST::FrameSet')) { }
|
|
731
|
0 |
0 |
if (defined $FITS_headers->{'DOPPLER'})
|
|
732
|
0 |
0 |
if ($FITS_headers->{'DOPPLER'} =~ /rad/i) { }
|
|
|
0 |
0 |
elsif ($FITS_headers->{'DOPPLER'} =~ /opt/i) { }
|
|
|
0 |
0 |
elsif ($FITS_headers->{'DOPPLER'} =~ /red/i) { }
|
|
748
|
0 |
1 |
if (exists $FITS_headers->{'DOPPLER'} and exists $FITS_headers->{'ZSOURCE'} || exists $FITS_headers->{'SUBHEADERS'}[0]{'ZSOURCE'})
|
|
754
|
0 |
0 |
exists $FITS_headers->{'ZSOURCE'} ? :
|
|
756
|
0 |
0 |
if ($doppler eq 'REDSHIFT') { }
|
|
|
0 |
0 |
elsif ($doppler eq 'OPTICAL') { }
|
|
|
0 |
0 |
elsif ($doppler eq 'RADIO') { }
|
|
779
|
0 |
1 |
defined $general ? :
|
|
795
|
0 |
1 |
if (defined $fsw and $fsw =~ /freqsw/i)
|