5 lines
99 B
Text
5 lines
99 B
Text
|
maxSS2=:monad define
|
||
|
|
start=. (i. >./) (0>.+)/\. y
|
||
|
|
({.~ # |&>: [: (i.>./@,&0) +/\) y}.~start
|
||
|
|
)
|