1  &fras ⊣ &args
2  
3  Expand ← ▽:∩(♭₋₁)⊞⊟∩(\++1×-1:/׬)⍉,,,
4  
5  =@#⊜∘≠@\n.
6  ⊃(Expand 1000000)(Expand 2)
7  ∩(÷2/+♭⊞(/+⌵-).)