| line |
true |
false |
branch |
|
79
|
30 |
0 |
unless $self->has_result_format
|
|
86
|
0 |
0 |
if $op eq '/'
|
|
93
|
0 |
0 |
if defined $result_format{'reducable'} and $result_format{'reducable'}
|
|
95
|
0 |
0 |
if defined $result_format{'keep'} and $result_format{'keep'}
|
|
96
|
0 |
0 |
if defined $result_format{'keep'} and $result_format{'keep'}
|
|
111
|
15 |
15 |
$j ? :
|
|
|
0 |
30 |
unless $self->_operands_ok($j ? '/' : '*', $a, $b)
|
|
133
|
15 |
15 |
$i ? :
|
|
139
|
14 |
16 |
if $a->_gcd > 1 or $b->_gcd > 1
|
|
142
|
15 |
15 |
if ($i)
|
|
160
|
12 |
18 |
if $s->_gcd > 1 and $s = $s->_reduce
|
|
162
|
19 |
11 |
if $s->num > $s->denum and $s->denum > 1
|