aboutsummaryrefslogtreecommitdiff
path: root/challenge-343
diff options
context:
space:
mode:
authorMohammad Sajid Anwar <Mohammad.Anwar@yahoo.com>2025-10-14 19:19:43 +0100
committerGitHub <noreply@github.com>2025-10-14 19:19:43 +0100
commit5ecb77e880118194ead58d4485118d9683b7d0a1 (patch)
tree8b18f22e95126b6e40ed8716abe2677228a5eef2 /challenge-343
parent461ccb40c4aa918bb7cf11505faa6cce35a5cf5d (diff)
parentd72ebf3f9d608946fe8d76ab70e1fb85ea9bc918 (diff)
downloadperlweeklychallenge-club-5ecb77e880118194ead58d4485118d9683b7d0a1.tar.gz
perlweeklychallenge-club-5ecb77e880118194ead58d4485118d9683b7d0a1.tar.bz2
perlweeklychallenge-club-5ecb77e880118194ead58d4485118d9683b7d0a1.zip
Merge pull request #12853 from codereport/master
:sparkles: Week 343 in BQN
Diffstat (limited to 'challenge-343')
-rw-r--r--challenge-343/conor-hoekstra/ch-1.bqn13
-rw-r--r--challenge-343/conor-hoekstra/ch-2.bqn13
2 files changed, 26 insertions, 0 deletions
diff --git a/challenge-343/conor-hoekstra/ch-1.bqn b/challenge-343/conor-hoekstra/ch-1.bqn
new file mode 100644
index 0000000000..59d9d18ba5
--- /dev/null
+++ b/challenge-343/conor-hoekstra/ch-1.bqn
@@ -0,0 +1,13 @@
+# For up to date code:
+# https://github.com/codereport/bqn-code/blob/main/pwc/343-1.bqn
+
+u ⇐ •Import "/home/cph/bqn-test/test.bqn"
+
+ZeroFriend ← ⌊´·|0⊸-
+
+# Tests
+u.UnitTest (ZeroFriend⟨4, 2, -1, 3, -2⟩) ≡ 1
+u.UnitTest (ZeroFriend⟨-5, 5, -3, 3, -1, 1⟩) ≡ 1
+u.UnitTest (ZeroFriend⟨7, -3, 0, 2, -8⟩) ≡ 0
+u.UnitTest (ZeroFriend⟨-2, -5, -1, -8⟩) ≡ 1
+u.UnitTest (ZeroFriend⟨-2, 2, -4, 4, -1, 1⟩) ≡ 1
diff --git a/challenge-343/conor-hoekstra/ch-2.bqn b/challenge-343/conor-hoekstra/ch-2.bqn
new file mode 100644
index 0000000000..6fe67adb6b
--- /dev/null
+++ b/challenge-343/conor-hoekstra/ch-2.bqn
@@ -0,0 +1,13 @@
+# For up to date code:
+# https://github.com/codereport/bqn-code/blob/main/pwc/343-2.bqn
+
+u ⇐ •Import "/home/cph/bqn-test/test.bqn"
+
+TeamChampion ← ⊑·/·⌈´⊸=+´˘
+
+# Tests
+u.UnitTest (TeamChampion >⟨⟨0, 1, 1⟩, ⟨0, 0, 1⟩, ⟨0, 0, 0⟩⟩) ≡ 0
+u.UnitTest (TeamChampion >⟨⟨0, 1, 0, 0⟩, ⟨0, 0, 0, 0⟩, ⟨1, 1, 0, 0⟩, ⟨1, 1, 1, 0⟩⟩) ≡ 3
+u.UnitTest (TeamChampion >⟨⟨0, 1, 0, 1⟩, ⟨0, 0, 1, 1⟩, ⟨1, 0, 0, 0⟩, ⟨0, 0, 1, 0⟩⟩) ≡ 0
+u.UnitTest (TeamChampion >⟨⟨0, 1, 1⟩, ⟨0, 0, 0⟩, ⟨0, 1, 0⟩⟩) ≡ 0
+u.UnitTest (TeamChampion >⟨⟨0, 0, 0, 0, 0⟩, ⟨1, 0, 0, 0, 0⟩, ⟨1, 1, 0, 1, 1⟩, ⟨1, 1, 0, 0, 0⟩, ⟨1, 1, 0, 1, 0⟩⟩) ≡ 2