aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorConor Hoekstra <codereport@outlook.com>2024-09-09 13:43:40 -0400
committerConor Hoekstra <codereport@outlook.com>2024-09-09 13:43:40 -0400
commit156e3186ef5b8f929e3589f8469463132e0fa996 (patch)
treed4972a97b554df67eb98fab68d6b0e7e63daabb9
parentfe17bbe9eba2cd0ab0542f191e80a2015883c8e1 (diff)
downloadperlweeklychallenge-club-156e3186ef5b8f929e3589f8469463132e0fa996.tar.gz
perlweeklychallenge-club-156e3186ef5b8f929e3589f8469463132e0fa996.tar.bz2
perlweeklychallenge-club-156e3186ef5b8f929e3589f8469463132e0fa996.zip
:sparkles: PWC 285-1 in BQN
-rw-r--r--challenge-285/conor-hoekstra/ch-1.bqn14
1 files changed, 14 insertions, 0 deletions
diff --git a/challenge-285/conor-hoekstra/ch-1.bqn b/challenge-285/conor-hoekstra/ch-1.bqn
new file mode 100644
index 0000000000..f2e7cd2fd3
--- /dev/null
+++ b/challenge-285/conor-hoekstra/ch-1.bqn
@@ -0,0 +1,14 @@
+# For up to date code:
+# https://github.com/codereport/bqn-code/blob/main/pwc/285-1.bqn
+
+DeadEnds ← ⊢´¨(¬∘∊/⊣)⊑¨
+ # (↑¨↓¨)«~»(↑¨) - Kap (original)
+ # ⊢/¨«~»(↑¨) - Kap
+ # ⊢/¨~⊃¨ - Dyalog APL
+ # {⊃~/⌽↓⍉↑⍵} - Dyalog APL (Alternative)
+ # Ṫ€ḟḢ€ - Jelly
+ # ↓¨~↑¨ - Hypothetical APL
+
+# Tests
+•Show DeadEnds ⟨⟨"B","C"⟩, ⟨"D","B"⟩, ⟨"C","A"⟩⟩ # "A"
+•Show DeadEnds ⟨⟨"A","Z"⟩⟩ # "Z"