rf-web/vendor/bundle/gems/rouge-3.12.0/lib/rouge/demos/scheme
2019-10-21 10:18:17 +02:00

5 lines
117 B
Plaintext

(define Y
(lambda (m)
((lambda (f) (m (lambda (a) ((f f) a))))
(lambda (f) (m (lambda (a) ((f f) a)))))))