Branch Coverage

blib/lib/ICC/Support/ratfunc.pm
Criterion Covered Total %
branch 1 120 0.8


line true false branch
116 0 1 if (@_)
119 0 0 if (@_ == 1 and ref $_[0] eq 'HASH') { }
0 0 elsif (@_ == 1 and UNIVERSAL::isa(ref $_[0], 'ICC::Profile::matf')) { }
0 0 elsif (@_ == 2 or @_ == 3) { }
134 0 0 if $info = fit($self, @_)
162 0 0 if (@_)
165 0 0 if (@_ == 1 and ref $_[0] eq 'HASH') { }
193 0 0 if (@_)
196 0 0 if (@_ == 1 and ref $_[0] eq 'ARRAY' && @{$_[0];} == grep({ref $_ eq 'ARRAY';} @{$_[0];}) || UNIVERSAL::isa($_[0], 'Math::Matrix')) { }
199 0 0 unless $#{$_[0];} < 6
215 0 0 unless $#{$_[0][$i];} < 4
221 0 0 unless &Scalar::Util::looks_like_number($_[0][$i][$j])
262 0 0 unless $lapack
265 0 0 unless defined $oflag
268 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')
271 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')
274 0 0 unless $#{$in;} == $#{$out;}
275 0 0 unless $#{$$in[0];} == 2
276 0 0 unless $#{$$out[0];} == 2
282 0 0 if $info < 0
283 0 0 if $info > 0
300 0 0 $oflag ? :
323 0 0 ref $_[-1] eq 'HASH' ? :
326 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($_);} @_)) { }
335 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];})) { }
341 0 0 if ref $_ eq 'ARRAY'
544 0 0 ref $p eq 'ARRAY' ? :
0 0 defined $p ? :
547 0 0 defined $p->[0] && !ref($p->[0]) ? :
556 0 0 if ($rows < 0) { }
593 0 0 if (@{$in;} == grep({&Scalar::Util::looks_like_number($_);} @{$in;})) { }
604 0 0 if (ref $in->[$i] eq 'ARRAY') { }
634 0 0 if ref $_[-1] eq 'HASH'
637 0 0 unless @_ == 3
649 0 0 $den == 0 ? :
670 0 0 unless @{$in;} == 3
673 0 0 if ($lapack) { }
702 0 0 unless @{$in->[0];} == 3
705 0 0 if ($lapack) { }
725 0 0 $den == 0 ? :
734 0 0 UNIVERSAL::isa($in, 'Math::Matrix') ? :
778 0 0 unless $#{$value;} < 6
784 0 0 unless $#{$$value[$i];} < 3
790 0 0 unless &Scalar::Util::looks_like_number($value->[$i][$j])
803 0 0 unless $#{$value;} < 3
809 0 0 unless &Scalar::Util::looks_like_number($value->[$i])
841 0 0 if (defined $hash->{'header'})
844 0 0 if (ref $hash->{'header'} eq 'HASH') { }
859 0 0 if (defined $hash->{'matrix'})
865 0 0 if (ref $value eq 'ARRAY' and @{$value;} == grep({ref $_ eq 'ARRAY';} @{$value;}) or UNIVERSAL::isa($value, 'Math::Matrix')) { }
868 0 0 unless $#{$value;} < 6
874 0 0 unless $#{$$value[$i];} < 4
880 0 0 unless &Scalar::Util::looks_like_number($value->[$i][$j])
899 0 0 if (defined $hash->{'offset'})
905 0 0 if (ref $value eq 'ARRAY' and @{$value;} == grep({not ref $_;} @{$value;})) { }
908 0 0 unless $#{$value;} < 3
914 0 0 unless &Scalar::Util::looks_like_number($value->[$i])