[2022][bqn][5.0] parsing only

2 years ago · f8a61202fc
parent e666ab9344
commit f8a61202fc
1 changed files with 8 additions and 0 deletions
--- a/2022/bqn/day_05.bqn
+++ b/2022/bqn/day_05.bqn
@ -0,0 +1,8 @@
+Split ⇐ {𝕩⊔˜(⊢-˜+`×¬)0=≠¨𝕩}
+Transpose ⇐ =⊸{<⎉𝕨⍉⍟𝕨>𝕩}
+OnlyCrates ⇐ ∊⟜('A'+↕26)⊸/
+RejectEmpty ⇐ {((≠¨𝕩) > 0) / 𝕩}
+
+⟨stacks, moves⟩ ← Split •Flines "../day_05.txt"
+stacks ↩ RejectEmpty OnlyCrates¨ Transpose stacks
+•Show stacks