line |
true |
false |
branch |
76
|
0 |
1 |
unless defined $im |
78
|
0 |
1 |
if $re =~ /^(\+|\-)?nan/i |
79
|
0 |
1 |
if $im =~ /^(\+|\-)?nan/i |
81
|
0 |
1 |
if ($re =~ /^(\+|\-)?inf/i) |
82
|
0 |
0 |
if ($re =~ /^\-inf/i) { } |
86
|
0 |
1 |
if ($im =~ /^(\+|\-)?inf/i) |
87
|
0 |
0 |
if ($re =~ /^\-inf/i) { } |
98
|
0 |
5 |
if ($real == 0) { } |
|
2 |
3 |
elsif ($real != $real) { } |
|
0 |
3 |
elsif ($real / $real != $real / $real) { } |
99
|
0 |
0 |
$real =~ /^\-/ ? : |
105
|
0 |
0 |
$real < 0 ? : |
115
|
0 |
5 |
if ($imag == 0) { } |
|
2 |
3 |
elsif ($imag != $imag) { } |
|
0 |
3 |
elsif ($imag / $imag != $imag / $imag) { } |
116
|
0 |
0 |
$imag =~ /^\-/ ? : |
122
|
0 |
0 |
$imag < 0 ? : |
146
|
8 |
53 |
unless (@_) |
148
|
0 |
53 |
if (@_ > 3) |
153
|
10 |
43 |
if (not ref $_[0] and $_[0] eq 'Math::Complex_C') |
155
|
2 |
8 |
unless (@_) |
158
|
0 |
51 |
if (@_ > 2) |
162
|
51 |
0 |
if (@_ == 2) { } |
167
|
0 |
0 |
if _itsa($_[0]) == 226 |