Branch Coverage

blib/lib/Math/Quaternion.pm
Criterion Covered Total %
branch 69 76 90.7


line true false branch
227 45 175 if (0 == @_) { }
32 143 elsif (1 == @_) { }
6 137 elsif (3 == @_) { }
136 1 elsif (4 == @_) { }
236 12 20 if (not $reftype) { }
242 2 18 if ('ARRAY' eq $reftype) { }
11 7 elsif ('Math::Quaternion' eq $reftype) { }
7 0 elsif ('HASH' eq $reftype) { }
251 3 4 if (defined $hash{'axis'}) { }
3 1 elsif (defined $hash{'v2'}) { }
379 9 34 if (0 == $q1 and 0 == $q2 and 0 == $q3) { }
401 1 47 if $reversed
403 2 46 unless (ref $a)
404 2 44 unless (ref $b)
480 0 3 if $reversed
508 1 13 if $reversed
510 10 4 if (ref $a)
514 7 7 if (ref $b)
520 1 6 if ($a->isreal)
649 10 5 if (2 == @_) { }
4 1 elsif (4 == @_) { }
650 5 5 if (ref $_[0]) { }
651 4 1 if (ref $_[1]) { }
656 0 0 if ($ax == 0 and $ay == 0 and $az == 0 or $bx == 0 and $by == 0 and $bz == 0)
679 2 0 if ($x == 0 and $y == 0 and $z == 0)
687 1 1 $dotprod > 0 ? :
705 1 1 if (abs $ax <= abs $ay and abs $ax <= abs $az) { }
1 0 elsif (abs $ay <= abs $ax and abs $ay <= abs $az) { }
731 4 1 if (ref $_[1]) { }
745 0 13 if ($modulus == 0)
790 1 4 if (0 == $st)
982 1 2 if ($dotprod < 0)
990 1 2 if (abs $theta < 1e-05)
1027 1 17 if (isreal($q))
1056 13 4 if (ref $q) { }
1057 1 12 if ('Math::Quaternion' ne ref $q)
1064 6 11 if (isreal($q))
1065 5 1 if ($$q[0] > 0) { }