diff --git a/aoc.bqn b/aoc.bqn index 428eeeb..7e25554 100644 --- a/aoc.bqn +++ b/aoc.bqn @@ -12,12 +12,12 @@ Day1 ⇐ (⊑ ⋈ (+´3⊸↑))∘(∨+´¨)∘Split∘(•BQN⎊0¨)∘•FLine Day2 ⇐ { B ← ⊣ (A ← {1+𝕩+3×3|1+𝕩-𝕨}) {3|𝕨+𝕩-1} - +´˘⍉ (A≍B)´∘{a‿s‿b:⟨a-'A',b-'X'⟩}˘ >•FLines 𝕩 + +´ (A⋈B)´∘{"AX"-˜0‿2⊏𝕩}¨ •FLines 𝕩 } # ⟨ 17189 13490 ⟩ Day3 ⇐ { - Prio ← ⊢ - ⊑⟜"`&"∘(≤⟜'Z') + Prio ← ⊢ - ≤⟜'Z'◶"`&" A ← +´∘∾ {(Prio¨×∊⟜𝕩)𝕨}○⍷´∘(<˘ 2‿∘⊸⥊)¨ B ← +´∘∾ {a‿b‿c:(Prio¨a)×b∧○(a⊸∊)c}¨∘(3⊸Chunk)∘(⍷¨) (A⋈B) •FLines 𝕩 @@ -25,10 +25,10 @@ Day3 ⇐ { # ⟨ 7683 2488 ⟩ Day4 ⇐ { - Line ← •BQN∘> '‿'⍟(∊⟜"-,")¨ # hehe - F ← {∨´∧´˘≥´⎉1(2¨↕3)⥊𝕩⊏˜𝕨-'a'} + Line ← •BQN '‿'⍟(⊑∊⟜"-,")¨ # hehe + F ← {∨´∧´˘≥´⎉1(3⥊2)⥊𝕩⊏˜𝕨-'a'} A ← "cabddbac"⊸F, B ← "cabcacda"⊸F - +´(A⋈B)∘Line¨•FLines 𝕩 + +´ (A⋈B)∘Line¨ •FLines 𝕩 } # ⟨ 536 845 ⟩ # •Show Day4 ⊑•args