Lua

1 files changed, 25 insertions, 0 deletions

diff --git a/gcd.lua b/gcd.lua
new file mode 100755
index 0000000..1e6352c
--- /dev/null
+++ b/gcd.lua
@@ -0,0 +1,25 @@
+#!/usr/bin/env lua
+
+-- SYNOSPSIS:
+-- # chmod +x gcd.lua; ./gcd.lua 121 22 33 44
+-- # lua gcd.lua 121 33 22
+
+-- http://www.lua.org/pil/6.3.html
+function gcd2(a, b)
+    if b == 0 then
+        return a
+    else
+        return gcd2(b, a % b)
+    end
+end
+
+function gcdn(ns)
+    r = ns[1]
+    for i = 2, table.maxn(ns) do
+        r = gcd2(r, ns[i])
+    end
+    return r
+end
+
+print(gcdn(arg))
+