Branch Coverage

blib/lib/AI/NeuralNet/SOM.pm
Criterion Covered Total %
branch 46 176 26.1


line true false branch
72 0 1 if $xdim < 1
73 0 1 if $ydim < 1
74 0 1 if $idim < 1
75 0 1 if $topology ne 'hexa' and $topology ne 'rect'
76 0 1 if $neighborhood ne 'bubble' and $neighborhood ne 'gaussian'
77 0 1 if $init_type ne 'random' and $init_type ne 'linear'
78 0 1 if $random_seed < 0
79 0 1 if ref $data eq 'ARRAY' and @$data % $idim
91 0 1 if ($init_type eq 'random')
98 0 0 if ($$data[$i + $p * $idim] =~ /^-?\d+\.?\d*$/l)
99 0 0 if $max < $$data[$i + $p * $idim]
100 0 0 if $min > $$data[$i + $p * $idim]
114 1 0 if ($init_type eq 'linear')
143 0 1 if ref $data eq 'ARRAY' and @$data % $$self{'IDIM'}
146 1 0 if ($$self{'NEIGHBORHOOD'} eq 'bubble') { }
153 1 0 if ($alpha_type eq 'linear') { }
168 20 1980 if (++$p == $patterns_count)
189 0 4 if ref $data eq 'ARRAY' and @$data % $$self{'IDIM'}
223 354750 0 if ($$data[$i] =~ /^-?\d+\.?\d*$/l) { }
232 0 70950 if $masked == $$self{'IDIM'}
235 15481 55469 if ($difference < $min_diff)
253 0 246 if $x < 0 or $x >= $$self{'XDIM'} or $y < 0 or $y >= $$self{'YDIM'} or not defined $label
290 15 10 if defined $label
306 1 1 unless (/^ *#/l)
315 0 1 if $xdim < 1
316 0 1 if $ydim < 1
317 0 1 if $idim < 1
318 0 1 if $topology ne 'hexa' and $topology ne 'rect'
319 0 1 if $neighborhood ne 'bubble' and $neighborhood ne 'gaussian'
332 25 0 unless (/^ *#/l)
334 0 25 if (/#/l) { }
342 15 10 if (defined $line[0])
365 0 0 if ($$self{'XDIM'} <= 0 or $$self{'YDIM'} <= 0 or $$self{'IDIM'} <= 0)
371 0 0 if ($$self{'TOPOLOGY'} eq 'rect') { }
378 0 0 if ($i < $$self{'XDIM'} - 1)
383 0 0 if ($j < $$self{'YDIM'} - 1)
388 0 0 if ($j < $$self{'YDIM'} - 1 and $i < $$self{'XDIM'} - 1)
398 0 0 if ($bx)
401 0 0 if ($by)
404 0 0 if ($bz)
417 0 0 if ($i < $$self{'XDIM'} - 1)
426 0 0 if ($j < $$self{'YDIM'} - 1)
427 0 0 if ($j % 2) { }
436 0 0 if ($i > 0) { }
449 0 0 if ($j < $$self{'YDIM'} - 1) { }
450 0 0 if (not $j % 2) { }
458 0 0 if ($i < $$self{'XDIM'} - 1)
471 0 0 if ($bx)
474 0 0 if ($by)
475 0 0 if ($j % 2) { }
482 0 0 if ($bz)
483 0 0 if ($j % 2) { }
496 0 0 if ($$self{'TOPOLOGY'} eq 'rect') { }
501 0 0 if ($i > 0 and $j > 0 and $i < $$self{'XDIM'} * 2 - 2 and $j < $$self{'YDIM'} * 2 - 2) { }
0 0 elsif ($j == 0 and $i > 0 and $i < $$self{'XDIM'} * 2 - 2) { }
0 0 elsif ($j == $$self{'YDIM'} * 2 - 2 and $i > 0 and $i < $$self{'XDIM'} * 2 - 2) { }
0 0 elsif ($i == 0 and $j > 0 and $j < $$self{'YDIM'} * 2 - 2) { }
0 0 elsif ($i == $$self{'XDIM'} * 2 - 2 and $j > 0 and $j < $$self{'YDIM'} * 2 - 2) { }
0 0 elsif ($i == 0 and $j == 0) { }
0 0 elsif ($i == $$self{'XDIM'} * 2 - 2 and $j == 0) { }
0 0 elsif ($i == 0 and $j == $$self{'YDIM'} * 2 - 2) { }
0 0 elsif ($i == $$self{'XDIM'} * 2 - 2 and $j == $$self{'YDIM'} * 2 - 2) { }
571 0 0 if ($i > 0 and $j > 0 and $i < $$self{'XDIM'} * 2 - 2 and $j < $$self{'YDIM'} * 2 - 2) { }
0 0 elsif ($j == 0 and $i > 0 and $i < $$self{'XDIM'} * 2 - 2) { }
0 0 elsif ($j == $$self{'YDIM'} * 2 - 2 and $i > 0 and $i < $$self{'XDIM'} * 2 - 2) { }
0 0 elsif ($i == 0 and $j > 0 and $j < $$self{'YDIM'} * 2 - 2) { }
0 0 elsif ($i == $$self{'XDIM'} * 2 - 2 and $j > 0 and $j < $$self{'YDIM'} * 2 - 2) { }
0 0 elsif ($i == 0 and $j == 0) { }
0 0 elsif ($i == $$self{'XDIM'} * 2 - 2 and $j == 0) { }
0 0 elsif ($i == 0 and $j == $$self{'YDIM'} * 2 - 2) { }
0 0 elsif ($i == $$self{'XDIM'} * 2 - 2 and $j == $$self{'YDIM'} * 2 - 2) { }
575 0 0 if (not $j % 4) { }
607 0 0 if (not $j % 4) { }
623 0 0 if (not $j % 4) { }
643 0 0 if ($j % 4) { }
675 0 0 if (not $j % 4) { }
689 0 0 if ($j % 4) { }
759 0 192 if $x < 0 or $x >= $$self{'XDIM'} or $y < 0 or $y >= $$self{'YDIM'}
790 500 0 if ($$data[$i + $k * $n] =~ /^-?\d+\.?\d*$/l)
804 500 0 if ($$data[$k * $n + $i] =~ /^-?\d+\.?\d*$/l)
806 1500 0 if ($$data[$k * $n + $j] =~ /^-?\d+\.?\d*$/l)
914 23005 26995 if (($by - $ty) % 2 != 0)
915 13990 9015 if ($by % 2 == 0) { }
945 0 2000 if ($$self{'TOPOLOGY'} eq 'rect') { }
954 27667 22333 if ($self->$dist_func($bx, $by, $x, $y) <= $radius)
956 138335 0 if ($$data[$i] =~ /^-?\d+\.?\d*$/l)
971 0 0 if ($$self{'TOPOLOGY'} eq 'rect') { }
983 0 0 if ($$data[$i] =~ /^-?\d+\.?\d*$/l)