RosettaCodeData/Task/Y-combinator/J/y-combinator-6.j
2019-09-12 10:33:56 -07:00

1 line
56 B
Text

YX=. (1 :'('':''<@;(1;~":0)<@;<@((":0)&;))u')($:`)(`:6)