| 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 (defined $utdate and $utdate < 20080701)
|
|
173
|
0 |
1 |
if (defined $obstype and $obstype =~ /skydip/i and $dr eq "REDUCE_SCIENCE")
|
|
180
|
0 |
1 |
if ($standard and $is_sci)
|
|
185
|
0 |
0 |
if (defined $utdate and $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 (defined $utdate and $utdate > 20081115 and defined $inbeam and $inbeam =~ /pol/i)
|
|
251
|
0 |
1 |
if ($pol)
|
|
280
|
0 |
1 |
defined $FITS_headers->{'TRACKSYS'} ? :
|
|
282
|
0 |
1 |
if defined $system
|
|
286
|
0 |
1 |
defined $FITS_headers->{'BASEC1'} ? :
|
|
291
|
0 |
1 |
defined $FITS_headers->{'BASEC2'} ? :
|
|
296
|
0 |
1 |
if (defined $system and defined $base_lon)
|
|
303
|
0 |
0 |
if (defined $FITS_headers->{'SKYREFX'})
|
|
315
|
0 |
1 |
if (defined $system and defined $base_lat)
|
|
322
|
0 |
0 |
if (defined $FITS_headers->{'SKYREFY'})
|
|
331
|
0 |
1 |
if (defined $ref_lon and defined $ref_lat)
|
|
351
|
1 |
0 |
if (defined $FITS_headers->{'SAM_MODE'})
|
|
352
|
0 |
1 |
if (uc $FITS_headers->{'SAM_MODE'} eq 'RASTER') { }
|
|
375
|
0 |
1 |
if (defined $FITS_headers->{'SURVEY'}) { }
|
|
380
|
1 |
0 |
if (defined $project)
|
|
381
|
0 |
1 |
if ($project =~ /JLS([GNS])/)
|
|
382
|
0 |
0 |
if ($1 eq 'G') { }
|
|
|
0 |
0 |
elsif ($1 eq 'N') { }
|
|
|
0 |
0 |
elsif ($1 eq 'S') { }
|
|
413
|
1 |
0 |
if (exists $FITS_headers->{'DATE-OBS'} and exists $FITS_headers->{'DATE-END'})
|
|
417
|
1 |
0 |
if (defined $start and defined $end)
|
|
437
|
1 |
0 |
if (exists $FITS_headers->{'INSTRUME'})
|
|
438
|
0 |
1 |
if ($FITS_headers->{'INSTRUME'} =~ /^HARP/ or $FITS_headers->{'INSTRUME'} =~ /^FE_HARP/) { }
|
|
460
|
1 |
0 |
if (exists $FITS_headers->{'OBSID'} and defined $FITS_headers->{'OBSID'}) { }
|
|
470
|
0 |
0 |
if (defined $backend and defined $obsnum and defined $dateobs)
|
|
499
|
1 |
0 |
if (exists $FITS_headers->{'SAM_MODE'} and exists $FITS_headers->{'SW_MODE'} and exists $FITS_headers->{'OBS_TYPE'})
|
|
504
|
0 |
1 |
if $sam_mode eq "scan"
|
|
510
|
0 |
1 |
unless $obs_type
|
|
513
|
0 |
1 |
$obs_type =~ /science/i ? :
|
|
543
|
0 |
2 |
unless $ot
|
|
545
|
2 |
0 |
if ($ot)
|
|
548
|
0 |
2 |
if ($obs_type =~ /science/) { }
|
|
|
2 |
0 |
elsif ($obs_type =~ /focus/) { }
|
|
|
0 |
0 |
elsif ($obs_type =~ /pointing/) { }
|
|
|
0 |
0 |
elsif ($obs_type =~ /skydip/) { }
|
|
550
|
0 |
0 |
if (defined $FITS_headers->{'SAM_MODE'})
|
|
554
|
0 |
0 |
if ($sam_mode =~ /raster|scan/) { }
|
|
|
0 |
0 |
elsif ($sam_mode =~ /grid/) { }
|
|
|
0 |
0 |
elsif ($sam_mode =~ /jiggle/) { }
|
|
596
|
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'}) { }
|
|
609
|
0 |
0 |
exists $FITS_headers->{'RESTFREQ'} ? :
|
|
633
|
0 |
1 |
if (exists $FITS_headers->{'DOPPLER'} and defined $FITS_headers->{'DOPPLER'})
|
|
636
|
0 |
0 |
if (defined $frameset and UNIVERSAL::isa($frameset, "Starlink::AST::FrameSet"))
|
|
644
|
0 |
0 |
unless (defined $return)
|
|
645
|
0 |
0 |
if (exists $FITS_headers->{'SPECSYS'}) { }
|
|
650
|
0 |
0 |
if ($doppler eq 'RADIO') { }
|
|
|
0 |
0 |
elsif ($doppler eq 'OPTICAL') { }
|
|
677
|
0 |
1 |
unless defined $transition
|
|
724
|
0 |
1 |
if (defined $frameset and UNIVERSAL::isa($frameset, 'Starlink::AST::FrameSet')) { }
|
|
728
|
0 |
0 |
if (defined $FITS_headers->{'DOPPLER'})
|
|
729
|
0 |
0 |
if ($FITS_headers->{'DOPPLER'} =~ /rad/i) { }
|
|
|
0 |
0 |
elsif ($FITS_headers->{'DOPPLER'} =~ /opt/i) { }
|
|
|
0 |
0 |
elsif ($FITS_headers->{'DOPPLER'} =~ /red/i) { }
|
|
745
|
0 |
1 |
if (exists $FITS_headers->{'DOPPLER'} and exists $FITS_headers->{'ZSOURCE'} || exists $FITS_headers->{'SUBHEADERS'}[0]{'ZSOURCE'})
|
|
751
|
0 |
0 |
exists $FITS_headers->{'ZSOURCE'} ? :
|
|
753
|
0 |
0 |
if ($doppler eq 'REDSHIFT') { }
|
|
|
0 |
0 |
elsif ($doppler eq 'OPTICAL') { }
|
|
|
0 |
0 |
elsif ($doppler eq 'RADIO') { }
|
|
776
|
0 |
1 |
defined $general ? :
|
|
792
|
0 |
1 |
if (defined $fsw and $fsw =~ /freqsw/i)
|