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) |