From 3f2172556a8b83abe5b6f760fabae5d766a50a05 Mon Sep 17 00:00:00 2001 From: sterni Date: Mon, 5 Dec 2022 22:40:16 +0100 Subject: refactor(sterni/aoc/2022/05): improve _ApplyCmd * take advantage of block header for destructuring * instead of ModestTake we can split the stack we are picking from into what we need to move and what to keep, saving us from having to repeat ourselves. * remove some unnecessary parens Change-Id: I1b81a93a27d14dcbb6bdd109e862a356f611aca9 Reviewed-on: https://cl.tvl.fyi/c/depot/+/7530 Tested-by: BuildkiteCI Reviewed-by: sterni Autosubmit: sterni --- users/sterni/exercises/aoc/2022/05/5.bqn | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) (limited to 'users/sterni') diff --git a/users/sterni/exercises/aoc/2022/05/5.bqn b/users/sterni/exercises/aoc/2022/05/5.bqn index e65975db94..bca18c1f63 100644 --- a/users/sterni/exercises/aoc/2022/05/5.bqn +++ b/users/sterni/exercises/aoc/2022/05/5.bqn @@ -9,11 +9,10 @@ stacks ← { cmds ← {0‿1‿1-˜ ReadDec¨ ((∧´IsAsciiNum)¨/⊢) (<' ') SplitOn 𝕩}¨ rc -ModestTake ← ↑⍟(<⟜≠) _ApplyCmd ← { - c‿f‿t ← 𝕩 - m ← 𝔽 c ModestTake f⊑𝕨 - (m⊸∾)⌾(t⊸⊑) (c⊸↓)⌾(f⊸⊑)𝕨 + s Fn _self c‿f‿t : + m‿k ← 2↑ c ((≤⟜(↕≠))⊔⊢) f⊑s + (Fn m)⊸∾⌾(t⊸⊑) k˙⌾(f⊸⊑) s } •Out "day05.1: "∾⊑¨stacks ⌽_ApplyCmd˜´ ⌽ cmds -- cgit 1.4.1