aboutsummaryrefslogtreecommitdiff
path: root/challenge-040
diff options
context:
space:
mode:
authorConor Hoekstra <codereport@outlook.com>2021-10-09 21:26:28 -0400
committerConor Hoekstra <codereport@outlook.com>2021-10-09 21:26:28 -0400
commit51966386e30682ec3c5bf763a402a9178f6a0a88 (patch)
treed05e404703e480dea824be19c430575eacf15322 /challenge-040
parent3fb3f1d8dbdf3b5dfeaf05d0a7890c584592f8c2 (diff)
downloadperlweeklychallenge-club-51966386e30682ec3c5bf763a402a9178f6a0a88.tar.gz
perlweeklychallenge-club-51966386e30682ec3c5bf763a402a9178f6a0a88.tar.bz2
perlweeklychallenge-club-51966386e30682ec3c5bf763a402a9178f6a0a88.zip
Challenges 33/40/42/73
Diffstat (limited to 'challenge-040')
-rw-r--r--challenge-040/conor-hoekstra/ch-01.apl13
-rw-r--r--challenge-040/conor-hoekstra/ch-02.apl4
-rw-r--r--challenge-040/conor-hoekstra/ch-02.bqn4
3 files changed, 21 insertions, 0 deletions
diff --git a/challenge-040/conor-hoekstra/ch-01.apl b/challenge-040/conor-hoekstra/ch-01.apl
new file mode 100644
index 0000000000..99d6f69a2e
--- /dev/null
+++ b/challenge-040/conor-hoekstra/ch-01.apl
@@ -0,0 +1,13 @@
+solution ← ⍉
+
+⍝ Tests
+input ← ↑'ILOVEYOU' '24032019' '!?£$%^&*'
+solution input
+I2!
+L4?
+O0£
+V3$
+E2%
+Y0^
+O1&
+U9*
diff --git a/challenge-040/conor-hoekstra/ch-02.apl b/challenge-040/conor-hoekstra/ch-02.apl
new file mode 100644
index 0000000000..f905e1f53a
--- /dev/null
+++ b/challenge-040/conor-hoekstra/ch-02.apl
@@ -0,0 +1,4 @@
+solution ← {(⊂⍤⍋⌷⊢)@(1+⍺)⊢⍵}
+
+⍝ Tests
+0 2 5 solution 10 4 1 8 12 3 ⍝ 1 4 3 8 12 10
diff --git a/challenge-040/conor-hoekstra/ch-02.bqn b/challenge-040/conor-hoekstra/ch-02.bqn
new file mode 100644
index 0000000000..fdb49aba6b
--- /dev/null
+++ b/challenge-040/conor-hoekstra/ch-02.bqn
@@ -0,0 +1,4 @@
+Solution ← {∧⌾(𝕨⊸⊏)𝕩}
+
+# Tests
+0‿2‿5 Solution 10‿4‿1‿8‿12‿3 # ⟨ 1 4 3 8 12 10 ⟩