Help for this page

Select Code to Download

Select or download this

 =13=    my $FUZZ = 5; # permitted average deviation in the vector ele
+ments
   
...
=70=          next BUCKET if $error > $FUZZ * @vector;
=71=        }
...

Select or download this

$pattern_sum += @pattern_vector;
$upper_bound  = $pattern_sum + $FUZZ * @pattern_vector;
...
       if ($bucket_sum > $upper_bound || $bucket_sum < $lower_bound);
   # found, do something
}