Branch Coverage

blib/lib/Math/Polynomial/Multivariate.pm
Criterion Covered Total %
branch 70 70 100.0


line true false branch
57 1 13 if grep {not eval { do { $_ == int abs $_ } };} values %vars
83 95 9 if ref $_[0]
92 113 11 if ($class) { }
145 2 29 unless &_isa_pol($that)
150 7 26 if (exists $rterms->{$key}) { }
151 1 6 if ($zero == ($rterms->{$key}[0] += $term->[0]))
164 3 11 unless &_isa_pol($that)
165 1 13 if $swap
170 7 9 if (exists $rterms->{$key}) { }
171 6 1 if ($zero == ($rterms->{$key}[0] -= $term->[0]))
185 4 36 unless &_isa_pol($that)
200 4 57 if (exists $rterms->{$key}) { }
216 2 6 if $swap or $exp != int abs $exp
217 1 5 unless $exp
227 4 13 unless &_isa_pol($that)
230 4 13 if keys %{$aterms;} != keys %{$bterms;}
234 7 8 if not exists $bterms->{$key} or $term->[0] != $bterms->{$key}[0]
262 1 26 $zero == $value ? :
279 1 12 $zero == $const ? :
286 1 7 if 1 == @exps
292 6 7 if (--$exp == $nexp)
304 3 6 unless $exp
305 2 4 $cast ? :
328 2 1 $_ ? :
367 30 47 if ($aexp == $exp)
380 5 3 exists $terms->{$key} ? :
386 2 3 unless keys %{$terms;}
393 5 4 if ($max_degree < $degree)
406 5 1 if (($result{$name} || 0) < $exp)
419 2 3 if (my(@miss) = grep({not exists $values->{$_};} @vars))
420 1 1 1 == @miss ? :
433 1 42 unless wantarray
434 9 33 unless keys %{$terms;}
454 26 18 1 == $exp ? :
456 21 41 keys %{$vars;} && $one == $const ? :