5 lines
218 B
BQN
5 lines
218 B
BQN
|
c ← "=-012"
|
|||
|
|
F ← +´∘(⊢×(5⊸⋆)∘⌽∘↕∘≠)∘(-⟜2)∘(c⊸⊐)
|
|||
|
|
T ← {c⊏˜5|2+𝕩 {(⌊5÷˜𝕨+2) (𝕊⟜(𝕨⊸∾))⍟(0<𝕨) 𝕩} ⟨⟩}
|
|||
|
|
•Out "day25.1: "∾T +´F¨ •FLines "input"
|