Branch Coverage

blib/lib/Music/Tension.pm
Criterion Covered Total %
branch 16 16 100.0


line true false branch
23 5 23 if (exists $param{'reference_frequency'}) { }
26 2 3 unless defined $param{'reference_frequency'} and &looks_like_number($param{'reference_frequency'})
38 3 4 if not defined $freq && &looks_like_number($freq) or $freq <= 0
51 1 10 unless $self->can('pitches')
56 2 7 unless defined $phrase1 and ref $phrase1 eq 'ARRAY' and $#{$phrase1;} > 1
57 2 4 unless defined $phrase2 and ref $phrase2 eq 'ARRAY' and @$phrase2
68 11 36 if $delta > $max
78 3 12 if not defined $pitch && &looks_like_number($pitch) or $pitch < 0