| line |
true |
false |
branch |
|
37
|
0 |
1 |
if (@_ == 1 and ref $_[0] eq 'HASH') { } |
|
|
0 |
1 |
elsif (@_) { } |
|
78
|
0 |
0 |
unless @_ == 4 |
|
110
|
0 |
0 |
unless &Scalar::Util::looks_like_number($in) |
|
116
|
0 |
0 |
unless @t == 1 |
|
132
|
0 |
0 |
unless &Scalar::Util::looks_like_number($in) |
|
138
|
0 |
0 |
unless @t == 1 |
|
180
|
0 |
0 |
if (@_) |
|
183
|
0 |
0 |
if (@_ == 1 and ref $_[0] eq 'HASH') { } |
|
213
|
0 |
0 |
if (@_ == 1) { } |
|
|
0 |
0 |
elsif (@_) { } |
|
216
|
0 |
0 |
unless ICC::Shared::is_num_vector($_[0]) and 1 <= @{$_[0];} and 21 >= @{$_[0];} |
|
245
|
0 |
0 |
if (@_ == 1) { } |
|
|
0 |
0 |
elsif (@_) { } |
|
248
|
0 |
0 |
unless ICC::Shared::is_num_vector($_[0]) and 1 <= @{$_[0];} and 21 >= @{$_[0];} |
|
292
|
0 |
0 |
if (not defined $hash) { } |
|
295
|
0 |
0 |
if (@{$self->[1][$i];} > 1 and ($x0 = $self->[1][$i][0]) != ($x1 = $self->[1][$i][-1])) |
|
299
|
0 |
0 |
$x0 < $x1 ? : |
|
302
|
0 |
0 |
$x0 < $x1 ? : |
|
309
|
0 |
0 |
if (defined($val = $$hash{$key[$i]})) |
|
312
|
0 |
0 |
if (@{$self->[1][$i];} > 1 and $self->[1][$i][0] != $self->[1][$i][-1]) { } |
|
315
|
0 |
0 |
if (ref $val eq 'ARRAY') |
|
318
|
0 |
0 |
if (@{$val;} == 2) { } |
|
|
0 |
0 |
elsif (@{$val;} == 3) { } |
|
|
0 |
0 |
elsif (@{$val;} == 4) { } |
|
334
|
0 |
0 |
if (not ref $src and $src eq 'endpoints') { } |
|
|
0 |
0 |
elsif (not ref $src and $src eq 'minmax') { } |
|
361
|
0 |
0 |
if (4 == grep({&Scalar::Util::looks_like_number($_);} $x0, $x1, $y0, $y1) and $x0 != $x1) { } |
|
390
|
0 |
0 |
if (defined $m) |
|
400
|
0 |
0 |
if $f0 |
|
401
|
0 |
0 |
if $f1 |
|
435
|
0 |
0 |
if (not defined $fmt) { } |
|
|
0 |
0 |
elsif ($fmt eq 'input') { } |
|
|
0 |
0 |
elsif ($fmt eq 'output') { } |
|
484
|
0 |
0 |
unless $n == int $n and $n >= 2 |
|
487
|
0 |
0 |
$dir ? : |
|
529
|
0 |
0 |
ref $p eq 'ARRAY' ? : |
|
|
0 |
0 |
defined $p ? : |
|
532
|
0 |
0 |
defined $p->[0] && !ref($p->[0]) ? : |
|
538
|
0 |
0 |
if (defined $self->[1][0]) |
|
549
|
0 |
0 |
if (defined $self->[1][1]) |
|
579
|
0 |
0 |
$io ? : |
|
|
0 |
0 |
defined $io ? : |
|
588
|
0 |
0 |
if (@{$par;} > 2) |
|
594
|
0 |
0 |
if (grep {$fwd->[0] < 0 ^ $fwd->[$_] < 0;} 1 .. $#{$fwd;}) |
|
606
|
0 |
0 |
if ($$drv[$j - 1] < 0 ^ $drv->[$j] < 0) |
|
620
|
0 |
0 |
if $t > 0 and $t < 1 |
|
631
|
0 |
0 |
if @s and not defined $self->[2][$i] |
|
656
|
0 |
0 |
unless &Scalar::Util::looks_like_number($in) |
|
668
|
0 |
0 |
unless @t == 1 |
|
689
|
0 |
0 |
unless &Scalar::Util::looks_like_number($in) |
|
701
|
0 |
0 |
unless @t == 1 |
|
704
|
0 |
0 |
unless $di = _drv($p0, $t[0]) |
|
728
|
0 |
0 |
unless &Scalar::Util::looks_like_number($in) |
|
740
|
0 |
0 |
unless @t == 1 |
|
749
|
0 |
0 |
@{$p0;} ? : |
|
755
|
0 |
0 |
@{$p3;} ? : |
|
761
|
0 |
0 |
if (defined $bfi) |
|
767
|
0 |
0 |
unless $di |
|
777
|
0 |
0 |
if defined $bfo |
|
794
|
0 |
0 |
if (not @{$par;}) { } |
|
|
0 |
0 |
elsif (@{$par;} == 1) { } |
|
|
0 |
0 |
elsif (@{$par;} == 2) { } |
|
818
|
0 |
0 |
if ($in < 0) { } |
|
|
0 |
0 |
elsif ($in > 1) { } |
|
832
|
0 |
0 |
if ($lapack) { } |
|
864
|
0 |
0 |
if (not @{$par;}) { } |
|
|
0 |
0 |
elsif (@{$par;} == 1) { } |
|
|
0 |
0 |
elsif (@{$par;} == 2) { } |
|
873
|
0 |
0 |
unless $in == $par->[0] |
|
892
|
0 |
0 |
if ($slope = _drv($par, 0)) |
|
898
|
0 |
0 |
if $ext < 0 |
|
903
|
0 |
0 |
if $ys[0] == $in |
|
909
|
0 |
0 |
if ($in > $ys[$i - 1] and $in < $ys[$i] or $in < $ys[$i - 1] and $in > $ys[$i]) |
|
931
|
0 |
0 |
$p ? : |
|
|
0 |
0 |
if ($p ? $yval > $in : $yval < $in) { } |
|
960
|
0 |
0 |
if abs $in - $yval > 1e-12 |
|
968
|
0 |
0 |
if $ys[$i] == $in |
|
973
|
0 |
0 |
if ($slope = _drv($par, 1)) |
|
979
|
0 |
0 |
if $ext > 1 |
|
986
|
0 |
0 |
wantarray ? : |
|
1000
|
0 |
0 |
if (not @{$par;}) { } |
|
|
0 |
0 |
elsif (@{$par;} == 1) { } |
|
|
0 |
0 |
elsif (@{$par;} == 2) { } |
|
1024
|
0 |
0 |
$in > 1 ? : |
|
|
0 |
0 |
$in < 0 ? : |
|
1030
|
0 |
0 |
if ($lapack) { } |
|
1129
|
0 |
0 |
unless $lapack |
|
1138
|
0 |
0 |
unless (defined $self->[1][1][$i]) |
|
1151
|
0 |
0 |
if (@so == 0) |
|
1188
|
0 |
0 |
if $info = ICC::Support::Lapack::dgels('N', $m, $n, $nrhs, $bern, $m, $outz, $m) |
|
1191
|
0 |
0 |
$so[-1] == $d ? : |
|
|
0 |
0 |
$so[0] == 0 ? : |
|
1198
|
0 |
0 |
if ($d >= 4 and $fix_hl || $fix_sh) { } |
|
1204
|
0 |
0 |
if ($fix_hl) |
|
1215
|
0 |
0 |
if ($fix_sh) |
|
1233
|
0 |
0 |
if $info = ICC::Support::Lapack::dgels('N', $m, $n, $nrhs, $bern2, $m, $outz2, $m) |
|
1239
|
0 |
0 |
if $fix_hl |
|
1240
|
0 |
0 |
if $fix_sh |
|
1268
|
0 |
0 |
if (defined($in = $hash->{'input'})) { } |
|
1271
|
0 |
0 |
if (ICC::Shared::is_vector($in) and 21 >= @{$in;}) { } |
|
|
0 |
0 |
elsif (&Scalar::Util::looks_like_number($in) and $in == int $in and $in > 0 and $in < 21) { } |
|
1297
|
0 |
0 |
if (defined($out = $hash->{'output'})) { } |
|
1300
|
0 |
0 |
if (ICC::Shared::is_vector($out) and 21 >= @{$out;}) { } |
|
|
0 |
0 |
elsif (&Scalar::Util::looks_like_number($out) and $out == int $out and $out > 0 and $out < 21) { } |
|
1326
|
0 |
0 |
if (defined($fit = $hash->{'fit'}) and @{$fit;}) { } |
|
1329
|
0 |
0 |
unless ICC::Shared::is_num_vector($fit->[0]) and 1 <= @{$fit->[0];} |
|
1330
|
0 |
0 |
unless ICC::Shared::is_num_vector($fit->[1]) and 1 <= @{$fit->[1];} |
|
1331
|
0 |
0 |
unless @{$fit->[0];} == @{$fit->[1];} |
|
1334
|
0 |
0 |
if _fit($self, $fit, $hash) |
|
1339
|
0 |
0 |
unless @{$self->[1][0];} == grep({defined $_;} @{$$self[1][0];}) |
|
1340
|
0 |
0 |
unless @{$self->[1][1];} == grep({defined $_;} @{$$self[1][1];}) |
|
1364
|
0 |
0 |
unless $n == int $n and $n >= 2 |
|
1384
|
0 |
0 |
$_ > 1 ? : |
|
|
0 |
0 |
$_ < 0 ? : |