/ Uiua / 2023 / 17.ua
17.ua
 1  &fras ⊣ &args
 2  
 3  ⊜≡⋕≠@\n.
 4  
 5  Neis  ← [∩¯,,⊸⇌⇡2]
 6  Valid ← /××≥0⟜>⊙△
 7  
 8  Line ← +⍉⬚0≡⍜⌵⇡⊃-¤
 9  
10  Next ← (
11    ▽≠0◿2⊸+:⇡4°⊂
12    ♭₂⊞⊂⊙⊃⋅⋅∘⊙.
13    ⊙⟜:
14    ≡(⟜(+×⊏⊙Neis)°⊟)⊙¤
15    ∩▽,⊙(:⟜≡Valid|¤)
16    ⊙⟜(≡(/+⊡Line)⊙∩¤)
17    :⍉⊂⊙⍉
18  )
19  
20  Solve ← ◌path(Next|≍+1⊙△↘1)∞_0_0 :⍜-⇡⊙(+1)
21  
22  ⊃(Solve 4 10|Solve 1 3)