aboutsummaryrefslogtreecommitdiff
path: root/challenge-325
diff options
context:
space:
mode:
authorConor Hoekstra <codereport@outlook.com>2025-06-25 14:56:31 -0400
committerConor Hoekstra <codereport@outlook.com>2025-06-25 14:56:31 -0400
commit1801186c69893ac5949d8f2a46fbcb4fa92f5f92 (patch)
tree3b266312b137ad64e466f1bcd0d54709b23e7c4c /challenge-325
parent297818719258717c3e144484cb57ffc13d5e0649 (diff)
downloadperlweeklychallenge-club-1801186c69893ac5949d8f2a46fbcb4fa92f5f92.tar.gz
perlweeklychallenge-club-1801186c69893ac5949d8f2a46fbcb4fa92f5f92.tar.bz2
perlweeklychallenge-club-1801186c69893ac5949d8f2a46fbcb4fa92f5f92.zip
:sparkles: Week 325-27 in BQN
Diffstat (limited to 'challenge-325')
-rw-r--r--challenge-325/conor-hoekstra/ch-1.bqn11
-rw-r--r--challenge-325/conor-hoekstra/ch-2.bqn12
2 files changed, 23 insertions, 0 deletions
diff --git a/challenge-325/conor-hoekstra/ch-1.bqn b/challenge-325/conor-hoekstra/ch-1.bqn
new file mode 100644
index 0000000000..6f90bf0bb6
--- /dev/null
+++ b/challenge-325/conor-hoekstra/ch-1.bqn
@@ -0,0 +1,11 @@
+# For up to date code:
+# https://github.com/codereport/bqn-code/blob/main/pwc/325-1.bqn
+
+u ⇐ •Import "/home/cph/bqn-test/test.bqn"
+
+Mco ← ⌈´(+×⊢)`
+
+# Tests
+u.UnitTest (Mco 0‿1‿1‿0‿1‿1‿1) ≡ 3
+u.UnitTest (Mco 0‿0‿0‿0) ≡ 0
+u.UnitTest (Mco 1‿0‿1‿0‿1‿1) ≡ 2
diff --git a/challenge-325/conor-hoekstra/ch-2.bqn b/challenge-325/conor-hoekstra/ch-2.bqn
new file mode 100644
index 0000000000..d0b28e2e1c
--- /dev/null
+++ b/challenge-325/conor-hoekstra/ch-2.bqn
@@ -0,0 +1,12 @@
+# For up to date code:
+# https://github.com/codereport/bqn-code/blob/main/pwc/325-2.bqn
+
+u ⇐ •Import "/home/cph/bqn-test/test.bqn"
+
+Price ← ⊑·0⊸≤⊸/⊑(-∾⊣)1⊸↓
+FinalPrice ← Price¨¯1↓↓
+
+# Tests
+u.UnitTest (FinalPrice 8‿4‿6‿2‿3) ≡ 4‿2‿4‿2‿3
+u.UnitTest (FinalPrice 1‿2‿3‿4‿5) ≡ 1‿2‿3‿4‿5
+u.UnitTest (FinalPrice 7‿1‿1‿5) ≡ 6‿0‿1‿5