1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000 1.2 +++ b/js/src/Y.js Wed Dec 31 06:09:35 2014 +0100 1.3 @@ -0,0 +1,14 @@ 1.4 +/* This Source Code Form is subject to the terms of the Mozilla Public 1.5 + * License, v. 2.0. If a copy of the MPL was not distributed with this 1.6 + * file, You can obtain one at http://mozilla.org/MPL/2.0/. */ 1.7 + 1.8 +// The Y combinator, applied to the factorial function 1.9 + 1.10 +// Return the function that is the fixed point of f. 1.11 +var Y = f => (x => f(v => x(x)(v))) 1.12 + (x => f(v => x(x)(v))); 1.13 + 1.14 +// The factorial function is the fixed point of this: 1.15 +var f = fac => n => (n <= 1) ? 1 : n * fac(n - 1); 1.16 + 1.17 +print("5! is " + Y(f)(5));