From efc118b553f1f6854148a01b4824f47a82a9798c Mon Sep 17 00:00:00 2001
From: Conor Hoekstra <codereport@outlook.com>
Date: Sat, 15 Nov 2025 21:07:53 -0500
Subject: :sparkles: Week 347 in BQN

---
 challenge-347/conor-hoekstra/ch-1.bqn | 16 ++++++++++++++++
 challenge-347/conor-hoekstra/ch-2.bqn | 17 +++++++++++++++++
 2 files changed, 33 insertions(+)
 create mode 100644 challenge-347/conor-hoekstra/ch-1.bqn
 create mode 100644 challenge-347/conor-hoekstra/ch-2.bqn

diff --git a/challenge-347/conor-hoekstra/ch-1.bqn b/challenge-347/conor-hoekstra/ch-1.bqn
new file mode 100644
index 0000000000..c6962a357d
--- /dev/null
+++ b/challenge-347/conor-hoekstra/ch-1.bqn
@@ -0,0 +1,16 @@
+# For up to date code:
+# https://github.com/codereport/bqn-code/blob/main/pwc/347-1.bqn
+
+u ⇐ •Import "/home/cph/bqn-test/test.bqn"
+s ⇐ •Import "/home/cph/bqn-code/lib/string.bqn"
+
+months ← ""‿"Jan"‿"Feb"‿"Mar"‿"Apr"‿"May"‿"Jun"‿"Jul"‿"Aug"‿"Sep"‿"Oct"‿"Nov"‿"Dec"
+Pad    ← (1=≠)◶⟨⊢,"0"⊸∾⟩
+Format ← { 𝕊d‿m‿y: "-" s.Join ⟨y,Pad•Fmt⊑months⊐⋈m,Pad ¯2↓d⟩ } s.Words
+
+# Tests
+u.UnitTest (Format  "1st Jan 2025") ≡ "2025-01-01"
+u.UnitTest (Format "22nd Feb 2025") ≡ "2025-02-22"
+u.UnitTest (Format "15th Apr 2025") ≡ "2025-04-15"
+u.UnitTest (Format "23rd Oct 2025") ≡ "2025-10-23"
+u.UnitTest (Format "31st Dec 2025") ≡ "2025-12-31"
diff --git a/challenge-347/conor-hoekstra/ch-2.bqn b/challenge-347/conor-hoekstra/ch-2.bqn
new file mode 100644
index 0000000000..8ccb7f2339
--- /dev/null
+++ b/challenge-347/conor-hoekstra/ch-2.bqn
@@ -0,0 +1,17 @@
+# For up to date code:
+# https://github.com/codereport/bqn-code/blob/main/pwc/347-2.bqn
+
+u ⇐ •Import "/home/cph/bqn-test/test.bqn"
+s ⇐ •Import "/home/cph/bqn-code/lib/string.bqn"
+
+Hj     ← '-'⊸s.Join
+Last   ← (2-˜≠)◶⟨⋈,⋈,2⊸(↑⋈↓)⟩
+Rec    ← { 4≥≠𝕩 ? ⋈ Hj Last 𝕩 ; (⋈3↑𝕩)∾𝕊3↓𝕩 } 
+Format ← Hj·Rec(¬∊⟜"- ")⊸/
+
+# Tests
+u.UnitTest (Format "1-23-45-6")   ≡ "123-456"
+u.UnitTest (Format "1234")        ≡ "12-34"
+u.UnitTest (Format "12 345-6789") ≡ "123-456-789"
+u.UnitTest (Format "123 4567")    ≡ "123-45-67"
+u.UnitTest (Format "123 456-78")  ≡ "123-456-78"
-- 
cgit