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	22	6	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}