Branch Coverage

Bio/Tree/Statistics.pm
Criterion Covered Total %
branch 67 88 76.1


line true false branch
124 0 0 if ($i == 0) { }
134 0 0 if (defined $internal{$l})
166 12 10 if ($descs[0]->is_Leaf and $descs[1]->is_Leaf) { }
167 0 12 if ($descs[3]) { }
288 24 22 if ($node->is_Leaf)
289 0 24 unless $node->has_tag($key)
306 17 31 if $union{$trait}
312 17 5 if (keys %intersection) { }
320 0 22 if ($self->verbose)
355 0 15 unless $node->has_tag($key)
364 16 14 if $child->is_Leaf
368 14 3 if $nodev->{$trait}
407 0 18 unless $node->isa('Bio::Tree::NodeI')
409 2 16 unless $node->get_tag_values($key) eq $value
410 9 7 if $node->is_Leaf
415 7 7 if $pers < $persistence
424 0 4 unless $node->isa('Bio::Tree::NodeI')
459 0 22 unless $node->has_tag($key)
462 18 4 if ($node->get_tag_values($key) eq $value)
463 9 9 if ($node->get_tag_values('ps_score') == 0) { }
480 0 4 unless $node->isa('Bio::Tree::NodeI')
513 0 204 unless $node->has_tag($key)
516 184 20 if ($node->get_tag_values($key) eq $value)
518 117 67 if $node->is_Leaf
533 0 6 unless $node->isa('Bio::Tree::NodeI')
565 0 45 unless $node->has_tag($key)
568 5 40 if $node->get_tag_values($key) ne $value
569 20 20 if $node->is_Leaf
575 15 25 if not $child->is_Leaf and $sub_len
615 0 71 unless $node->has_tag($key)
617 7 64 if $node->get_tag_values($key) ne $value
619 32 32 if $node->is_Leaf
689 0 1 if $div == 0
725 24 64 unless $desc->is_Leaf
727 0 64 unless $desc->has_tag($key)
734 21 7 if $traits->{$_} > $most_common
744 0 2 unless $start_node
748 24 20 if $node->is_Leaf
795 20 52 unless $node2->is_Leaf
808 0 2 unless $start_node
813 20 16 if $node->is_Leaf
815 9 7 if (scalar keys %$traits == 1) { }
819 5 4 if $sum->{$value} < $traits->{$value}
826 0 2 unless defined $sum->{$value}