From: Ben Harris <bjh21@bjh21.me.uk>
Date: Fri, 3 May 2024 09:00:37 +0000 (+0100)
Subject: 03a done
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~bjharris/git?a=commitdiff_plain;h=14135aed5308b400e6d9ebb8c2b5430fa78f8629;p=aoc-2022.git

03a done
---

diff --git a/03/03a.bqn b/03/03a.bqn
index 3527dac..9141ad3 100644
--- a/03/03a.bqn
+++ b/03/03a.bqn
@@ -1,9 +1,12 @@
 Split←{⟨2,∘⟩⥊𝕩}         # Split rucksack into compartments.
 Intersect←{(𝕨∊𝕩)/𝕨}     # Find elements of 𝕨 that are in 𝕩.
-Priority←{1+𝕩-'a'}      # XXX Get priority of an item.
 
-Process1←{Priority⊑Intersect˝Split𝕩}
+Process1←{⊑Intersect˝Split𝕩}
 
-Main←Process1¨
+PriorityLC←{( 1+𝕩-'a')×(𝕩≥'a')∧(𝕩≤'z')}
+PriorityUC←{(27+𝕩-'A')×(𝕩≥'A')∧(𝕩≤'Z')}
+Priority←PriorityLC+PriorityUC
+
+Main←+´(Priority Process1¨)
 
 •Show Main •file.Lines ⊑•args