3 lines
65 B
Scheme
3 lines
65 B
Scheme
(define Y2r
|
|
(lambda (f)
|
|
(lambda a (apply (f (Y2r f)) a))))
|
(define Y2r
|
|
(lambda (f)
|
|
(lambda a (apply (f (Y2r f)) a))))
|