Select Code to Download

        method BUILD($inputneuron, $outputneuron, $y1 = 1000000.rand) 
+{
                $.weight = $y1;
        }

loop (my $i = 0; $i < @.inputsynapses.length; $i++) {
    if (@.inputsynapses[$i].weight * @.inputsynapses[$i].outputneuron.
+input >= 0) {
...
        @.inputsynapses[$i].outputneuron.input = 0;
    }   
}

.outputneuron.input = +(.weight * .outputneuron.input >= 0)
  for @.inputsynapses;