|  line  | 
 !l  | 
 l&&!r  | 
 l&&r  | 
 condition  | 
 
| 
364
 | 
 42  | 
 1  | 
 2  | 
 wantarray and not $fh->eof  | 
 
| 
377
 | 
 45  | 
 3  | 
 0  | 
 wantarray and not $opt->{'data'}  | 
 
| 
 | 
 48  | 
 0  | 
 0  | 
 wantarray and not $opt->{'data'} and @extensions  | 
 
| 
378
 | 
 0  | 
 0  | 
 0  | 
 $fh->read($line, 80) and not $line =~ /^XTENSION=/  | 
 
| 
 | 
 0  | 
 0  | 
 0  | 
 $fh->read($line, 80) and not $line =~ /^XTENSION=/ and not $fh->eof  | 
 
| 
387
 | 
 2  | 
 46  | 
 0  | 
 $nbytes == 0 and not $line =~ /^SIMPLE  = +T/  | 
 
| 
414
 | 
 3  | 
 42  | 
 3  | 
 not wantarray and $currentext != $extnum  | 
 
| 
439
 | 
 0  | 
 0  | 
 48  | 
 $PDL::Astro_FITS_Header and $opt->{'afh'}  | 
 
| 
481
 | 
 0  | 
 0  | 
 0  | 
 defined $name and $name eq 'END'  | 
 
| 
502
 | 
 2  | 
 42  | 
 4  | 
 not defined $foo->{'XTENSION'} and $foo->{'NAXIS'} == 0  | 
 
| 
 | 
 44  | 
 1  | 
 3  | 
 not defined $foo->{'XTENSION'} and $foo->{'NAXIS'} == 0 and not wantarray  | 
 
| 
 | 
 43  | 
 0  | 
 3  | 
 not defined $foo->{'XTENSION'} and $foo->{'NAXIS'} == 0 and not wantarray and not $explicit_extension  | 
 
| 
558
 | 
 0  | 
 0  | 
 1  | 
 ref $extensions[0] eq 'HASH' and $extensions[0]{'SIMPLE'}  | 
 
| 
 | 
 0  | 
 0  | 
 1  | 
 ref $extensions[0] eq 'HASH' and $extensions[0]{'SIMPLE'} and exists $extensions[0]{'NAXIS'}  | 
 
| 
 | 
 0  | 
 0  | 
 1  | 
 ref $extensions[0] eq 'HASH' and $extensions[0]{'SIMPLE'} and exists $extensions[0]{'NAXIS'} and $extensions[0]{'NAXIS'} == 0  | 
 
| 
636
 | 
 41  | 
 0  | 
 68  | 
 defined $$foo{"NAXIS$i"} and $i <= $foo->{'NAXIS'}  | 
 
| 
688
 | 
 23  | 
 17  | 
 1  | 
 $foo->{'BITPIX'} > 0 and exists $foo->{'BLANK'}  | 
 
| 
704
 | 
 39  | 
 2  | 
 0  | 
 $pdl->badflag and $PDL::verbose  | 
 
| 
1266
 | 
 0  | 
 0  | 
 8  | 
 $hdr->{'NAXIS2'} > 0 and $tmpcol->{'rpt'} > 0  | 
 
| 
1285
 | 
 3  | 
 0  | 
 0  | 
 $hdr->{'ZIMAGE'} and $hdr->{'ZCMPTYPE'}  | 
 
| 
 | 
 0  | 
 0  | 
 0  | 
 $hdr->{'ZIMAGE'} and $hdr->{'ZCMPTYPE'} and $opt->{'expand'}  | 
 
| 
1526
 | 
 0  | 
 0  | 
 0  | 
 exists $$hdr{'Z' . $_} and defined $$hdr{'Z' . $_}  | 
 
| 
1995
 | 
 0  | 
 31  | 
 2  | 
 $PDL::Astro_FITS_Header and defined $h  | 
 
| 
 | 
 31  | 
 0  | 
 2  | 
 $PDL::Astro_FITS_Header and defined $h and ref $h eq 'HASH'  | 
 
| 
 | 
 31  | 
 0  | 
 2  | 
 $PDL::Astro_FITS_Header and defined $h and ref $h eq 'HASH' and not defined tied %$h  | 
 
