aboutsummaryrefslogtreecommitdiff
path: root/challenge-073
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-073
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-073')
-rw-r--r--challenge-073/conor-hoekstra/ch-01.apl4
-rw-r--r--challenge-073/conor-hoekstra/ch-01.bqn4
-rw-r--r--challenge-073/conor-hoekstra/ch-02.apl5
-rw-r--r--challenge-073/conor-hoekstra/ch-02.bqn5
4 files changed, 18 insertions, 0 deletions
diff --git a/challenge-073/conor-hoekstra/ch-01.apl b/challenge-073/conor-hoekstra/ch-01.apl
new file mode 100644
index 0000000000..302221e932
--- /dev/null
+++ b/challenge-073/conor-hoekstra/ch-01.apl
@@ -0,0 +1,4 @@
+solution ← 3⌊/⊢
+
+⍝ Tests
+solution 1 5 0 2 9 3 7 6 4 8 ⍝ 0 0 0 2 3 3 4 4
diff --git a/challenge-073/conor-hoekstra/ch-01.bqn b/challenge-073/conor-hoekstra/ch-01.bqn
new file mode 100644
index 0000000000..b7c889e6ae
--- /dev/null
+++ b/challenge-073/conor-hoekstra/ch-01.bqn
@@ -0,0 +1,4 @@
+Solution ← ⌊´⎉1 3↕⊢
+
+# Tests
+Solution 1‿5‿0‿2‿9‿3‿7‿6‿4‿8 # ⟨ 0 0 0 2 3 3 4 4 ⟩
diff --git a/challenge-073/conor-hoekstra/ch-02.apl b/challenge-073/conor-hoekstra/ch-02.apl
new file mode 100644
index 0000000000..d83cb0a9c2
--- /dev/null
+++ b/challenge-073/conor-hoekstra/ch-02.apl
@@ -0,0 +1,5 @@
+solution ← (⌊/(⊣×≠)⊃∘⌽)¨,\
+
+⍝ Tests
+solution 7 8 3 12 10 ⍝ 0 7 0 3 3
+solution 4 6 5 ⍝ 0 4 4
diff --git a/challenge-073/conor-hoekstra/ch-02.bqn b/challenge-073/conor-hoekstra/ch-02.bqn
new file mode 100644
index 0000000000..138ed10180
--- /dev/null
+++ b/challenge-073/conor-hoekstra/ch-02.bqn
@@ -0,0 +1,5 @@
+Solution ← (⌊´(⊣×≠)⊑∘⌽)¨1⊸↓∘↑
+
+# Tests
+Solution 7‿8‿3‿12‿10 # ⟨ 0 7 0 3 3 ⟩
+Solution 4‿6‿5 # ⟨ 0 4 4 ⟩