6 lines
292 B
BQN
6 lines
292 B
BQN
in←•ParseFloat¨¨' '⊸((¬-˜⊢×·+`»⊸>)∘≠⊔⊢)¨•FLines"input"
|
||
Sorted←∧⊸≡∨∨⊸≡
|
||
Step←∧´∘(1⊸≤∧≤⟜3)(|1⊸(↓--⊸↓))
|
||
•Show +´(Sorted∧Step)¨in
|
||
Expand←(↕≠)(∾↑⋈1⊸+⊸↓)⌜<
|
||
•Show +´∨´¨(Sorted∧Step)¨¨Expand¨in
|