RosettaCodeData/Task/Y-combinator/Rebol/y-combinator-1.rebol
2026-04-30 12:34:36 -04:00

1 line
74 B
Text

Y: closure [g] [do func [f] [f :f] closure [f] [g func [x] [do f :f :x]]]