| line |
true |
false |
branch |
|
42
|
0 |
1 |
if (@_) |
|
45
|
0 |
0 |
if (@_ == 1 and ref $_[0] eq 'HASH') { } |
|
|
0 |
0 |
elsif (@_ == 1 || @_ == 2 and UNIVERSAL::isa($_[0], 'ICC::Support::Chart')) { } |
|
82
|
0 |
0 |
if (@_) |
|
85
|
0 |
0 |
if (@_ == 1 and ref $_[0] eq 'HASH') { } |
|
113
|
0 |
0 |
if (@_) |
|
116
|
0 |
0 |
if (@_ == 1 and ref $_[0] eq 'ARRAY' and @{$_[0];} == grep({ref $_ eq 'ARRAY';} @{$_[0];})) { } |
|
|
0 |
0 |
elsif (@_ == 1 and UNIVERSAL::isa($_[0], 'Math::Matrix')) { } |
|
141
|
0 |
0 |
if $self->[1][$i][$j] < 0 |
|
167
|
0 |
0 |
if (@_) |
|
170
|
0 |
0 |
if (@_ == 1 and ref $_[0] eq 'ARRAY' and @{$_[0];} == grep({&Scalar::Util::looks_like_number($_);} @{$_[0];})) { } |
|
|
0 |
0 |
elsif (@_ == 1 and &Scalar::Util::looks_like_number($_[0])) { } |
|
179
|
0 |
0 |
if (defined $self->[1]) { } |
|
243
|
0 |
0 |
ref $_[-1] eq 'HASH' ? : |
|
246
|
0 |
0 |
if (@_ == $h + 2 and UNIVERSAL::isa($_[1], 'Math::Matrix')) { } |
|
|
0 |
0 |
elsif (@_ == $h + 2 and ref $_[1] eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (@_ == $h + 1 + grep({&Scalar::Util::looks_like_number($_);} @_)) { } |
|
255
|
0 |
0 |
if (not ref $_[1][0] and @{$_[1];} == grep({&Scalar::Util::looks_like_number($_);} @{$_[1];})) { } |
|
|
0 |
0 |
elsif (ref $_[1][0] eq 'ARRAY' and @{$_[1];} == grep({&Scalar::Util::looks_like_number($_->[0]) if ref $_ eq 'ARRAY';} @{$_[1];})) { } |
|
261
|
0 |
0 |
if ref $_ eq 'ARRAY' |
|
306
|
0 |
0 |
unless $_ < 0 |
|
|
0 |
0 |
if ($hash->{'ubox'} and grep {$_ > 1 unless $_ < 0;} @{$in;}) |
|
314
|
0 |
0 |
if ($lapack) { } |
|
343
|
0 |
0 |
if $d == 1 |
|
349
|
0 |
0 |
$d ? : |
|
|
0 |
0 |
$s ? : |
|
364
|
0 |
0 |
if (wantarray) { } |
|
367
|
0 |
0 |
if (defined $ext) |
|
417
|
0 |
0 |
ref $p eq 'ARRAY' ? : |
|
|
0 |
0 |
defined $p ? : |
|
420
|
0 |
0 |
defined $p->[0] && !ref($p->[0]) ? : |
|
446
|
0 |
0 |
if ref $_[-1] eq 'HASH' |
|
449
|
0 |
0 |
if ($lapack) { } |
|
481
|
0 |
0 |
if ($lapack) { } |
|
501
|
0 |
0 |
if $coef->[$j] |
|
532
|
0 |
0 |
if ($lapack) { } |
|
555
|
0 |
0 |
if $coef->[$j] |
|
569
|
0 |
0 |
UNIVERSAL::isa($in, 'Math::Matrix') ? : |
|
601
|
0 |
0 |
if (@{$in;} == grep({not ref $_;} @{$in;})) { } |
|
612
|
0 |
0 |
if (ref $in->[$i] eq 'ARRAY') { } |
|
641
|
0 |
0 |
if (defined $self->[1] and @{$self->[1];} and defined $self->[2] and @{$self->[2];}) |
|
644
|
0 |
0 |
if ($lapack) { } |
|
700
|
0 |
0 |
if ($i >> $j & 1) { } |
|
751
|
0 |
0 |
if ($i >> $k & 1) { } |
|
754
|
0 |
0 |
if $j != $k |
|
759
|
0 |
0 |
$j != $k ? : |
|
796
|
0 |
0 |
if (abs $_ > $dmax) |
|
843
|
0 |
0 |
if (abs $d >= 1e-05) { } |
|
866
|
0 |
0 |
$k ? : |
|
909
|
0 |
0 |
if ($exp == 0) { } |
|
|
0 |
0 |
elsif ($exp < 1) { } |
|
911
|
0 |
0 |
if ($base > 0) { } |
|
923
|
0 |
0 |
if ($base > 0) { } |
|
935
|
0 |
0 |
if ($base > 0) { } |
|
958
|
0 |
0 |
if ($exp == 0) { } |
|
|
0 |
0 |
elsif ($exp < 1) { } |
|
964
|
0 |
0 |
if ($base > -1) { } |
|
976
|
0 |
0 |
if ($base > 0) { } |
|
1004
|
0 |
0 |
if (defined($value = $hash->{'array'})) |
|
1007
|
0 |
0 |
if (ref $value eq 'ARRAY' and @{$value;} == grep({ref $_ eq 'ARRAY';} @{$value;})) { } |
|
|
0 |
0 |
elsif (UNIVERSAL::isa($value, 'Math::Matrix')) { } |
|
1032
|
0 |
0 |
if $self->[1][$i][$j] < 0 |
|
1041
|
0 |
0 |
if (defined($value = $hash->{'delta'})) |
|
1044
|
0 |
0 |
if (ref $value eq 'ARRAY' and @{$value;} == grep({&Scalar::Util::looks_like_number($_);} @{$value;})) { } |
|
|
0 |
0 |
elsif (&Scalar::Util::looks_like_number($value)) { } |
|
1053
|
0 |
0 |
if (defined $self->[1]) { } |
|
1092
|
0 |
0 |
unless $dev = $chart->device |
|
1095
|
0 |
0 |
unless defined $cols or $cols = $chart->spectral || $chart->xyz |
|
1101
|
0 |
0 |
unless @{$fmt;} == grep({/^(?:(.*)\|)?(?:nm|SPECTRAL_NM_|SPECTRAL_NM|SPECTRAL_|NM_|R_)\d{3}$/;} @{$fmt;}) or 3 == grep({/^(?:(.*)\|)?XYZ_[XYZ]$/;} @{$fmt;}) |
|
1115
|
0 |
0 |
unless $cs = $chart->ramp(sub {
@{$devc;} == grep({$devc->[$_] == $_[$_];} 0 .. $#{$devc;});
}
) |
|
1127
|
0 |
0 |
if ($self->[1][$i][$j] < 0) |