From a66637f07937337ae048b18a4c8beadf4a82e887 Mon Sep 17 00:00:00 2001
From: chirvasitua <chirvasitua@gmail.com>
Date: Fri, 16 Jul 2021 17:52:36 -0400
Subject: 1st commit on 072_lua

---
 challenge-072/stuart-little/lua/ch-1.lua | 14 ++++++++++++++
 challenge-072/stuart-little/lua/ch-2.lua | 16 ++++++++++++++++
 2 files changed, 30 insertions(+)
 create mode 100755 challenge-072/stuart-little/lua/ch-1.lua
 create mode 100755 challenge-072/stuart-little/lua/ch-2.lua

diff --git a/challenge-072/stuart-little/lua/ch-1.lua b/challenge-072/stuart-little/lua/ch-1.lua
new file mode 100755
index 0000000000..0515cf6461
--- /dev/null
+++ b/challenge-072/stuart-little/lua/ch-1.lua
@@ -0,0 +1,14 @@
+#!/usr/bin/env lua
+
+-- run <script> <number>
+
+function factExp(n,p)
+   local s,frct=0,n/p
+   while frct >= 1 do
+      s=s+math.floor(frct)
+      frct=frct/p
+   end
+   return s
+end
+
+print(math.min(factExp(arg[1],2),factExp(arg[1],5)))
diff --git a/challenge-072/stuart-little/lua/ch-2.lua b/challenge-072/stuart-little/lua/ch-2.lua
new file mode 100755
index 0000000000..9c7d4bb302
--- /dev/null
+++ b/challenge-072/stuart-little/lua/ch-2.lua
@@ -0,0 +1,16 @@
+#!/usr/bin/env lua
+
+-- run <script> <file 1st-line-nr 2nd-line-nr>
+
+function lnRng(pth,l1,l2)
+   local ix,lns=0,{}
+   for l in io.lines(pth) do
+      ix=ix+1
+      if ix>=l1 and ix<=l2 then table.insert(lns,l) end
+   end
+   return lns
+end
+
+for _,l in ipairs(lnRng(arg[1],tonumber(arg[2]),tonumber(arg[3]))) do
+   print(l)
+end
-- 
cgit