Branch Coverage

blib/lib/Math/FFT.pm
Criterion Covered Total %
branch 77 164 46.9


line true false branch
25 0 21 unless ref $data eq 'ARRAY'
48 0 1 unless ref $data eq 'ARRAY'
52 0 1 unless $n == $self->{'n'}
70 0 4 unless _check_n($n)
84 0 4 if (my $arg = shift()) { }
86 0 0 if (ref $arg ne 'ARRAY')
90 0 0 if ($n != @$arg)
99 0 4 unless $self->{'type'} eq 'cdft'
112 0 7 unless (_check_n($n))
129 0 3 if (my $arg = shift()) { }
131 0 0 unless ref $arg eq 'ARRAY'
133 0 0 unless $n == @$arg
140 0 3 unless $self->{'type'} eq 'rdft'
153 0 2 unless _check_n($n)
167 0 2 if (my $arg = shift()) { }
169 0 0 unless ref $arg eq 'ARRAY'
171 0 0 unless $n == @$arg
178 0 2 unless $self->{'type'} eq 'ddct'
192 0 2 unless _check_n($n)
206 0 2 if (my $arg = shift()) { }
208 0 0 unless ref $arg eq 'ARRAY'
210 0 0 unless $n == @$arg
217 0 2 unless $self->{'type'} eq 'ddst'
232 0 2 unless _check_n($n)
249 0 2 if (my $arg = shift()) { }
251 0 0 unless ref $arg eq 'ARRAY'
253 0 0 unless $np1 == @$data
260 0 2 unless $self->{'type'} eq 'dfct'
279 0 2 unless _check_n($n)
295 0 2 if (my $arg = shift()) { }
297 0 0 unless ref $arg eq 'ARRAY'
299 0 0 unless $n == @$arg
306 0 2 unless $self->{'type'} eq 'dfst'
335 3 0 $self->{'type'} eq 'rdft' ? :
3 1 $self->{'type'} ? :
337 2 2 if (ref $other eq 'Math::FFT') { }
2 0 elsif (ref $other eq 'ARRAY') { }
346 1 0 $other->{'type'} eq 'rdft' ? :
1 1 $other->{'type'} ? :
365 0 2 unless ref $r eq 'ARRAY'
369 0 2 unless $m % 2 == 1
378 2 0 $self->{'type'} eq 'rdft' ? :
2 0 $self->{'type'} ? :
395 0 1 unless ref $r eq 'ARRAY'
399 0 1 unless $m % 2 == 1
408 0 0 $self->{'type'} eq 'rdft' ? :
0 1 $self->{'type'} ? :
418 0 1 if (_deconvlv($n, $convlv, $d1, $respn, $self->{'ip'}, $self->{'w'}) != 0)
435 0 39 unless $accept{$_}
438 7 5 if ($win_fun and ref $win_fun ne 'CODE')
442 0 7 unless $accept{$win_fun}
445 0 12 if $args{'number'} and not $args{'segments'}
470 2 10 if (not $args{'segments'} or $args{'segments'} == 1 and not $args{'number'}) { }
473 0 2 unless _check_n($n)
475 1 1 if ($win_fun) { }
478 1 0 if ref $win_fun ne 'CODE'
497 0 0 $self->{'type'} eq 'rdft' ? :
0 1 $self->{'type'} ? :
508 0 10 if $k and not $m
510 0 10 unless _check_n($m)
513 5 5 $overlap ? :
514 0 10 if $N > $n
516 8 2 if ($win_fun) { }
518 6 2 if ref $win_fun ne 'CODE'
529 5 5 if ($overlap) { }
538 64 16 if ($win_fun)
551 128 32 if ($win_fun)
576 0 1 if ($data = shift()) { }
578 0 0 unless ref $data eq 'ARRAY'
590 1 0 unless $flag == 1
599 0 1 if ($data = shift()) { }
601 0 0 unless ref $data eq 'ARRAY'
618 0 1 if ($data = shift()) { }
620 0 0 unless ref $data eq 'ARRAY'
631 0 1 if $n == 1
642 0 1 if ($data = shift()) { }
644 0 0 unless ref $data eq 'ARRAY'
657 0 5 if $_ < $min
658 4 1 if $_ > $max
667 0 2 if ($data = shift()) { }
669 0 0 unless ref $data eq 'ARRAY'
680 1 1 $n & 1 ? :