From 9621add2918cc4943e6693b74ae85d51dd264fcf Mon Sep 17 00:00:00 2001 From: David Walter Seikel Date: Mon, 21 Apr 2014 20:59:39 +1000 Subject: We don't need the testlua directory any more. --- .../yueliang-0.4.1/test_lua/5.1/factorial.lua | 32 ---------------------- 1 file changed, 32 deletions(-) delete mode 100644 LuaSL/testLua/yueliang-0.4.1/test_lua/5.1/factorial.lua (limited to 'LuaSL/testLua/yueliang-0.4.1/test_lua/5.1/factorial.lua') diff --git a/LuaSL/testLua/yueliang-0.4.1/test_lua/5.1/factorial.lua b/LuaSL/testLua/yueliang-0.4.1/test_lua/5.1/factorial.lua deleted file mode 100644 index 7c4cf0f..0000000 --- a/LuaSL/testLua/yueliang-0.4.1/test_lua/5.1/factorial.lua +++ /dev/null @@ -1,32 +0,0 @@ --- function closures are powerful - --- traditional fixed-point operator from functional programming -Y = function (g) - local a = function (f) return f(f) end - return a(function (f) - return g(function (x) - local c=f(f) - return c(x) - end) - end) -end - - --- factorial without recursion -F = function (f) - return function (n) - if n == 0 then return 1 - else return n*f(n-1) end - end - end - -factorial = Y(F) -- factorial is the fixed point of F - --- now test it -function test(x) - io.write(x,"! = ",factorial(x),"\n") -end - -for n=0,16 do - test(n) -end -- cgit v1.1