1  &fras ⊣ &args
 2  
 3  Solve ← (
 4    °⊟⇌
 5    -⊓(×4|ⁿ2.)
 6    ⟜(⌊√)
 7    =ⁿ2,
 8    +⊃-(◿2+++1)
 9  )
10  
11  ⊜(⊜⋕≠@ .↘+1⊗@:.)≠@\n.
12  ⊃(Solve ≡/(⋕⊂∩°⋕)) (/×≡Solve⍉)