| line |
true |
false |
branch |
|
64
|
1 |
0 |
if ($ntrees)
|
|
67
|
2 |
1 |
if $tree->is_clade($arg)
|
|
97
|
150 |
1 |
if ($self->can_contain(@_)) { }
|
|
100
|
0 |
150 |
if ($tree->is_default)
|
|
101
|
0 |
0 |
if (not $seen_default) { }
|
|
109
|
0 |
150 |
if ($seen_default)
|
|
110
|
0 |
0 |
if (my $tree = $self->get_default_tree)
|
|
140
|
0 |
0 |
if $tree->is_default
|
|
163
|
8 |
0 |
if (my $taxa = $self->get_taxa) { }
|
|
168
|
0 |
120 |
if $tip->get_taxon and $taxa->contains($tip->get_taxon)
|
|
170
|
78 |
42 |
unless ($tips{$name})
|
|
184
|
0 |
78 |
unless (exists $taxa{$name})
|
|
239
|
0 |
14 |
if defined $val
|
|
259
|
3 |
3 |
unless (exists $clade_lengths{$clade})
|
|
266
|
3 |
6 |
unless (exists $clade_lengths{$clade})
|
|
282
|
1 |
2 |
if ($seen_partitions{$partition} / $tree_count <= $perc)
|
|
292
|
0 |
1 |
if (@sorted == 0)
|
|
305
|
3 |
2 |
unless (exists $seen_nodes{$tip})
|
|
307
|
3 |
0 |
if ($branches =~ /^f/i) { }
|
|
324
|
2 |
0 |
if ($branches =~ /^f/i) { }
|
|
332
|
0 |
0 |
if ($args{'-summarize'} =~ /^f/i) { }
|
|
344
|
1 |
1 |
if ($old_parent)
|
|
394
|
0 |
0 |
unless exists $tip_values{$tipname}
|
|
397
|
0 |
0 |
if (exists $tip_values{$datumname}) { }
|
|
408
|
0 |
0 |
if (my $root = $tree->get_root)
|
|
413
|
0 |
0 |
if (my $data = $data{$datum->get_name})
|
|
414
|
0 |
0 |
if @{$data;}
|
|
437
|
0 |
4 |
if (my $taxa = $self->get_taxa) { }
|
|
446
|
65 |
16 |
unless ($taxa{$name})
|
|
452
|
4 |
0 |
if (%taxa)
|
|
528
|
1 |
0 |
if ($args{'-make_translate'})
|
|
533
|
18 |
0 |
if (not $args{'-tipnames'}) { }
|
|
|
0 |
0 |
elsif ($args{'-tipnames'} =~ /^internal$/i) { }
|
|
|
0 |
0 |
elsif ($args{'-tipnames'} =~ /^taxon/i and $node->get_taxon) { }
|
|
542
|
0 |
0 |
if ($args{'-tipnames'} =~ /^taxon_internal$/i) { }
|
|
|
0 |
0 |
elsif ($args{'-tipnames'} =~ /^taxon$/i) { }
|
|
553
|
18 |
0 |
unless exists $translate{$name}
|
|
566
|
1 |
0 |
if ($args{'-figtree'})
|
|
570
|
0 |
1 |
if ($args{'-links'})
|
|
573
|
0 |
0 |
if (my $taxa = $self->get_taxa)
|
|
579
|
1 |
0 |
if ($args{'-make_translate'})
|
|
586
|
1 |
17 |
if ($i == $#translate) { }
|
|
597
|
1 |
0 |
if ($tree->is_rooted) { }
|
|
598
|
0 |
1 |
if ($args{'-rooting'} =~ /^token$/i) { }
|
|
|
1 |
0 |
elsif ($args{'-rooting'} =~ /^comment$/i) { }
|
|
|
0 |
0 |
elsif ($args{'-rooting'} =~ /^nhx/i) { }
|
|
613
|
0 |
0 |
if ($args{'-nhxkeys'}) { }
|
|
626
|
0 |
0 |
if ($args{'-rooting'} =~ /^token$/i) { }
|
|
|
0 |
0 |
elsif ($args{'-rooting'} =~ /^comment$/i) { }
|
|
|
0 |
0 |
elsif ($args{'-rooting'} =~ /^nhx/i) { }
|
|
641
|
0 |
0 |
if ($args{'-nhxkeys'}) { }
|