Branch Coverage

blib/lib/PDL/DSP/Windows.pm

Criterion	Covered	Total	%
branch	208	242	85.9

line	true	false	branch
334	6	1	if ($expr) { }
336	59	169	if ($name =~ /$expr/)
380	188	5	if @_
409	201	5	unless ref $_[0]
410	198	8	unless ref $_[0]
411	63	143	unless ref $_[0] eq 'HASH'
412	62	144	unless ref $_[0]
425	21	185	if defined $params and not ref $params
429	71	135	$periodic ? :
430	1	205	unless ($windows->{$name})
431	0	1	$periodic ? :
439	71	134	$periodic ? :
510	0	8	$n > $opts{'min_bins'} ? :
558	2	5	if ($_ eq 'samples') { }
	2	3	elsif ($_ eq 'modfreqs') { }
569	1	4	wantarray ? :
588	12	21	if defined $self->{'samples'}
624	2	5	if @_
625	3	2	if defined $self->{'modfreqs'}
664	1	3	if (my $name = $window_print_names{$self->{'name'}})
668	2	1	if (my $name = $window_names{$self->{'name'}})
669	1	1	unless $name =~ /^\*/
679	1	3	unless $params
686	0	2	unless $self->{'params'}
687	0	2	unless @params
689	0	2	unless $self->get_param_names
690	0	2	unless @names
701	0	0	$ps ? :
776	0	0	@_ ? :
791	0	0	if ($coord eq 'nyquist') { }
	0	0	elsif ($coord eq 'sample') { }
	0	0	elsif ($coord eq 'bin') { }
920	2	2	unless @_ == 1
926	2	2	unless @_ == 1
932	2	3	unless @_ == 1
939	2	2	unless @_ == 1
946	2	3	unless @_ == 1
953	2	2	unless @_ == 1
960	2	2	unless @_ == 1
967	2	2	unless @_ == 1
974	2	2	unless @_ == 1
981	2	2	unless @_ == 1
988	3	2	unless @_ == 2
995	3	2	unless @_ == 2
1002	5	2	unless @_ == 4
1009	5	2	unless @_ == 4
1016	6	2	unless @_ == 5
1023	6	2	unless @_ == 5
1030	7	2	unless @_ == 6
1038	7	2	unless @_ == 6
1046	2	2	unless @_ == 1
1053	2	2	unless @_ == 1
1060	2	4	unless @_ == 1
1067	2	2	unless @_ == 1
1074	2	3	unless @_ == 1
1081	2	2	unless @_ == 1
1088	2	4	unless @_ == 1
1095	2	2	unless @_ == 1
1102	3	3	unless @_ == 2
1108	3	2	unless @_ == 2
1114	3	2	unless @_ == 2
1124	1	1	if ($N % 2) { }
1162	3	5	unless @_ == 2
1168	3	2	unless @_ == 2
1174	2	3	unless @_ == 1
1180	2	2	unless @_ == 1
1186	0	0	unless @_ == 2
1190	0	0	unless $beta >= 0 and $beta <= $N
1206	0	0	unless @_ == 2
1211	0	0	unless $beta >= 0 and $beta <= $N
1227	2	2	unless @_ == 1
1233	2	2	unless @_ == 1
1239	2	4	unless @_ == 1
1246	2	2	unless @_ == 1
1253	3	2	unless @_ == 2
1259	3	2	unless @_ == 2
1265	2	19	unless @_ == 1
1271	2	2	unless @_ == 1
1277	2	2	unless @_ == 1
1283	2	2	unless @_ == 1
1289	3	2	unless @_ == 2
1295	3	2	unless @_ == 2
1301	2	5	unless @_ == 1
1307	2	2	unless @_ == 1
1313	2	1	unless @_ == 1
1319	3	3	unless @_ == 2
1327	3	2	unless @_ == 2
1334	0	0	unless @_ == 2
1350	0	0	unless @_ == 2
1366	2	3	unless @_ == 1
1372	1	2	if $N % 2
1378	2	2	unless @_ == 1
1384	1	1	unless $N % 2
1390	2	2	unless @_ == 1
1397	2	2	unless @_ == 1
1404	2	2	unless @_ == 1
1412	2	2	unless @_ == 1
1419	2	4	unless @_ == 1
1436	2	2	unless @_ == 1
1453	2	2	unless @_ == 1
1473	3	3	unless @_ == 2
1479	3	2	unless @_ == 2
1485	2	4	unless @_ == 1
1491	2	2	unless @_ == 1
1497	2	4	unless @_ == 1
1503	2	2	unless @_ == 1
1509	3	12	unless @_ == 2
1512	2	10	unless $alpha >= 0 and $alpha <= 1
1514	0	10	if $alpha == 0
1530	3	9	unless @_ == 2
1533	2	7	unless $alpha >= 0 and $alpha <= 1
1535	0	7	if $alpha == 0
1551	2	3	unless @_ == 1
1557	2	2	unless @_ == 1
1998	1	8	if @cin > 7
2045	0	5	unless @_ == 2
2049	4	1	if (ref $x)
2050	0	4	if ref $n
2063	0	1	if ref $n
2064	0	1	abs $x <= 1 ? :
2070	1	8	if @ain > 7