From 17e0a74e7b8eda6cdaeb0a6240738eb32356fcb1 Mon Sep 17 00:00:00 2001 From: sterni Date: Tue, 6 Dec 2022 09:39:32 +0100 Subject: refactor(sterni/aoc/2022/05): improve parsing a bit By taking advantage of filling (ironically) we can avoid creating a spec in an ugly way. Additionally we transpose before parsing which doesn't really make all that much of a difference, though. Change-Id: Ida593138654f8367d666447f2b62013e8ddff01e Reviewed-on: https://cl.tvl.fyi/c/depot/+/7535 Reviewed-by: sterni Autosubmit: sterni Tested-by: BuildkiteCI --- users/sterni/exercises/aoc/2022/05/5.bqn | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'users/sterni/exercises') diff --git a/users/sterni/exercises/aoc/2022/05/5.bqn b/users/sterni/exercises/aoc/2022/05/5.bqn index bca18c1f63c2..b3d190b9fc77 100644 --- a/users/sterni/exercises/aoc/2022/05/5.bqn +++ b/users/sterni/exercises/aoc/2022/05/5.bqn @@ -3,8 +3,7 @@ rs‿rc ← (<"") SplitOn •FLines "../05/input" stacks ← { count ← '0'-˜⊑⌽' ' (≠/⊢) ⊑⌽rs - spec ← 0<(-1)↓(-1)⌽∾(∾⟜0‿0‿0)¨1+↕count - ' ' (≠/⊢)¨⥊⋈˘⍉>spec⊸/¨(-1)↓rs + ' ' (≠/⊢)¨⥊⋈˘ (count×4) ((»∘(0⊸=)∘(4⊸|)∘↕⊣)/↑) ⍉> (-1)↓rs } cmds ← {0‿1‿1-˜ ReadDec¨ ((∧´IsAsciiNum)¨/⊢) (<' ') SplitOn 𝕩}¨ rc -- cgit 1.4.1