Branch Coverage

blib/lib/Math/Polynomial/ModInt.pm
Criterion Covered Total %
branch 68 68 100.0


line true false branch
80 5 20 if @{$evec;} < @{$vec;}
81 16 4 if (@{$evec;} == @{$vec;})
83 1 15 unless $i
93 1 19 unless @{$vec;}
123 1 12 unless (@_ or ref $this)
126 2 496 if (grep {$_->is_undefined;} @_)
134 481 482 if ref $this
135 1 481 if @_
170 1 3 if $degree < 0
172 1 2 if $leader->residue == 1
185 147 2 if (defined $modulus) { }
1 1 elsif (ref $this) { }
201 135 13 @coeff ? :
206 2 1 unless (defined $modulus)
207 1 1 unless (ref $this)
225 2 4 unless (defined $index)
244 1 7 if $degree <= $lambda
248 7 9 if $i == $lambda
257 1 15 if $lsc->is_zero
258 5 10 if ($this->degree == 1)
260 1 4 if $mscr == 1
261 2 2 if $mscr == -1
265 3 63 if $this->evaluate($root)->is_zero
274 1 15 if $n <= 0
275 1 14 if $n == 1
276 1 13 unless $this->coeff(0)
277 1 11 if $this->gcd($this->differentiate)->degree > 0
280 10 1 if ($p <= 43 or log $p - 20 <= $n * 0.24 + 2.68)
281 6 4 2 < $p && $p <= $n ? :
282 2 8 if defined $rp->first_root
283 2 6 if $n <= 3
292 4 22 if $j >= $n - 1
293 15 7 if ($j++)
299 2 4 if _linearly_dependent(sub { return undef if $j >= $n - 1; if ($j++) { $aj = $aj * $xp % $this; $bj <<= 1; } ; return [($aj - $bj)->coeff]; } )