| line |
true |
false |
branch |
|
55
|
0 |
1 |
if (@_) |
|
58
|
0 |
0 |
if (@_ == 1 and ref $_[0] eq 'HASH') { } |
|
64
|
0 |
0 |
if defined($code = $self->[0]{'init'}) |
|
95
|
0 |
0 |
if defined($code = $self->[0]{'init'}) |
|
116
|
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') |
|
119
|
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') |
|
122
|
0 |
0 |
unless $#{$in;} == $#{$out;} |
|
128
|
0 |
0 |
defined $oflag ? : |
|
131
|
0 |
0 |
if $info < 0 |
|
132
|
0 |
0 |
if $info > 0 |
|
152
|
0 |
0 |
if ($oflag) |
|
173
|
0 |
0 |
if (defined $header) |
|
176
|
0 |
0 |
unless ref $header eq 'HASH' |
|
197
|
0 |
0 |
if (defined $kernel) |
|
200
|
0 |
0 |
unless ref $kernel eq 'ARRAY' |
|
209
|
0 |
0 |
if (grep {ref $kernel->[$i] eq $_;} @types) { } |
|
239
|
0 |
0 |
if (defined $hidden) |
|
242
|
0 |
0 |
unless ref $hidden eq 'ARRAY' |
|
251
|
0 |
0 |
if (ref $hidden->[$i] eq 'CODE') { } |
|
281
|
0 |
0 |
if (defined $matrix) |
|
284
|
0 |
0 |
unless ref $matrix eq 'ARRAY' and @{$matrix;} == grep({ref $_ eq 'ARRAY';} @{$matrix;}) or UNIVERSAL::isa($matrix, 'Math::Matrix') |
|
305
|
0 |
0 |
if (defined $offset) |
|
308
|
0 |
0 |
unless ref $offset eq 'ARRAY' and @{$offset;} == grep({not ref $_;} @{$offset;}) |
|
332
|
0 |
0 |
unless defined $kernel |
|
335
|
0 |
0 |
if ref $kernel ne 'ARRAY' |
|
341
|
0 |
0 |
if (grep {ref $kernel->[$i] eq $_;} @types) { } |
|
375
|
0 |
0 |
unless defined $hidden |
|
378
|
0 |
0 |
if ref $hidden ne 'ARRAY' |
|
384
|
0 |
0 |
if (ref $hidden->[$i] eq 'CODE') { } |
|
417
|
0 |
0 |
ref $_[-1] eq 'HASH' ? : |
|
420
|
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($_);} @_)) { } |
|
429
|
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];})) { } |
|
435
|
0 |
0 |
if ref $_ eq 'ARRAY' |
|
482
|
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;}) |
|
491
|
0 |
0 |
defined $init->[$i] ? : |
|
558
|
0 |
0 |
if $error < $elim |
|
614
|
0 |
0 |
if (wantarray) { } |
|
641
|
0 |
0 |
ref $p eq 'ARRAY' ? : |
|
|
0 |
0 |
defined $p ? : |
|
644
|
0 |
0 |
defined $p->[0] && !ref($p->[0]) ? : |
|
706
|
0 |
0 |
$_[1] % 2 ? : |
|
733
|
0 |
0 |
if ref $_[-1] eq 'HASH' |
|
755
|
0 |
0 |
if ($lapack) { } |
|
783
|
0 |
0 |
if ($lapack) { } |
|
795
|
0 |
0 |
UNIVERSAL::isa($in, 'Math::Matrix') ? : |
|
824
|
0 |
0 |
if (@{$in;} == grep({not ref $_;} @{$in;})) { } |
|
835
|
0 |
0 |
if (ref $in->[$i] eq 'ARRAY') { } |
|
871
|
0 |
0 |
if (ref $node eq 'CODE') { } |
|
920
|
0 |
0 |
if (ref $node eq 'CODE') { } |
|
970
|
0 |
0 |
if ($header = $hash->{'header'}) |
|
973
|
0 |
0 |
unless ref $header eq 'HASH' |
|
981
|
0 |
0 |
if ($kernel = $hash->{'kernel'}) |
|
984
|
0 |
0 |
unless ref $kernel eq 'ARRAY' |
|
990
|
0 |
0 |
if (grep {ref $kernel->[$i] eq $_;} @types) { } |
|
1007
|
0 |
0 |
if ($hidden = $hash->{'hidden'}) |
|
1010
|
0 |
0 |
unless ref $hidden eq 'ARRAY' |
|
1016
|
0 |
0 |
if (ref $hidden->[$i] eq 'CODE') { } |
|
1033
|
0 |
0 |
if ($matrix = $hash->{'matrix'}) |
|
1036
|
0 |
0 |
unless ref $matrix eq 'ARRAY' and @{$matrix;} == grep({ref $_ eq 'ARRAY';} @{$matrix;}) or UNIVERSAL::isa($matrix, 'Math::Matrix') |
|
1044
|
0 |
0 |
if ($offset = $hash->{'offset'}) |
|
1047
|
0 |
0 |
unless ref $offset eq 'ARRAY' and @{$offset;} == grep({not ref $_;} @{$offset;}) |
|
1055
|
0 |
0 |
if ($init = $hash->{'init'}) |
|
1058
|
0 |
0 |
unless ref $init eq 'CODE' |