diff options
| author | Conor Hoekstra <codereport@outlook.com> | 2025-06-25 14:56:31 -0400 |
|---|---|---|
| committer | Conor Hoekstra <codereport@outlook.com> | 2025-06-25 14:56:31 -0400 |
| commit | 1801186c69893ac5949d8f2a46fbcb4fa92f5f92 (patch) | |
| tree | 3b266312b137ad64e466f1bcd0d54709b23e7c4c | |
| parent | 297818719258717c3e144484cb57ffc13d5e0649 (diff) | |
| download | perlweeklychallenge-club-1801186c69893ac5949d8f2a46fbcb4fa92f5f92.tar.gz perlweeklychallenge-club-1801186c69893ac5949d8f2a46fbcb4fa92f5f92.tar.bz2 perlweeklychallenge-club-1801186c69893ac5949d8f2a46fbcb4fa92f5f92.zip | |
:sparkles: Week 325-27 in BQN
| -rw-r--r-- | challenge-325/conor-hoekstra/ch-1.bqn | 11 | ||||
| -rw-r--r-- | challenge-325/conor-hoekstra/ch-2.bqn | 12 | ||||
| -rw-r--r-- | challenge-326/conor-hoekstra/ch-1.bqn | 16 | ||||
| -rw-r--r-- | challenge-326/conor-hoekstra/ch-2.bqn | 15 | ||||
| -rw-r--r-- | challenge-327/conor-hoekstra/ch-1.bqn | 11 | ||||
| -rw-r--r-- | challenge-327/conor-hoekstra/ch-2.bqn | 12 |
6 files changed, 77 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 diff --git a/challenge-326/conor-hoekstra/ch-1.bqn b/challenge-326/conor-hoekstra/ch-1.bqn new file mode 100644 index 0000000000..82bf18819c --- /dev/null +++ b/challenge-326/conor-hoekstra/ch-1.bqn @@ -0,0 +1,16 @@ +# For up to date code: +# https://github.com/codereport/bqn-code/blob/main/pwc/326-1.bqn + +u ⇐ •Import "/home/cph/bqn-test/test.bqn" +s ⇐ •Import "/home/cph/bqn-code/lib/string.bqn" + +days ← 31‿28‿31‿30‿31‿30‿31‿31‿30‿31‿30‿31 +DayOfYear ← { + m‿d ← •BQN¨1↓'-'⊸s.Split𝕩 + d++´days↑˜m-1 +} + +# Tests +u.UnitTest (DayOfYear "2025-02-02") ≡ 33 +u.UnitTest (DayOfYear "2025-04-10") ≡ 100 +u.UnitTest (DayOfYear "2025-09-07") ≡ 250 diff --git a/challenge-326/conor-hoekstra/ch-2.bqn b/challenge-326/conor-hoekstra/ch-2.bqn new file mode 100644 index 0000000000..6c5d6bae36 --- /dev/null +++ b/challenge-326/conor-hoekstra/ch-2.bqn @@ -0,0 +1,15 @@ +# For up to date code: +# https://github.com/codereport/bqn-code/blob/main/pwc/326-2.bqn + +u ⇐ •Import "/home/cph/bqn-test/test.bqn" + +Decompress ← { ∾⥊´¨<˘2‿∘⥊𝕩 } # Explicit +Decompress2 ← ∾·⥊´¨·<˘2‿∘⥊⊢ # Tacit + +# Tests +u.UnitTest (Decompress 1‿3‿2‿4) ≡ 3‿4‿4 +u.UnitTest (Decompress 1‿1‿2‿2) ≡ 1‿2‿2 +u.UnitTest (Decompress 3‿1‿3‿2) ≡ 1‿1‿1‿2‿2‿2 +u.UnitTest (Decompress2 1‿3‿2‿4) ≡ 3‿4‿4 +u.UnitTest (Decompress2 1‿1‿2‿2) ≡ 1‿2‿2 +u.UnitTest (Decompress2 3‿1‿3‿2) ≡ 1‿1‿1‿2‿2‿2 diff --git a/challenge-327/conor-hoekstra/ch-1.bqn b/challenge-327/conor-hoekstra/ch-1.bqn new file mode 100644 index 0000000000..7eadad6fa0 --- /dev/null +++ b/challenge-327/conor-hoekstra/ch-1.bqn @@ -0,0 +1,11 @@ +# For up to date code: +# https://github.com/codereport/bqn-code/blob/main/pwc/327-1.bqn + +u ⇐ •Import "/home/cph/bqn-test/test.bqn" + +Missing ← (1+↕∘≠)⊸(¬∘∊/⊣) + +# Tests +u.UnitTest (Missing 1‿2‿1‿3‿2‿5) ≡ 4‿6 +u.UnitTest (Missing 1‿1‿1) ≡ 2‿3 +u.UnitTest (Missing 2‿2‿1) ≡ ⋈3 diff --git a/challenge-327/conor-hoekstra/ch-2.bqn b/challenge-327/conor-hoekstra/ch-2.bqn new file mode 100644 index 0000000000..49a89bff11 --- /dev/null +++ b/challenge-327/conor-hoekstra/ch-2.bqn @@ -0,0 +1,12 @@ +# For up to date code: +# https://github.com/codereport/bqn-code/blob/main/pwc/327-2.bqn + +u ⇐ •Import "/home/cph/bqn-test/test.bqn" +fn ⇐ •Import "/home/cph/bqn-code/lib/fun.bqn" + +MAD ← (⌊´⊸=|∘-´¨)⊸/fn.Pairs + +# Tests +u.UnitTest (MAD 4‿1‿2‿3) ≡ ⟨⟨4,3⟩,⟨1,2⟩,⟨2,3⟩⟩ +u.UnitTest (MAD 1‿3‿7‿11‿15) ≡ ⟨⟨1,3⟩⟩ +u.UnitTest (MAD 1‿5‿3‿8) ≡ ⟨⟨1,3⟩,⟨5,3⟩⟩ |
