| line |
true |
false |
branch |
|
49
|
0 |
1 |
if (@_) |
|
52
|
0 |
0 |
if (@_ == 1 and ref $_[0] eq 'HASH') { } |
|
58
|
0 |
0 |
if defined($code = $self->[0]{'init'}) |
|
89
|
0 |
0 |
if defined($code = $self->[0]{'init'}) |
|
111
|
0 |
0 |
unless defined $oflag |
|
114
|
0 |
0 |
unless ref $in eq 'ARRAY' and ref $in->[0] eq 'ARRAY' and not ref $in->[0][0] or UNIVERSAL::isa($in, 'Math::Matrix') |
|
117
|
0 |
0 |
unless ref $out eq 'ARRAY' and ref $out->[0] eq 'ARRAY' and not ref $out->[0][0] or UNIVERSAL::isa($out, 'Math::Matrix') |
|
120
|
0 |
0 |
unless $#{$in;} == $#{$out;} |
|
123
|
0 |
0 |
if ($dflag) |
|
126
|
0 |
0 |
unless $#{$$in[0];} == $#{$$out[0];} |
|
144
|
0 |
0 |
$dflag ? : |
|
147
|
0 |
0 |
if $info < 0 |
|
148
|
0 |
0 |
if $info > 0 |
|
167
|
0 |
0 |
if ($oflag) { } |
|
180
|
0 |
0 |
if ($dflag) |
|
189
|
0 |
0 |
$i == $j ? : |
|
211
|
0 |
0 |
if (@_) |
|
214
|
0 |
0 |
if (@_ == 1 and ref $_[0] eq 'HASH') { } |
|
242
|
0 |
0 |
if (@_ == 1) { } |
|
|
0 |
0 |
elsif (@_) { } |
|
248
|
0 |
0 |
if (ref $array eq 'ARRAY') { } |
|
257
|
0 |
0 |
if (grep {ref $array->[$i] eq $_;} @types) { } |
|
299
|
0 |
0 |
if (@_) |
|
302
|
0 |
0 |
if (@_ == 1 and ref $_[0] eq 'ARRAY' and ref $_[0][0] eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (@_ == 1 and UNIVERSAL::isa($_[0], 'Math::Matrix')) { } |
|
336
|
0 |
0 |
if (@_) |
|
339
|
0 |
0 |
if (@_ == 1 and ref $_[0] eq 'ARRAY' and @{$_[0];} == grep({not ref $_;} @{$_[0];})) { } |
|
369
|
0 |
0 |
ref $_[-1] eq 'HASH' ? : |
|
372
|
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($_);} @_)) { } |
|
381
|
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];})) { } |
|
387
|
0 |
0 |
if ref $_ eq 'ARRAY' |
|
434
|
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;}) |
|
443
|
0 |
0 |
defined $init->[$i] ? : |
|
510
|
0 |
0 |
if $error < $elim |
|
540
|
0 |
0 |
if ($lapack) { } |
|
543
|
0 |
0 |
if (wantarray) { } |
|
576
|
0 |
0 |
ref $p eq 'ARRAY' ? : |
|
|
0 |
0 |
defined $p ? : |
|
579
|
0 |
0 |
defined $p->[0] && !ref($p->[0]) ? : |
|
601
|
0 |
0 |
if ref $_[-1] eq 'HASH' |
|
626
|
0 |
0 |
if ($lapack) { } |
|
654
|
0 |
0 |
if ($lapack) { } |
|
666
|
0 |
0 |
UNIVERSAL::isa($in, 'Math::Matrix') ? : |
|
695
|
0 |
0 |
if (@{$in;} == grep({not ref $_;} @{$in;})) { } |
|
706
|
0 |
0 |
if (ref $in->[$i] eq 'ARRAY') { } |
|
745
|
0 |
0 |
if (ref $node eq 'CODE') { } |
|
761
|
0 |
0 |
if ($#{$array;} < $#{$$self[2][0];}) |
|
800
|
0 |
0 |
if (ref $node eq 'CODE') { } |
|
816
|
0 |
0 |
if ($#{$array;} < $#{$$self[2][0];}) |
|
851
|
0 |
0 |
if (ref $node eq 'CODE') { } |
|
854
|
0 |
0 |
if (wantarray) { } |
|
873
|
0 |
0 |
if (wantarray) { } |
|
890
|
0 |
0 |
if ($#{$array;} < $#{$$self[2][0];}) |
|
899
|
0 |
0 |
$i == $j ? : |
|
908
|
0 |
0 |
if (wantarray) { } |
|
911
|
0 |
0 |
if ($#{$array;} < $#{$$self[2][0];}) |
|
983
|
0 |
0 |
if ($attr eq 'header') { } |
|
|
0 |
0 |
elsif ($attr eq 'kernel') { } |
|
|
0 |
0 |
elsif ($attr eq 'matrix') { } |
|
|
0 |
0 |
elsif ($attr eq 'offset') { } |
|
|
0 |
0 |
elsif ($attr eq 'init') { } |
|
986
|
0 |
0 |
if (ref $hash->{$attr} eq 'HASH') { } |
|
1002
|
0 |
0 |
if (ref $hash->{$attr} eq 'ARRAY') { } |
|
1011
|
0 |
0 |
if (grep {ref $array->[$i] eq $_;} @types) { } |
|
1036
|
0 |
0 |
if (ref $hash->{$attr} eq 'ARRAY' and ref $hash->{$attr}[0] eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (UNIVERSAL::isa($hash->{$attr}, 'Math::Matrix')) { } |
|
1058
|
0 |
0 |
if (ref $hash->{$attr} eq 'ARRAY' and @{$hash->{$attr};} == grep({not ref $_;} @{$$hash{$attr};})) { } |
|
1074
|
0 |
0 |
if (ref $hash->{$attr} eq 'CODE') { } |