(((lambda () ((lambda (f) (f f)) (lambda (x) ((lambda (y) (lambda (n) (if (zero? n) 1 (* n (y (- n 1)))))) (lambda z (apply (x x) z)))))))5)
Y组合子，具体可以看看wiki
scheme实现匿名递归阶乘（Y组合子）,布布扣,bubuko.com
scheme实现匿名递归阶乘（Y组合子）
原文：http://my.oschina.net/firebroo/blog/295285
