| line |
true |
false |
branch |
|
58
|
0 |
1 |
if (@_ == 1 and ref $_[0] eq 'HASH') { } |
|
|
0 |
1 |
elsif (@_) { } |
|
67
|
0 |
0 |
unless _new_from_storable($self, @_) |
|
95
|
0 |
0 |
unless ref $in eq 'ARRAY' or UNIVERSAL::isa($in, 'Math::Matrix') |
|
98
|
0 |
0 |
unless ref $in->[0] eq 'ARRAY' and not ref $in->[0][0] |
|
101
|
0 |
0 |
unless ref $out eq 'ARRAY' or UNIVERSAL::isa($out, 'Math::Matrix') |
|
104
|
0 |
0 |
unless ref $out->[0] eq 'ARRAY' and not ref $out->[0][0] |
|
107
|
0 |
0 |
unless $#{$in;} == $#{$out;} |
|
113
|
0 |
0 |
if $info < 0 |
|
114
|
0 |
0 |
if $info > 0 |
|
139
|
0 |
0 |
if (@_) |
|
142
|
0 |
0 |
if (@_ == 1 and ref $_[0] eq 'HASH') { } |
|
170
|
0 |
0 |
if (@_) |
|
173
|
0 |
0 |
if (@_ == 1 and ref $_[0] eq 'ARRAY') { } |
|
201
|
0 |
0 |
if (@_) |
|
204
|
0 |
0 |
if (@_ == 1 and ref $_[0] eq 'ARRAY' || UNIVERSAL::isa($_[0], 'Math::Matrix')) { } |
|
207
|
0 |
0 |
unless ref $_[0][0] eq 'ARRAY' and not ref $_[0][0][0] |
|
242
|
0 |
0 |
ref $_[-1] eq 'HASH' ? : |
|
245
|
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($_);} @_)) { } |
|
254
|
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];})) { } |
|
260
|
0 |
0 |
if ref $_ eq 'ARRAY' |
|
308
|
0 |
0 |
if defined $_ |
|
|
0 |
0 |
if not defined $_ |
|
|
0 |
0 |
unless grep({++$i;
push @si, $i if defined $_;} @{$in;}) == grep({++$j;
push @so, $j if not defined $_;} @{$out;}) |
|
317
|
0 |
0 |
defined $init->[$i] ? : |
|
384
|
0 |
0 |
if $error < $elim |
|
410
|
0 |
0 |
unless ref $in eq 'ARRAY' and @{$in;} == @{$self->[1];} and @{$in;} == grep({not ref $_;} @{$in;}) |
|
413
|
0 |
0 |
if ($xflag = $hash->{'ubox'} && grep({$_ > 1 unless $_ < 0;} @{$in;})) { } |
|
431
|
0 |
0 |
if (wantarray) { } |
|
434
|
0 |
0 |
if ($xflag) { } |
|
479
|
0 |
0 |
ref $p eq 'ARRAY' ? : |
|
|
0 |
0 |
defined $p ? : |
|
482
|
0 |
0 |
defined $p->[0] && !ref($p->[0]) ? : |
|
504
|
0 |
0 |
if ref $_[-1] eq 'HASH' |
|
523
|
0 |
0 |
unless $_ < 0 |
|
|
0 |
0 |
if ($hash->{'ubox'} and grep {$_ > 1 unless $_ < 0;} @{$in;}) { } |
|
566
|
0 |
0 |
if ($hash->{'ubox'}) { } |
|
584
|
0 |
0 |
UNIVERSAL::isa($in, 'Math::Matrix') ? : |
|
613
|
0 |
0 |
if (@{$in;} == grep({not ref $_;} @{$in;})) { } |
|
624
|
0 |
0 |
if (ref $in->[$i] eq 'ARRAY') { } |
|
664
|
0 |
0 |
if (abs $_ > $dmax) |
|
695
|
0 |
0 |
unless $pda = $hash->{'pda'} |
|
698
|
0 |
0 |
unless $coef = $hash->{'coef'} |
|
701
|
0 |
0 |
unless ref $pda eq 'ARRAY' and not ref $pda->[0] |
|
718
|
0 |
0 |
unless ref $coef eq 'ARRAY' or UNIVERSAL::isa($coef, 'Math::Matrix') |
|
721
|
0 |
0 |
unless ref $coef->[0] eq 'ARRAY' and not ref $coef->[0][0] and @{$coef;} == $size |
|
748
|
0 |
0 |
if (defined $hash) { } |