| 
2025
 | 
 0  | 
 0  | 
 2  | 
 defined tied %$h and UNIVERSAL::isa(tied %$h, 'Astro::FITS::Header')  | 
 
| 
 | 
 31  | 
 0  | 
 2  | 
 defined $h and (defined tied %$h and UNIVERSAL::isa(tied %$h, 'Astro::FITS::Header'))  | 
 
| 
2060
 | 
 4  | 
 0  | 
 0  | 
 exists $$h{"NAXIS$k"} && $$h{"NAXIS$k"} != $pdl->dim($k - 1)  | 
 
| 
2087
 | 
 6  | 
 8  | 
 4  | 
 defined $index[0] and $kn  | 
 
| 
2230
 | 
 31  | 
 1  | 
 1  | 
 $pdl->badflag and $BITPIX < 0  | 
 
| 
 | 
 32  | 
 0  | 
 1  | 
 $pdl->badflag and $BITPIX < 0 and $PDL::Bad::UseNaN == 0  | 
 
| 
2246
 | 
 0  | 
 0  | 
 0  | 
 $pdl->badflag and $BITPIX < 0  | 
 
| 
 | 
 0  | 
 0  | 
 0  | 
 $pdl->badflag and $BITPIX < 0 and $PDL::Bad::UseNaN == 0  | 
 
| 
2256
 | 
 31  | 
 1  | 
 1  | 
 $pdl->badflag and $BITPIX < 0  | 
 
| 
 | 
 32  | 
 0  | 
 1  | 
 $pdl->badflag and $BITPIX < 0 and $PDL::Bad::UseNaN == 0  | 
 
| 
2385
 | 
 1  | 
 0  | 
 9  | 
 !(/^(hdr|tbl)$/ || /^len_/) && defined $hash->{$_}  | 
 
| 
2400
 | 
 3  | 
 0  | 
 6  | 
 defined $rows and $rows != 1  | 
 
| 
2401
 | 
 9  | 
 0  | 
 0  | 
 $r != $rows and $r != 1  | 
 
| 
2441
 | 
 9  | 
 0  | 
 0  | 
 $name ne $key and $PDL::verbose  | 
 
| 
2494
 | 
 3  | 
 0  | 
 0  | 
 $PDL::debug and $i != $cols  | 
 
| 
2691
 | 
 1  | 
 8  | 
 0  | 
 UNIVERSAL::isa($var, 'PDL') and $var->ndims > 1  | 
|  line  | 
 l  | 
 !l&&r  | 
 !l&&!r  | 
 condition  | 
 
| 
88
 | 
 0  | 
 0  | 
 0  | 
 $ENV{'PDL_FITS_LEGACY'} or $PDL::Config{'FITS_LEGACY'}  | 
 
| 
335
 | 
 0  | 
 0  | 
 46  | 
 @_ < 1 or @_ > 2  | 
 
| 
389
 | 
 0  | 
 0  | 
 48  | 
 $fh->eof or not $ct  | 
 
| 
444
 | 
 0  | 
 48  | 
 389  | 
 $fh->eof or $line =~ /^END(\s|\000)/  | 
 
| 
516
 | 
 0  | 
 1  | 
 44  | 
 not $opt->{'data'} or $foo->{'NAXIS'} == 0  | 
 
| 
537
 | 
 0  | 
 0  | 
 0  | 
 $PDL::verbose or $PDL::debug  | 
 
| 
661
 | 
 8  | 
 10  | 
 23  | 
 $pdl->get_datatype == $PDL::IO::FITS::PDL_L or $pdl->get_datatype == $PDL::IO::FITS::PDL_F  | 
 
| 
662
 | 
 13  | 
 1  | 
 27  | 
 $pdl->get_datatype == $PDL::IO::FITS::PDL_D or $pdl->get_datatype == $PDL::IO::FITS::PDL_LL  | 
 
| 
711
 | 
 41  | 
 0  | 
 0  | 
 not defined $bscale or $bscale eq ''  | 
 
| 
712
 | 
 41  | 
 0  | 
 0  | 
 not defined $bzero or $bzero eq ''  | 
 
| 
893
 | 
 0  | 
 0  | 
 0  | 
 length $$hdr{"TSCAL$n"} or length $$hdr{"TZERO$n"}  | 
 
