Branch Coverage

blib/lib/Math/GComplex.pm
Criterion Covered Total %
branch 182 302 60.2


line true false branch
28 0 0 $_[2] ? :
29 0 0 $_[2] ? :
30 0 29 $_[2] ? :
31 2 0 $_[2] ? :
33 0 0 $_[2] ? :
35 36 204 if $_[2]
36 19 214 if $_[2]
38 21 84 $_[2] ? :
39 0 0 $_[2] ? :
41 0 4 $_[2] ? :
46 0 0 $_[2] ? :
148 1 45 if ($name eq ':overload') { }
1 44 elsif (exists $const{$name}) { }
42 2 elsif (exists $trig{$name} or exists $special{$name} or exists $misc{$name}) { }
1 1 elsif ($name eq ':trig') { }
0 1 elsif ($name eq ':misc') { }
1 0 elsif ($name eq ':special') { }
0 0 elsif ($name eq ':all') { }
293 0 131 if ref $x ne 'Math::GComplex'
294 45 86 if ref $y ne 'Math::GComplex'
306 19 449 if ref $x ne 'Math::GComplex'
307 136 332 if ref $y ne 'Math::GComplex'
319 0 640 if ref $x ne 'Math::GComplex'
320 52 588 if ref $y ne 'Math::GComplex'
332 36 527 if ref $x ne 'Math::GComplex'
333 61 502 if ref $y ne 'Math::GComplex'
337 0 563 if ($d == 0)
351 0 139 if ref $x ne 'Math::GComplex'
352 0 139 if ref $y ne 'Math::GComplex'
376 0 203 if ref $x ne 'Math::GComplex'
388 0 0 if ref $x ne 'Math::GComplex'
390 0 0 if ($x->{'a'} == 0 and $x->{'b'} == 0)
404 0 38 if ref $x ne 'Math::GComplex'
416 0 6 if ref $x ne 'Math::GComplex'
428 0 0 if ref $x ne 'Math::GComplex'
440 0 1 if ref $x ne 'Math::GComplex'
441 0 1 if ref $y ne 'Math::GComplex'
453 0 1 if ref $x ne 'Math::GComplex'
454 0 1 if ref $y ne 'Math::GComplex'
466 0 1 if ref $x ne 'Math::GComplex'
467 0 1 if ref $y ne 'Math::GComplex'
480 0 1 if ref $x ne 'Math::GComplex'
481 0 1 if ref $y ne 'Math::GComplex'
483 1 0 if ($y->{'b'} == 0)
499 0 1 if ref $x ne 'Math::GComplex'
500 0 1 if ref $y ne 'Math::GComplex'
502 1 0 if ($y->{'b'} == 0)
517 0 409 if ref $x ne 'Math::GComplex'
521 0 409 if (not ref $t and $t == 0)
535 0 3 if ref $x ne 'Math::GComplex'
536 0 3 if ref $n ne 'Math::GComplex'
548 0 486 if ref $x ne 'Math::GComplex'
562 21 87 if ref $x ne 'Math::GComplex'
563 40 68 if ref $y ne 'Math::GComplex'
565 0 108 if ($x->{'a'} == 0 and $x->{'b'} == 0)
567 0 0 if ($y->{'a'} < 0)
571 0 0 if ($y->{'a'} == 0 and $y->{'b'} == 0)
588 0 17 if ref $x ne 'Math::GComplex'
594 2 15 if ($x->{'a'} == 0 and $x->{'b'} == 0)
596 0 2 if ($neg)
600 1 1 if ($y == 0)
611 26 16 if $y & 1
612 15 27 unless $y >>= 1
616 2 13 $neg ? :
626 0 8 if ref $n ne 'Math::GComplex'
627 0 8 if ref $k ne 'Math::GComplex'
632 2 6 if ($norm_n > $norm_k)
654 0 6 if ref $x ne 'Math::GComplex'
655 0 6 if ref $m ne 'Math::GComplex'
659 0 6 unless $g->abs == 1
694 6 0 if ($t->{'a'} == 1 and $t->{'b'} == 0)
709 0 13 if ref $x ne 'Math::GComplex'
710 0 13 if ref $m ne 'Math::GComplex'
716 0 13 if ($x->{'a'} == 0 and $x->{'b'} == 0)
718 0 0 if ($neg)
722 0 0 if ($y == 0)
729 1 12 if $neg
735 44 39 if $y & 1
736 13 70 unless $y >>= 1
750 0 3 if ref $x ne 'Math::GComplex'
751 3 0 if ref $y ne 'Math::GComplex'
763 0 133 if ref $x ne 'Math::GComplex'
780 0 6 if ref $x ne 'Math::GComplex'
782 0 6 if ($x->{'a'} == 0 and $x->{'b'} == 0)
801 0 29 if ref $x ne 'Math::GComplex'
815 43 91 $n < 0 ? :
820 0 67 if ref $x ne 'Math::GComplex'
831 0 139 if ref $x ne 'Math::GComplex'
834 46 93 if $x->{'a'} != $t1 and $x->{'a'} < 0
837 8 131 if $x->{'b'} != $t2 and $x->{'b'} < 0
849 0 0 if ref $x ne 'Math::GComplex'
870 2 9 if ref $x ne 'Math::GComplex'
893 4 9 if ref $x ne 'Math::GComplex'
914 1 11 if ref $x ne 'Math::GComplex'
933 1 11 if ref $x ne 'Math::GComplex'
954 2 18 if ref $x ne 'Math::GComplex'
975 3 18 if ref $x ne 'Math::GComplex'
996 0 20 if ref $x ne 'Math::GComplex'
1023 0 10 if ref $x ne 'Math::GComplex'
1047 2 8 if ref $x ne 'Math::GComplex'
1058 0 10 if (not ref $den and $den == 0) { }
1080 4 9 if ref $x ne 'Math::GComplex'
1097 1 15 if ref $x ne 'Math::GComplex'
1120 5 4 if ref $x ne 'Math::GComplex'
1121 5 4 if ref $y ne 'Math::GComplex'
1139 1 13 if ref $x ne 'Math::GComplex'
1164 1 5 if ref $x ne 'Math::GComplex'
1175 0 6 if (not ref $den and $den == 0) { }
1197 4 3 if ref $x ne 'Math::GComplex'
1214 1 7 if ref $x ne 'Math::GComplex'
1226 1 6 if ref $x ne 'Math::GComplex'
1242 1 4 if ref $x ne 'Math::GComplex'
1255 0 5 if (not ref $den and $den == 0) { }
1273 4 3 if ref $x ne 'Math::GComplex'
1293 0 4 if ref $x ne 'Math::GComplex'
1305 1 3 if ref $x ne 'Math::GComplex'
1321 1 4 if ref $x ne 'Math::GComplex'
1334 0 5 if (not ref $den and $den == 0) { }
1354 4 3 if ref $x ne 'Math::GComplex'
1374 0 4 if ref $x ne 'Math::GComplex'
1386 2 3 if ref $x ne 'Math::GComplex'
1398 5 2 if ref $x ne 'Math::GComplex'
1403 7 0 unless (ref $pi)
1419 3 4 if ref $x ne 'Math::GComplex'
1424 3 4 if ($t == 0)
1430 4 0 if (not ref $pi and $pi != 0)
1448 0 14 if ref $x ne 'Math::GComplex'
1460 0 14 if ref $x ne 'Math::GComplex'
1472 0 14 if ref $x ne 'Math::GComplex'
1484 0 5 if ref $x ne 'Math::GComplex'
1485 5 0 if ref $y ne 'Math::GComplex'
1488 4 1 if $x->{'a'} == $y->{'a'}
1498 0 0 if ref $x ne 'Math::GComplex'
1499 0 0 if ref $y ne 'Math::GComplex'
1502 0 0 unless $x->{'a'} != $y->{'a'}
1512 0 31 if ref $x ne 'Math::GComplex'
1513 0 31 if ref $y ne 'Math::GComplex'
1516 2 29 unless $x->{'a'} <=> $y->{'a'} // (return undef)
1522 0 0 if ref $x ne 'Math::GComplex'
1523 0 0 if ref $y ne 'Math::GComplex'
1531 0 29 if ref $x ne 'Math::GComplex'
1532 29 0 if ref $y ne 'Math::GComplex'
1540 0 0 if ref $x ne 'Math::GComplex'
1541 0 0 if ref $y ne 'Math::GComplex'
1549 0 0 if ref $x ne 'Math::GComplex'
1550 0 0 if ref $y ne 'Math::GComplex'
1558 0 2 if ref $x ne 'Math::GComplex'
1559 2 0 if ref $y ne 'Math::GComplex'
1567 0 68 if ref $x ne 'Math::GComplex'
1575 0 207 if ref $x ne 'Math::GComplex'
1583 0 13 if ref $x ne 'Math::GComplex'