RosettaCodeData/Task/Y-combinator/Slate/y-combinator.slate

4 lines
142 B
Plaintext

Method traits define: #Y &builder:
[[| :f | [| :x | f applyWith: (x applyWith: x)]
applyWith: [| :x | f applyWith: (x applyWith: x)]]].