1 files changed, 14 insertions, 0 deletions
diff --git a/challenge-246/0rir/raku/ch-2.raku b/challenge-246/0rir/raku/ch-2.raku
new file mode 100755
index 0000000000..1f0506679c
--- /dev/null
+++ b/challenge-246/0rir/raku/ch-2.raku
@@ -0,0 +1,14 @@
+#!/usr/bin/env raku
+# :vim ft=raku sw=4 expandtab  # 🦋 ∅∪∩∋∈∉ ≡ ≢ «␤ » ∴
+use v6;
+
+sub MAIN( *@in ) {
+    my ($p, $q, @a) = @in».Int;
+
+    for ^3 {
+        @a.push: $p × @a[*-2] + $q × @a[*-1];
+    }
+
+    say "P $p   Q $q   Ary:  @a.raku()";
+}
+