Select Code to Download

for $x (0 .. 2) { $y = 0; $y = $_ + $x * $y for qw"6.5 -11.5 3"; say $
+y; }

for $x (0 .. 25) { $y = 0; ($y = $_ + $x * $y) % 127 for @coeffs; say 
+$y; }