10 lines
128 B
Text
10 lines
128 B
Text
|
Y=:2 :0(0 :0)
|
||
|
|
NB. this block will be n in the second part
|
||
|
|
:
|
||
|
|
g=. x&(x`:6)
|
||
|
|
(5!:1<'g') u y
|
||
|
|
)
|
||
|
|
f=. u (1 :n)
|
||
|
|
(5!:1<'f') f y
|
||
|
|
)
|