_fix ← { 𝕩 ≡ 𝔽 𝕩 ? 𝕩 ; 𝕊 𝔽 𝕩 }
d←>'0'-˜•FLines"day09"

l←d<⌊´{∞⊸»˘⌾(⍉∘⌽⍟𝕩)d}¨↕4
•Out +´⥊(1+d)×l

s← (1+↕×´≢d)×⌾⥊ l
Rise←(d≠9)⊸×(»⌈«⌈«˘⌈»˘⌈⊣)
m←⥊ Rise _fix s
•Out ×´3↑∨≠¨⊔(m>0)/m


# m← ⥊ Rise⍟50 s
{
_fix ← { 𝕩 ≡ 𝔽 𝕩 ? 𝕩 ; 𝕊 𝔽 𝕩 }
•Out ×´3↑∨≠¨⊔(>⟜0 / ⊢) ⥊ ((d≠9)⊸× »⌈«⌈«˘⌈»˘⌈⊣) _fix (1+↕×´≢d)×⌾⥊l
}

# 512
# 1600104

# Rise←{(d≠9)×(»𝕩)⌈(«𝕩)⌈(«˘𝕩)⌈(»˘𝕩)⌈𝕩}
# l←d<(∞»˘⌾⍉d)⌊(∞«˘⌾⍉d)⌊(∞«˘d)⌊(∞»˘d)