Branch Coverage

Bio/Map/PositionI.pm
Criterion Covered Total %
branch 69 116 59.4


line true false branch
116 190 3859 unless (defined $self->{'_eh'})
473 0 171 if ($min_percent > 0)
539 0 4 unless $given
542 0 4 if ($self eq 'Bio::Map::PositionI')
546 4 0 if (ref $self)
549 2 2 ref $given eq 'ARRAY' ? :
550 0 4 unless @positions >= 2
554 4 8 unless ($intersect)
563 0 12 unless $compare->_testStrand($intersect, $so)
564 12 0 if ($compare->isa('Bio::Map::PositionI')) { }
566 12 0 if ($this_map)
581 12 0 if (defined $intersect->strand and defined $compare->strand and $intersect->strand == $compare->strand) { }
588 0 12 if ($start > $end) { }
598 0 4 unless $intersect
607 8 1 if $rel
610 0 4 unless (@intersects)
611 0 0 if $rel
644 0 38 unless @args >= 1
648 0 38 if ($self eq 'Bio::Map::PositionI')
652 38 0 if (ref $self)
655 1 37 if (ref $args[0] eq 'ARRAY') { }
661 37 1 if ($args[0] and $args[0]->isa('Bio::Map::RelativeI'))
666 0 0 if $arg
668 0 38 unless @positions >= 2
676 78 0 if ($compare->isa('Bio::Map::PositionI')) { }
678 78 0 if ($this_map)
686 38 40 if (not defined $union_strand) { }
690 0 40 if (not defined $compare->strand or $union_strand ne $compare->strand)
710 44 1 if $rel
713 0 38 unless (@unions)
717 0 0 if $rel
764 0 10 unless @args >= 1
769 0 10 if ($self eq 'Bio::Map::PositionI')
773 10 0 if (ref $self)
776 10 0 if (ref $args[0] eq 'ARRAY') { }
782 10 0 if ($args[0] and $args[0]->isa('Bio::Map::RelativeI'))
787 0 0 if $arg
789 0 10 unless @positions >= 2
793 0 55 unless $pos->isa('Bio::Map::PositionI')
811 35 15 if ($inrange->overlaps($outrange, undef, $rel, $overlap)) { }
829 35 20 if (@overlappers) { }
830 0 35 if (@overlappers > 1) { }
848 42 20 unless (exists $prior_positions{$pos} or exists $answers{$pos})
861 0 10 unless @outranges
867 20 10 if ($pos->map eq $map) { }
888 0 490 unless $other
889 414 76 if ($rel)
890 0 414 unless ref $rel
891 0 414 unless $rel->isa('Bio::Map::RelativeI')
895 489 1 if (ref $other) { }
896 0 489 if (ref $other eq 'ARRAY')
899 0 489 unless defined $other and $other->isa('Bio::RangeI')
901 488 1 if ($other->isa('Bio::Map::PositionI')) { }
908 0 488 unless ($other_map)
918 0 488 unless ($other_map)
928 0 1 unless &looks_like_number($other)
932 0 490 unless defined $other_start
933 0 490 unless defined $other_end