Branch Coverage

blib/lib/Math/Polynomial/Solve.pm
Criterion Covered Total %
branch 157 200 78.5


line true false branch
272 0 0 if (scalar @_ > 0)
274 0 0 $_[0] == 0 ? :
284 0 17 if (not exists $def{'order'}) { }
15 2 elsif ($def{'order'} =~ /ascend/i) { }
2 0 elsif ($def{'order'} =~ /descend/i) { }
343 30 14 if (@czp)
347 20 86 if (abs $coefficients[$j] > $epsilon)
368 22 22 if ($m > 1)
476 0 135 $ascending_flag == 0 ? :
488 0 135 if (@coefficients == 0)
511 15 120 if ($option{'root_function'} and poly_nonzero_term_count(@coefficients) == 2)
524 22 98 if ($option{'varsubst'} and $#coefficients > 1)
528 22 0 if $subst_degree > 1
547 87 33 if ($option{'hessenberg'} or $#coefficients > 4) { }
15 18 elsif ($#coefficients == 4) { }
4 14 elsif ($#coefficients == 3) { }
5 9 elsif ($#coefficients == 2) { }
9 0 elsif ($#coefficients == 1) { }
575 22 98 if $subst_degree > 1
652 7 15 if scalar @_ == 0
659 15 0 if (exists $option{$okey}) { }
662 7 8 $opts{$okey} ? :
698 0 87 $ascending_flag == 0 ? :
779 525 156 if ($i != $n) { }
793 156 525 if ($i == 0) { }
378 147 elsif ($i != $n) { }
806 9 672 if $c == 0 or $r == 0
824 173 499 if ($c + $r < 0.95 * $s * $f)
837 41 132 if ($i == 0) { }
846 145 28 if ($i != $n) { }
916 157 4058 if (abs $h[$d][$d - 1] <= $epsilon * (abs($h[$d - 1][$d - 1]) + abs($h[$d][$d])))
927 63 1235 if ($l == $n)
940 144 1091 if ($l == $na)
947 17 127 if ($q > 0) { }
952 9 8 if $p < 0
970 0 1091 if $its >= $iteration{'hessenberg'}
972 53 1038 if ($its and $its % 10 == 0)
1019 1083 1726 if $d == $l
1021 8 1718 if (abs($h[$d][$d - 1]) * (abs($q) + abs($r)) <= $epsilon * abs($p) * (abs($h[$d - 1][$d - 1]) + abs($z) + abs($h[$d + 1][$d + 1])))
1055 2809 1091 if ($k != $m)
1059 1718 1091 $notlast ? :
1062 0 2809 if $x == 0
1070 1896 2004 if $p < 0
1072 2809 1091 if ($k != $m) { }
8 1083 elsif ($l != $m) { }
1095 11892 2182 if ($notlast)
1106 2182 1718 if $j > $n
1116 13624 5005 if ($notlast)
1157 0 9 $ascending_flag == 0 ? :
1159 0 9 if (abs $a < $epsilon)
1165 9 0 wantarray ? :
1181 0 40 $ascending_flag == 0 ? :
1183 0 40 if (abs $a < $epsilon)
1189 2 38 if abs $c < $epsilon
1193 26 12 if $b < $epsilon
1216 0 23 $ascending_flag == 0 ? :
1219 0 23 if (abs $a < $epsilon)
1233 2 21 if (abs $d < $epsilon)
1256 10 11 if ($dis > $epsilon) { }
7 4 elsif ($dis < -$epsilon) { }
1269 1 9 if $r_p > 0
1270 7 3 if $r_q > 0
1325 0 22 $ascending_flag == 0 ? :
1328 0 22 if (abs $a < $epsilon)
1342 0 22 if (abs $e < $epsilon)
1382 2 20 if (abs $h < $epsilon) { }
16 4 elsif (abs $g * $g < $epsilon) { }
1553 0 21 if ($#coefficients == 1)
1561 0 0 if $root < $from or $root > $to
1574 0 21 if $range_count == 0
1575 13 8 if $range_count == 1
1603 39 20 if ($frommid_count == 0) { }
12 8 elsif ($midto_count == 0) { }
1621 0 51 if $its >= $iteration{'sturm_bisection'}
1688 16 39 unless $ascending_flag
1697 52 3 if $degree > 0
1699 49 6 if ($degree > 1)
1716 73 4 @remd ? :
1747 627 433 if $s1 != $s2
1829 24 32 ($#coefficients & 1) == 1 ? :
1934 0 0 if scalar @_ > 0
1963 0 16 unless $ascending_flag
1968 3 13 if (ref $xval_ref eq 'ARRAY') { }
1977 0 13 ref $xval_ref eq 'SCALAR' ? :
1998 20 75 if (abs $y <= $tolerance{'laguerre'})
2014 43 32 if abs $g - $f > abs $g + $f
2032 1 74 if (abs $dx <= $tolerance{'laguerre'})
2038 0 74 if $its >= $iteration{'laguerre'}
2073 0 2 unless $ascending_flag
2078 2 0 if (ref $xval_ref eq 'ARRAY') { }
2087 0 0 ref $xval_ref eq 'SCALAR' ? :
2109 6 34 if (abs $dx <= $tolerance{'newtonraphson'})
2121 0 34 if $its >= $iteration{'newtonraphson'}
2193 7 6 if scalar @_ == 0
2201 6 0 if (exists $iteration{$k}) { }
2205 0 6 if $val < 10
2266 3 2 if scalar @_ == 0
2274 2 0 if (exists $tolerance{$k}) { }
2304 91 136 if abs $coefficients[$j] > $epsilon
2310 0 17 unless ($coeff_order_set)