| line |
true |
false |
branch |
|
45
|
0 |
1 |
if (@_) |
|
48
|
0 |
0 |
if (@_ == 1 and ref $_[0] eq 'HASH') { } |
|
|
0 |
0 |
elsif (@_ == 1 || @_ == 2 and UNIVERSAL::isa($_[0], 'ICC::Support::Chart')) { } |
|
85
|
0 |
0 |
if (@_) |
|
88
|
0 |
0 |
if (@_ == 1 and ref $_[0] eq 'HASH') { } |
|
116
|
0 |
0 |
if (@_) |
|
119
|
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')) { } |
|
144
|
0 |
0 |
if $self->[1][$i][$j] < 0 |
|
170
|
0 |
0 |
if (@_) |
|
173
|
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])) { } |
|
182
|
0 |
0 |
if (defined $self->[1]) { } |
|
246
|
0 |
0 |
ref $_[-1] eq 'HASH' ? : |
|
249
|
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($_);} @_)) { } |
|
258
|
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];})) { } |
|
264
|
0 |
0 |
if ref $_ eq 'ARRAY' |
|
309
|
0 |
0 |
unless $_ < 0 |
|
|
0 |
0 |
if ($hash->{'ubox'} and grep {$_ > 1 unless $_ < 0;} @{$in;}) |
|
317
|
0 |
0 |
if ($lapack) { } |
|
346
|
0 |
0 |
if $d == 1 |
|
352
|
0 |
0 |
$d ? : |
|
|
0 |
0 |
$s ? : |
|
367
|
0 |
0 |
if (wantarray) { } |
|
370
|
0 |
0 |
if (defined $ext) |
|
420
|
0 |
0 |
ref $p eq 'ARRAY' ? : |
|
|
0 |
0 |
defined $p ? : |
|
423
|
0 |
0 |
defined $p->[0] && !ref($p->[0]) ? : |
|
449
|
0 |
0 |
if ref $_[-1] eq 'HASH' |
|
452
|
0 |
0 |
if ($lapack) { } |
|
484
|
0 |
0 |
if ($lapack) { } |
|
504
|
0 |
0 |
if $coef->[$j] |
|
535
|
0 |
0 |
if ($lapack) { } |
|
558
|
0 |
0 |
if $coef->[$j] |
|
572
|
0 |
0 |
UNIVERSAL::isa($in, 'Math::Matrix') ? : |
|
604
|
0 |
0 |
if (@{$in;} == grep({not ref $_;} @{$in;})) { } |
|
615
|
0 |
0 |
if (ref $in->[$i] eq 'ARRAY') { } |
|
644
|
0 |
0 |
if (defined $self->[1] and @{$self->[1];} and defined $self->[2] and @{$self->[2];}) |
|
647
|
0 |
0 |
if ($lapack) { } |
|
703
|
0 |
0 |
if ($i >> $j & 1) { } |
|
754
|
0 |
0 |
if ($i >> $k & 1) { } |
|
757
|
0 |
0 |
if $j != $k |
|
762
|
0 |
0 |
$j != $k ? : |
|
799
|
0 |
0 |
if (abs $_ > $dmax) |
|
846
|
0 |
0 |
if (abs $d >= 1e-05) { } |
|
869
|
0 |
0 |
$k ? : |
|
912
|
0 |
0 |
if ($exp == 0) { } |
|
|
0 |
0 |
elsif ($exp < 1) { } |
|
914
|
0 |
0 |
if ($base > 0) { } |
|
926
|
0 |
0 |
if ($base > 0) { } |
|
938
|
0 |
0 |
if ($base > 0) { } |
|
961
|
0 |
0 |
if ($exp == 0) { } |
|
|
0 |
0 |
elsif ($exp < 1) { } |
|
967
|
0 |
0 |
if ($base > -1) { } |
|
979
|
0 |
0 |
if ($base > 0) { } |
|
1007
|
0 |
0 |
if (defined($value = $hash->{'array'})) |
|
1010
|
0 |
0 |
if (ref $value eq 'ARRAY' and @{$value;} == grep({ref $_ eq 'ARRAY';} @{$value;})) { } |
|
|
0 |
0 |
elsif (UNIVERSAL::isa($value, 'Math::Matrix')) { } |
|
1035
|
0 |
0 |
if $self->[1][$i][$j] < 0 |
|
1044
|
0 |
0 |
if (defined($value = $hash->{'delta'})) |
|
1047
|
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)) { } |
|
1056
|
0 |
0 |
if (defined $self->[1]) { } |
|
1095
|
0 |
0 |
unless $dev = $chart->device |
|
1098
|
0 |
0 |
unless defined $cols or $cols = $chart->spectral || $chart->xyz |
|
1104
|
0 |
0 |
unless @{$fmt;} == grep({/^(?:(.*)\|)?(?:nm|SPECTRAL_NM_|SPECTRAL_NM|SPECTRAL_|NM_|R_)\d{3}$/;} @{$fmt;}) or 3 == grep({/^(?:(.*)\|)?XYZ_[XYZ]$/;} @{$fmt;}) |
|
1118
|
0 |
0 |
unless $cs = $chart->ramp(sub {
@{$devc;} == grep({$devc->[$_] == $_[$_];} 0 .. $#{$devc;});
}
) |
|
1130
|
0 |
0 |
if ($self->[1][$i][$j] < 0) |