Condition Coverage

blib/lib/Chemistry/OpenSMILES.pm
Criterion Covered Total %
condition 68 93 73.1


and 3 conditions

line !l l&&!r l&&r condition
152 0 0 0 scalar keys %colors == 2 and &all(sub { $_ == 2; } , values %colors)
189 479 94 326 $moiety->has_edge_attribute($a, $b, 'bond') && $moiety->get_edge_attribute($a, $b, 'bond') eq ':'
207 646 24 7 $what->{'chirality'} && $what->{'chirality'} =~ /^\@AL[12]$/
217 58 29 6 $what->{'chirality'} && $what->{'chirality'} =~ /^\@SP[123]$/
228 662 23 155 $what->{'chirality'} && $what->{'chirality'} =~ /^\@\@?$/
238 80 24 8 $what->{'chirality'} && $what->{'chirality'} =~ /^\@TB([1-9]|1[0-9]|20)$/
248 22 5 5 $what->{'chirality'} && $what->{'chirality'} =~ /^\@OH([1-9]|[12][0-9]|30)$/
257 1242 244 108 $moiety->has_edge_attribute($a, $b, 'bond') && $moiety->get_edge_attribute($a, $b, 'bond') =~ m[^[\\/]$]
264 867 229 214 $moiety->has_edge_attribute($a, $b, 'bond') && $moiety->get_edge_attribute($a, $b, 'bond') eq '='
298 317 10 3 $_->[0] == $b and $_->[1] == $a
316 14 3 $_->[0] == $a and $_->[1] == $b
328 9 0 30 exists $distance{$b} && $distance{$b} <= $max_length
341 0 0 0 $moiety->has_edge_attribute($a, $b, 'bond') && $moiety->get_edge_attribute($a, $b, 'bond') eq '#'
361 0 0 0 $Chemistry::OpenSMILES::TB[$_]{'axis'}[0] == $setting->{'axis'}[0] and $Chemistry::OpenSMILES::TB[$_]{'axis'}[1] == $setting->{'axis'}[1]
371 0 0 0 $Chemistry::OpenSMILES::OH[$_]{'shape'} eq $setting->{'shape'} and $Chemistry::OpenSMILES::OH[$_]{'axis'}[0] == $setting->{'axis'}[0]
0 0 0 $Chemistry::OpenSMILES::OH[$_]{'shape'} eq $setting->{'shape'} and $Chemistry::OpenSMILES::OH[$_]{'axis'}[0] == $setting->{'axis'}[0] and $Chemistry::OpenSMILES::OH[$_]{'axis'}[1] == $setting->{'axis'}[1]
437 502 1 77 &is_aromatic($atom) and $moiety->degree($atom)
503 76 1 &is_aromatic($atom) and $moiety->degree($atom) and 2 > grep({is_aromatic_bond($moiety, $atom, $_);} $moiety->neighbours($atom))
445 0 504 62 not &is_chiral($atom) and $moiety->degree($atom) == 4
556 31 8 12 $cis_trans_A and $cis_trans_B
24 12 3 not $allenes->has_edge(@$bond) and $cis_trans_A + $cis_trans_B == 1
561 21 26 1 $bond_types{$_} and @{$bond_types{$_};} > 1
605 429 64 78 &is_aromatic($A) and &is_aromatic($B)
493 77 1 &is_aromatic($A) and &is_aromatic($B) and not is_aromatic_bond($moiety, $A, $B)
141 0 1 &is_aromatic($A) and &is_aromatic($B) and not is_aromatic_bond($moiety, $A, $B) and is_ring_bond($moiety, $A, $B)
687 0 27 12 @d1 == 2 and @d2
27 0 12 @d1 == 2 and @d2 and @d1 + @d2 == @$system

or 3 conditions

line l !l&&r !l&&!r condition
121 0 0 65 &is_chiral_allenal($atom) or &is_chiral_planar($atom)
0 7 58 &is_chiral_allenal($atom) or &is_chiral_planar($atom) or &is_chiral_tetrahedral($atom)
7 0 58 &is_chiral_allenal($atom) or &is_chiral_planar($atom) or &is_chiral_tetrahedral($atom) or &is_chiral_trigonal_bipyramidal($atom)
334 190 0 115 !$moiety->has_edge_attribute($a, $b, 'bond') || $moiety->get_edge_attribute($a, $b, 'bond') eq '-'