6 lines
325 B
Text
6 lines
325 B
Text
Set ← ⍜⊡⋅2++¯1ׯ1⊙⊸△ ⟜⍜⊡⋅1
|
||
HasSpace ← >0/+♭⌕0
|
||
N₄ ← [1_0 0_1 ¯1_0 0_¯1]
|
||
Nexts ← ◴≡⌟Set▽=0◡⬚¯1⊡♭₂⊞+N₄⊚⊸⌕1
|
||
Cuts ← ◴≡⊣path(□◴/◇⊂≡(□Nexts)°□|¬HasSpace°□) □[Set 0_0] ↯⊙0
|
||
≡(&s&p⊸⧻°□⊢Cuts) [2_3 3_4 4_5]
|