2006-08-19 舞台裏 misc 誰も突っ込んでくれなかったので(無念)すっかり忘れてたけど。 (define X (lambda (x) (lambda (f) (f (lambda (y) (((x x) f) y)))))) (define Y (X X)) (define fact (lambda (f) (lambda (n) (if (< n 2) 1 (* n (f (- n 1))))))) (display ((Y fact) 10))Scheme はとても読みやすいです(棒読み