line |
true |
false |
branch |
80
|
0 |
1 |
unless defined $im |
82
|
0 |
1 |
if $re =~ /^(\+|\-)?nan/i |
83
|
0 |
1 |
if $im =~ /^(\+|\-)?nan/i |
85
|
0 |
1 |
if ($re =~ /^(\+|\-)?inf/i) |
86
|
0 |
0 |
if ($re =~ /^\-inf/i) { } |
90
|
0 |
1 |
if ($im =~ /^(\+|\-)?inf/i) |
91
|
0 |
0 |
if ($re =~ /^\-inf/i) { } |
102
|
0 |
7 |
if ($real == 0) { } |
|
4 |
3 |
elsif ($real != $real) { } |
|
0 |
3 |
elsif ($real / $real != $real / $real) { } |
103
|
0 |
0 |
$real =~ /^\-/ ? : |
109
|
0 |
0 |
$real < 0 ? : |
119
|
0 |
7 |
if ($imag == 0) { } |
|
4 |
3 |
elsif ($imag != $imag) { } |
|
0 |
3 |
elsif ($imag / $imag != $imag / $imag) { } |
120
|
0 |
0 |
$imag =~ /^\-/ ? : |
126
|
0 |
0 |
$imag < 0 ? : |
150
|
9 |
64 |
unless (@_) |
152
|
0 |
64 |
if (@_ > 3) |
157
|
11 |
53 |
if (not ref $_[0] and $_[0] eq "Math::Complex_C::L") |
159
|
2 |
9 |
unless (@_) |
162
|
0 |
62 |
if (@_ > 2) |
166
|
51 |
11 |
if (@_ == 2) { } |
171
|
0 |
11 |
if _itsa($_[0]) == 226 |