From c3ff98ee4aa79bcaa07c8a478e96539c2a512e73 Mon Sep 17 00:00:00 2001
From: Jesse Luehrs <doy@tozt.net>
Date: Thu, 14 May 2009 19:51:41 -0500
Subject: rename files for better sorting

---
 021.lua | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)
 create mode 100644 021.lua

(limited to '021.lua')

diff --git a/021.lua b/021.lua
new file mode 100644
index 0000000..d4a5334
--- /dev/null
+++ b/021.lua
@@ -0,0 +1,24 @@
+function d(n)
+    if n < 2 then return 0 end
+    local ret = 1
+    local test = 2
+    local limit = math.sqrt(n)
+    while test < limit do
+        if n % test == 0 then
+            ret = ret + test + n / test
+        end
+        test = test + 1
+    end
+    if limit == math.floor(limit) then ret = ret + limit end
+    return ret
+end
+
+local sum = 0
+for i = 1, 9999 do
+    local di = d(i)
+    if d(di) == i and i ~= di then
+        print(i .. ": " .. di)
+        sum = sum + i
+    end
+end
+print(sum)
-- 
cgit v1.2.3-54-g00ecf