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] ? :
147 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') { }
283 0 131 if ref $x ne 'Math::GComplex'
284 45 86 if ref $y ne 'Math::GComplex'
296 19 449 if ref $x ne 'Math::GComplex'
297 136 332 if ref $y ne 'Math::GComplex'
309 0 640 if ref $x ne 'Math::GComplex'
310 52 588 if ref $y ne 'Math::GComplex'
322 36 527 if ref $x ne 'Math::GComplex'
323 61 502 if ref $y ne 'Math::GComplex'
327 0 563 if ($d == 0)
341 0 139 if ref $x ne 'Math::GComplex'
342 0 139 if ref $y ne 'Math::GComplex'
366 0 203 if ref $x ne 'Math::GComplex'
378 0 0 if ref $x ne 'Math::GComplex'
380 0 0 if ($x->{'a'} == 0 and $x->{'b'} == 0)
394 0 38 if ref $x ne 'Math::GComplex'
406 0 6 if ref $x ne 'Math::GComplex'
418 0 0 if ref $x ne 'Math::GComplex'
430 0 1 if ref $x ne 'Math::GComplex'
431 0 1 if ref $y ne 'Math::GComplex'
443 0 1 if ref $x ne 'Math::GComplex'
444 0 1 if ref $y ne 'Math::GComplex'
456 0 1 if ref $x ne 'Math::GComplex'
457 0 1 if ref $y ne 'Math::GComplex'
470 0 1 if ref $x ne 'Math::GComplex'
471 0 1 if ref $y ne 'Math::GComplex'
473 1 0 if ($y->{'b'} == 0)
489 0 1 if ref $x ne 'Math::GComplex'
490 0 1 if ref $y ne 'Math::GComplex'
492 1 0 if ($y->{'b'} == 0)
507 0 409 if ref $x ne 'Math::GComplex'
511 0 409 if (not ref $t and $t == 0)
525 0 3 if ref $x ne 'Math::GComplex'
526 0 3 if ref $n ne 'Math::GComplex'
538 0 486 if ref $x ne 'Math::GComplex'
552 21 87 if ref $x ne 'Math::GComplex'
553 40 68 if ref $y ne 'Math::GComplex'
555 0 108 if ($x->{'a'} == 0 and $x->{'b'} == 0)
557 0 0 if ($y->{'a'} < 0)
561 0 0 if ($y->{'a'} == 0 and $y->{'b'} == 0)
578 0 17 if ref $x ne 'Math::GComplex'
584 2 15 if ($x->{'a'} == 0 and $x->{'b'} == 0)
586 0 2 if ($neg)
590 1 1 if ($y == 0)
601 26 16 if $y & 1
602 15 27 unless $y >>= 1
606 2 13 $neg ? :
616 0 8 if ref $n ne 'Math::GComplex'
617 0 8 if ref $k ne 'Math::GComplex'
622 2 6 if ($norm_n > $norm_k)
644 0 6 if ref $x ne 'Math::GComplex'
645 0 6 if ref $m ne 'Math::GComplex'
649 0 6 unless $g->abs == 1
684 6 0 if ($t->{'a'} == 1 and $t->{'b'} == 0)
699 0 13 if ref $x ne 'Math::GComplex'
700 0 13 if ref $m ne 'Math::GComplex'
706 0 13 if ($x->{'a'} == 0 and $x->{'b'} == 0)
708 0 0 if ($neg)
712 0 0 if ($y == 0)
719 1 12 if $neg
725 44 39 if $y & 1
726 13 70 unless $y >>= 1
740 0 3 if ref $x ne 'Math::GComplex'
741 3 0 if ref $y ne 'Math::GComplex'
753 0 133 if ref $x ne 'Math::GComplex'
770 0 6 if ref $x ne 'Math::GComplex'
772 0 6 if ($x->{'a'} == 0 and $x->{'b'} == 0)
791 0 29 if ref $x ne 'Math::GComplex'
805 43 91 $n < 0 ? :
810 0 67 if ref $x ne 'Math::GComplex'
821 0 139 if ref $x ne 'Math::GComplex'
824 46 93 if $x->{'a'} != $t1 and $x->{'a'} < 0
827 8 131 if $x->{'b'} != $t2 and $x->{'b'} < 0
839 0 0 if ref $x ne 'Math::GComplex'
860 2 9 if ref $x ne 'Math::GComplex'
883 4 9 if ref $x ne 'Math::GComplex'
904 1 11 if ref $x ne 'Math::GComplex'
923 1 11 if ref $x ne 'Math::GComplex'
944 2 18 if ref $x ne 'Math::GComplex'
965 3 18 if ref $x ne 'Math::GComplex'
986 0 20 if ref $x ne 'Math::GComplex'
1013 0 10 if ref $x ne 'Math::GComplex'
1037 2 8 if ref $x ne 'Math::GComplex'
1048 0 10 if (not ref $den and $den == 0) { }
1070 4 9 if ref $x ne 'Math::GComplex'
1087 1 15 if ref $x ne 'Math::GComplex'
1110 5 4 if ref $x ne 'Math::GComplex'
1111 5 4 if ref $y ne 'Math::GComplex'
1129 1 13 if ref $x ne 'Math::GComplex'
1154 1 5 if ref $x ne 'Math::GComplex'
1165 0 6 if (not ref $den and $den == 0) { }
1187 4 3 if ref $x ne 'Math::GComplex'
1204 1 7 if ref $x ne 'Math::GComplex'
1216 1 6 if ref $x ne 'Math::GComplex'
1232 1 4 if ref $x ne 'Math::GComplex'
1245 0 5 if (not ref $den and $den == 0) { }
1263 4 3 if ref $x ne 'Math::GComplex'
1283 0 4 if ref $x ne 'Math::GComplex'
1295 1 3 if ref $x ne 'Math::GComplex'
1311 1 4 if ref $x ne 'Math::GComplex'
1324 0 5 if (not ref $den and $den == 0) { }
1344 4 3 if ref $x ne 'Math::GComplex'
1364 0 4 if ref $x ne 'Math::GComplex'
1376 2 3 if ref $x ne 'Math::GComplex'
1388 5 2 if ref $x ne 'Math::GComplex'
1393 7 0 unless (ref $pi)
1409 3 4 if ref $x ne 'Math::GComplex'
1414 3 4 if ($t == 0)
1420 4 0 if (not ref $pi and $pi != 0)
1438 0 14 if ref $x ne 'Math::GComplex'
1450 0 14 if ref $x ne 'Math::GComplex'
1462 0 14 if ref $x ne 'Math::GComplex'
1474 0 5 if ref $x ne 'Math::GComplex'
1475 5 0 if ref $y ne 'Math::GComplex'
1478 4 1 if $x->{'a'} == $y->{'a'}
1488 0 0 if ref $x ne 'Math::GComplex'
1489 0 0 if ref $y ne 'Math::GComplex'
1492 0 0 unless $x->{'a'} != $y->{'a'}
1502 0 31 if ref $x ne 'Math::GComplex'
1503 0 31 if ref $y ne 'Math::GComplex'
1506 2 29 unless $x->{'a'} <=> $y->{'a'} // (return undef)
1512 0 0 if ref $x ne 'Math::GComplex'
1513 0 0 if ref $y ne 'Math::GComplex'
1521 0 29 if ref $x ne 'Math::GComplex'
1522 29 0 if ref $y ne 'Math::GComplex'
1530 0 0 if ref $x ne 'Math::GComplex'
1531 0 0 if ref $y ne 'Math::GComplex'
1539 0 0 if ref $x ne 'Math::GComplex'
1540 0 0 if ref $y ne 'Math::GComplex'
1548 0 2 if ref $x ne 'Math::GComplex'
1549 2 0 if ref $y ne 'Math::GComplex'
1557 0 68 if ref $x ne 'Math::GComplex'
1565 0 207 if ref $x ne 'Math::GComplex'
1573 0 13 if ref $x ne 'Math::GComplex'