1 files changed, 10 insertions, 0 deletions
diff --git a/impls/num-gen.el b/impls/num-gen.el
new file mode 100644
index 0000000..e0ba7e0
--- /dev/null
+++ b/impls/num-gen.el
@@ -0,0 +1,10 @@
+(defconst *LIST-SIZE* 128)
+(defconst *UPPER-BOUND* 1024)
+(with-current-buffer (find-file "nums.txt")
+  (mapcar
+   #'(lambda (res) (insert (format "%s\n" res)))
+   (cl-remove-duplicates
+    (cl-loop
+     for i from 0 to *LIST-SIZE*
+     collect
+     (random *UPPER-BOUND*)))))