This commit is contained in:
mrbkap%gmail.com 2006-05-02 00:20:31 +00:00
Родитель 8b5b26f403
Коммит 28917bc948
1 изменённых файлов: 5 добавлений и 5 удалений

Просмотреть файл

@ -2,16 +2,16 @@
function factorial(proc) {
return function (n) {
return (n <= 1) ? 1 : n * proc(n-1);
return (n <= 1) ? 1 : n * proc(n-1);
}
}
function Y(outer) {
function inner(proc) {
function apply(arg) {
return proc(proc)(arg);
}
return outer(apply);
function apply(arg) {
return proc(proc)(arg);
}
return outer(apply);
}
return inner(inner);
}