irtaylor/ycombinator.scm

Created November 20, 2017 14:08

Star (0) You must be signed in to star a gist
Fork (0) You must be signed in to fork a gist

Select an option

Learn more about clone URLs
Clone this repository at <script src="https://gist.github.com/irtaylor/44e7d03c1aa9d5f82abb9be532288d3c.js"></script>
Save irtaylor/44e7d03c1aa9d5f82abb9be532288d3c to your computer and use it in GitHub Desktop.

Download ZIP

implementation (from memory) of the applicative order Y combinator

Raw

ycombinator.scm

	; Applicative Order Y-Combinator
	(define Y
	(lambda (f)
	((lambda (x) (x x))
	(lambda (x) (f (lambda (y) ((x x) y)))))))

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment