RosettaCodeData/Task/Y-combinator/J/y-combinator-7.j

Y=. '('':''<@;(1;~":0)<@;<@((":0)&;))'(2 : 0 '')
  (1 : (m,'u'))(1 : (m,'''u u`:6('',(5!:5<''u''),'')`:6 y'''))(1 :'u u`:6')
)
Data update 2024-10-16 18:07:41 -07:00			`Y=. '('':''<@;(1;~":0)<@;<@((":0)&;))'(2 : 0 '')`
			(1 : (m,'u'))(1 : (m,'''u u`:6('',(5!:5<''u''),'')`:6 y'''))(1 :'u u`:6')
			`)`