| 
969
 | 
 0  | 
 0  | 
 0  | 
 length $$hdr{"TZERO$n"} or length $$hdr{"TSCAL$n"}  | 
 
| 
1012
 | 
 0  | 
 0  | 
 9  | 
 defined $tbl->{$name} or $name eq 'COL'  | 
 
| 
1187
 | 
 0  | 
 0  | 
 8  | 
 $valid_tzero or $valid_tscal  | 
 
| 
1533
 | 
 0  | 
 0  | 
 0  | 
 $k =~ /^Z/ or $k eq 'TFIELDS'  | 
 
| 
 | 
 0  | 
 0  | 
 0  | 
 $k =~ /^Z/ or $k eq 'TFIELDS' or $k =~ /^TTYPE/  | 
 
| 
 | 
 0  | 
 0  | 
 0  | 
 $k =~ /^Z/ or $k eq 'TFIELDS' or $k =~ /^TTYPE/ or $k =~ /^TFORM/  | 
 
| 
1541
 | 
 0  | 
 0  | 
 0  | 
 exists $hdr->{'BSCALE'} or exists $hdr->{'BLANK'}  | 
 
| 
1823
 | 
 0  | 
 0  | 
 31  | 
 $hdrk eq 'F' or $hdrk eq 'T'  | 
 
| 
1864
 | 
 0  | 
 0  | 
 38  | 
 $#_ < 1 or $#_ > 3  | 
 
| 
1870
 | 
 0  | 
 38  | 
 0  | 
 ref $y eq 'HASH' or not defined $y  | 
 
| 
1940
 | 
 2  | 
 0  | 
 19  | 
 $pdl->get_datatype == $PDL::IO::FITS::PDL_S or $pdl->get_datatype == $PDL::IO::FITS::PDL_US  | 
 
| 
1971
 | 
 0  | 
 0  | 
 15  | 
 $min < $dmin or $max > $dmax  | 
 
| 
2003
 | 
 0  | 
 0  | 
 5  | 
 length $k > 8 or not $k =~ /^[A-Z_][A-Z\d\_]*$/i  | 
 
| 
2173
 | 
 0  | 
 0  | 
 31  | 
 $bscale != 1 or $bzero != 0  | 
 
| 
2211
 | 
 5  | 
 4  | 
 24  | 
 $BITPIX == 32 or $BITPIX == -32  | 
 
| 
2212
 | 
 14  | 
 1  | 
 18  | 
 $BITPIX == -64 or $BITPIX == 64  | 
 
| 
2441
 | 
 0  | 
 0  | 
 9  | 
 $PDL::debug or $name ne $key and $PDL::verbose  | 
 
| 
2459
 | 
 0  | 
 0  | 
 2  | 
 $num > $cols or $num < 1  | 
 
| 
2612
 | 
 0  | 
 0  | 
 0  | 
 not UNIVERSAL::isa($var, 'PDL') or $var->ndims != 2  | 
 
| 
 | 
 0  | 
 0  | 
 0  | 
 not UNIVERSAL::isa($var, 'PDL') or $var->ndims != 2 or not UNIVERSAL::isa($lengths, 'PDL')  | 
 
| 
 | 
 0  | 
 0  | 
 0  | 
 not UNIVERSAL::isa($var, 'PDL') or $var->ndims != 2 or not UNIVERSAL::isa($lengths, 'PDL') or $lengths->ndims != 1  | 
 
| 
 | 
 0  | 
 0  | 
 0  | 
 not UNIVERSAL::isa($var, 'PDL') or $var->ndims != 2 or not UNIVERSAL::isa($lengths, 'PDL') or $lengths->ndims != 1 or $lengths->dim(0) != $var->dim(0)  | 
 
| 
2670
 | 
 0  | 
 0  | 
 0  | 
 $tmp->get_datatype == $PDL::IO::FITS::PDL_L or $tmp->get_datatype == $PDL::IO::FITS::PDL_F  | 
 
| 
2720
 | 
 12  | 
 4  | 
 16  | 
 $tmp->get_datatype == $PDL::IO::FITS::PDL_L or $tmp->get_datatype == $PDL::IO::FITS::PDL_F  | 
 
| 
2822
 | 
 24  | 
 0  | 
 18  | 
 defined $newhdr{$field} or $field =~ /^end|simple|xtension$/i  |