This website requires JavaScript.
Explore
Help
Register
Sign in
aparler
/
RosettaCodeData
Watch
1
Star
0
Fork
You've already forked RosettaCodeData
0
Code
Issues
12
Pull requests
3
Projects
Releases
Packages
Wiki
Activity
Actions
master
RosettaCodeData
/
Task
/
Y-combinator
/
Racket
/
y-combinator-2.rkt
4 lines
117 B
Racket
Raw
Permalink
Normal View
History
Unescape
Escape
Sync
2013-10-27 22:24:23 +00:00
#lang
racket
September Morn Update
2019-09-12 10:33:56 -07:00
(
define
Y
(
λ
(
b
)
(
(
λ
(
f
)
(
b
(
λ
(
x
)
(
(
f
f
)
x
)
)
)
)
(
λ
(
f
)
(
b
(
λ
(
x
)
(
(
f
f
)
x
)
)
)
)
)
)
)
Reference in a new issue
Copy permalink
