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'
47 0 1 unless ref $data eq 'ARRAY'
51 0 1 unless $n == $self->{'n'}
68 0 4 unless _check_n($n)
81 0 4 if (my $arg = shift()) { }
82 0 0 if (ref $arg ne 'ARRAY')
86 0 0 if ($n != @$arg)
94 0 4 unless $self->{'type'} eq 'cdft'
106 0 7 unless (_check_n($n))
122 0 3 if (my $arg = shift()) { }
123 0 0 unless ref $arg eq 'ARRAY'
125 0 0 unless $n == @$arg
131 0 3 unless $self->{'type'} eq 'rdft'
143 0 2 unless _check_n($n)
156 0 2 if (my $arg = shift()) { }
157 0 0 unless ref $arg eq 'ARRAY'
159 0 0 unless $n == @$arg
165 0 2 unless $self->{'type'} eq 'ddct'
178 0 2 unless _check_n($n)
191 0 2 if (my $arg = shift()) { }
192 0 0 unless ref $arg eq 'ARRAY'
194 0 0 unless $n == @$arg
200 0 2 unless $self->{'type'} eq 'ddst'
214 0 2 unless _check_n($n)
230 0 2 if (my $arg = shift()) { }
231 0 0 unless ref $arg eq 'ARRAY'
233 0 0 unless $np1 == @$data
239 0 2 unless $self->{'type'} eq 'dfct'
257 0 2 unless _check_n($n)
272 0 2 if (my $arg = shift()) { }
273 0 0 unless ref $arg eq 'ARRAY'
275 0 0 unless $n == @$arg
281 0 2 unless $self->{'type'} eq 'dfst'
304 3 0 $self->{'type'} eq 'rdft' ? :
3 1 $self->{'type'} ? :
306 2 2 if (ref $other eq 'Math::FFT') { }
2 0 elsif (ref $other eq 'ARRAY') { }
310 1 0 $other->{'type'} eq 'rdft' ? :
1 1 $other->{'type'} ? :
326 0 2 unless ref $r eq 'ARRAY'
330 0 2 unless $m % 2 == 1
335 2 0 $self->{'type'} eq 'rdft' ? :
2 0 $self->{'type'} ? :
349 0 1 unless ref $r eq 'ARRAY'
353 0 1 unless $m % 2 == 1
358 0 0 $self->{'type'} eq 'rdft' ? :
0 1 $self->{'type'} ? :
366 0 1 if (_deconvlv($n, $convlv, $d1, $respn, $self->{'ip'}, $self->{'w'}) != 0)
379 0 39 unless $accept{$_}
382 7 5 if ($win_fun and ref $win_fun ne 'CODE')
385 0 7 unless $accept{$win_fun}
388 0 12 if $args{'number'} and not $args{'segments'}
412 2 10 if (not $args{'segments'} or $args{'segments'} == 1 and not $args{'number'}) { }
413 0 2 unless _check_n($n)
414 1 1 if ($win_fun) { }
416 1 0 if ref $win_fun ne 'CODE'
429 0 0 $self->{'type'} eq 'rdft' ? :
0 1 $self->{'type'} ? :
439 0 10 if $k and not $m
441 0 10 unless _check_n($m)
444 5 5 $overlap ? :
445 0 10 if $N > $n
446 8 2 if ($win_fun) { }
447 6 2 if ref $win_fun ne 'CODE'
456 5 5 if ($overlap) { }
463 64 16 if ($win_fun)
472 128 32 if ($win_fun)
494 0 1 if ($data = shift()) { }
495 0 0 unless ref $data eq 'ARRAY'
506 1 0 unless $flag == 1
514 0 1 if ($data = shift()) { }
515 0 0 unless ref $data eq 'ARRAY'
530 0 1 if ($data = shift()) { }
531 0 0 unless ref $data eq 'ARRAY'
541 0 1 if $n == 1
551 0 1 if ($data = shift()) { }
552 0 0 unless ref $data eq 'ARRAY'
563 0 5 if $_ < $min
564 4 1 if $_ > $max
572 0 2 if ($data = shift()) { }
573 0 0 unless ref $data eq 'ARRAY'
584 1 1 $n & 1 ? :