| line |
true |
false |
branch |
|
25
|
0 |
40 |
unless $refer or $arr |
|
28
|
2 |
38 |
if ($refer) { } |
|
32
|
1 |
1 |
if (ref $cdata eq 'ARRAY') { } |
|
36
|
1 |
0 |
$type eq 'fract' ? : |
|
62
|
0 |
39 |
unless ref $arr eq 'ARRAY' |
|
65
|
0 |
39 |
if defined $ref_in and $ref_in ne $ref |
|
69
|
21 |
18 |
unless ($ref) |
|
72
|
0 |
3124 |
if ref $_ |
|
76
|
1 |
20 |
unless $Math::Cephes::Polynomial::flag |
|
79
|
5 |
13 |
if ($ref eq 'Math::Cephes::Complex') |
|
82
|
0 |
15 |
unless ref $_ eq $ref |
|
84
|
0 |
15 |
if defined $ref_in and $ref_in ne $ref |
|
89
|
0 |
5 |
unless $Math::Cephes::Polynomial::flag |
|
92
|
3 |
10 |
if ($ref eq 'Math::Complex') |
|
95
|
0 |
9 |
unless ref $_ eq $ref |
|
97
|
0 |
9 |
if defined $ref_in and $ref_in ne $ref |
|
102
|
0 |
3 |
unless $Math::Cephes::Polynomial::flag |
|
105
|
10 |
0 |
if ($ref eq 'Math::Cephes::Fraction') |
|
108
|
0 |
33 |
unless ref $_ eq $ref |
|
110
|
0 |
33 |
if defined $ref_in and $ref_in ne $ref |
|
116
|
1 |
9 |
unless $Math::Cephes::Polynomial::fflag |
|
119
|
0 |
0 |
if ($ref eq 'Math::Fraction') |
|
122
|
0 |
0 |
unless ref $_ eq $ref |
|
124
|
0 |
0 |
if defined $ref_in and $ref_in ne $ref |
|
129
|
0 |
0 |
unless $Math::Cephes::Polynomial::fflag |
|
142
|
0 |
0 |
if $d > $n |
|
147
|
0 |
0 |
if ($type eq 'fract') |
|
150
|
0 |
0 |
$n < 0 ? : |
|
151
|
0 |
0 |
$j == 0 ? : |
|
155
|
0 |
0 |
if ($type eq 'cmplx') |
|
158
|
0 |
0 |
$j == 0 ? : |
|
159
|
0 |
0 |
int $im / abs($im) == -1 ? : |
|
|
0 |
0 |
$im < 0 ? : |
|
165
|
0 |
0 |
$f < 0 ? : |
|
166
|
0 |
0 |
$j == 0 ? : |
|
169
|
0 |
0 |
$j > 0 ? : |
|
178
|
2 |
1 |
ref $b eq 'Math::Cephes::Polynomial' ? : |
|
185
|
1 |
2 |
if ($atype eq 'fract') |
|
186
|
1 |
0 |
$na > $nb ? : |
|
194
|
0 |
3 |
$aref eq 'Math::Fraction' ? : |
|
200
|
1 |
1 |
if ($atype eq 'cmplx') |
|
201
|
1 |
0 |
$na > $nb ? : |
|
209
|
0 |
3 |
$aref eq 'Math::Complex' ? : |
|
215
|
0 |
1 |
$na > $nb ? : |
|
219
|
0 |
3 |
wantarray ? : |
|
228
|
3 |
0 |
ref $b eq 'Math::Cephes::Polynomial' ? : |
|
235
|
1 |
2 |
if ($atype eq 'fract') |
|
236
|
1 |
0 |
$na > $nb ? : |
|
244
|
0 |
3 |
$aref eq 'Math::Fraction' ? : |
|
250
|
1 |
1 |
if ($atype eq 'cmplx') |
|
251
|
0 |
1 |
$na > $nb ? : |
|
259
|
0 |
3 |
$aref eq 'Math::Complex' ? : |
|
265
|
1 |
0 |
$na > $nb ? : |
|
269
|
0 |
3 |
wantarray ? : |
|
278
|
4 |
0 |
ref $b eq 'Math::Cephes::Polynomial' ? : |
|
285
|
1 |
3 |
if ($atype eq 'fract') |
|
294
|
0 |
4 |
$aref eq 'Math::Fraction' ? : |
|
300
|
2 |
1 |
if ($atype eq 'cmplx') |
|
310
|
4 |
4 |
$aref eq 'Math::Complex' ? : |
|
320
|
0 |
4 |
wantarray ? : |
|
328
|
1 |
0 |
ref $b eq 'Math::Cephes::Polynomial' ? : |
|
335
|
0 |
1 |
if ($atype eq 'fract') |
|
344
|
0 |
0 |
$aref eq 'Math::Fraction' ? : |
|
350
|
0 |
1 |
if ($atype eq 'cmplx') |
|
358
|
0 |
1 |
wantarray ? : |
|
366
|
0 |
2 |
unless $Math::Cephes::Polynomial::flag |
|
368
|
1 |
1 |
if $n > $na |
|
370
|
1 |
1 |
if ($atype eq 'fract') |
|
377
|
0 |
1 |
if ($atype eq 'cmplx') |
|
394
|
3 |
0 |
ref $b eq 'Math::Cephes::Polynomial' ? : |
|
398
|
0 |
3 |
unless $Math::Cephes::Polynomial::flag |
|
402
|
2 |
1 |
if ($atype eq 'fract') |
|
412
|
0 |
6 |
$aref eq 'Math::Fraction' ? : |
|
418
|
0 |
1 |
if ($atype eq 'cmplx') |
|
428
|
0 |
3 |
wantarray ? : |
|
449
|
4 |
6 |
if ($atype eq 'fract') |
|
453
|
2 |
2 |
unless ($xref) |
|
457
|
2 |
0 |
if ($xref eq 'Math::Cephes::Fraction') |
|
460
|
0 |
0 |
if ($xref eq 'Math::Fraction') |
|
467
|
0 |
4 |
if $aref eq 'Math::Fraction' |
|
470
|
2 |
4 |
if ($atype eq 'cmplx') |
|
473
|
1 |
1 |
$aref eq 'Math::Complex' ? : |
|
496
|
0 |
2 |
if $type eq 'cmplx' |
|
501
|
0 |
2 |
if $atype eq 'cmplx' |
|
503
|
1 |
1 |
$atype eq 'fract' ? : |
|
505
|
2 |
0 |
ref $bin eq 'Math::Cephes::Polynomial' ? : |
|
510
|
0 |
2 |
if $btype eq 'cmplx' |
|
512
|
1 |
1 |
$btype eq 'fract' ? : |
|
522
|
0 |
3 |
if $type eq 'cmplx' |
|
524
|
2 |
1 |
$type eq 'fract' ? : |
|
533
|
0 |
3 |
if $type eq 'cmplx' |
|
535
|
2 |
1 |
$type eq 'fract' ? : |
|
544
|
0 |
3 |
if $type eq 'cmplx' |
|
546
|
2 |
1 |
$type eq 'fract' ? : |
|
561
|
1 |
1 |
if ($atype eq 'fract') |
|
570
|
0 |
1 |
if ($atype eq 'cmplx') |
|
580
|
2 |
0 |
wantarray ? : |