Input ← (
  $
  =@@ ⊜∘ ⊸≠@\n
)

A ← (
  ↯∞_3_3⬚0⧈∘[3_3 1_1 1_1]
  ↯⊟∞√⊸⧻× ≡(<₅/+♭) ⟜≡(⊡1_1)
)

# part one
# /+♭ A Input

# part two
Input
# =@@ ⊜∘ ⊸≠@\n &fras "day_04.txt"
⍥(⊸׬⊸A)∞
˜- ∩(/+♭) ⊃⊢⊣
# ⊃(⇌≡▽₂4)(˜- ∩(/+♭) ⊃⊢⊣)