line |
true |
false |
branch |
60
|
58 |
7 |
unless &is_chiral_tetrahedral($atom) |
62
|
3 |
4 |
exists $atom->{'hcount'} ? : |
63
|
0 |
7 |
if $moiety->degree($atom) + $hcount != 4 |
68
|
2 |
5 |
if scalar keys %colors == 4 |
84
|
3589 |
5 |
if (ref $what eq 'HASH') { } |
94
|
261 |
5 |
if (ref $what eq 'HASH') { } |
126
|
4 |
0 |
unless $max_length |
136
|
0 |
12 |
if @seen != 1 |
166
|
25 |
5 |
if (ref $what eq 'HASH') { } |
168
|
2 |
23 |
if (&is_chiral_tetrahedral($what)) |
169
|
1 |
1 |
$what->{'chirality'} eq '@' ? : |
180
|
16 |
8 |
$_[0] eq '/' ? : |
190
|
6 |
135 |
if (&is_chiral_tetrahedral($atom)) |
191
|
1 |
5 |
if ($moiety->degree($atom) < 3) { } |
|
5 |
0 |
elsif ($moiety->degree($atom) == 4 and $color_sub) { } |
202
|
3 |
2 |
if (scalar keys %colors != 4) |
215
|
24 |
117 |
if (not &is_chiral($atom) and $moiety->degree($atom) == 4) |
217
|
5 |
19 |
unless ($color_sub_local) |
222
|
3 |
21 |
if (scalar keys %colors == 4) |
234
|
1 |
132 |
if ($A eq $B) |
240
|
6 |
127 |
if ($moiety->has_edge_attribute(@$bond, "bond")) |
242
|
1 |
5 |
if ($bond_type eq '=') { } |
|
5 |
0 |
elsif ($bond_type =~ m[^[\\/]$]) { } |
250
|
1 |
3 |
if ($bond_types{$_} and @{$bond_types{$_};} > 1) |
273
|
1 |
4 |
unless ($bond_types{'='}) |
295
|
24 |
14 |
if ($moiety->has_edge_attribute($atom, $neighbour, 'bond')) { } |
300
|
7 |
31 |
if ($bond_type =~ m[^[\\/]$] and $atom->{'number'} > $neighbour->{'number'}) |