Merge branch 'main' of https://github.com/rtoal/ple

abortsdafsdfsdf

the commit.

Author: Undalevein

cobol/EasyTriples.cob

@@ -0,0 +1,20 @@
+IDENTIFICATION DIVISION.
+PROGRAM-ID. Triples.
+
+DATA DIVISION.
+WORKING-STORAGE SECTION.
+01 A PIC 9(2).
+01 B PIC 9(2).
+01 C PIC 9(2).
+
+PROCEDURE DIVISION.
+    PERFORM VARYING C FROM 1 BY 1 UNTIL C > 40
+        PERFORM VARYING B FROM 1 BY 1 UNTIL B > C
+            PERFORM VARYING A FROM 1 BY 1 UNTIL A > B
+                IF A * A + B * B EQUAL TO C * C
+                    DISPLAY A, ', ', B, ', ', C
+                END-IF
+            END-PERFORM
+        END-PERFORM
+    END-PERFORM.
+    STOP RUN.

io/triple.io

@@ -1,5 +1,5 @@
 for(c, 1, 40,
   for(b, 1, c-1,
     for(a, 1, b-1,
-      (a**2 + b**2 == c**2) ifTrue(
+      if(a**2 + b**2 == c**2,
         list(a, b, c) join(", ") println))))

lua/README.md

@@ -2,7 +2,7 @@
 
 # Lua Explorations
 
-To build and run Lua programs on your local machine, download and install the Lua system from the [Lua downlaods page](https://www.lua.org/download.html) or use your favorite package manager.
+To build and run Lua programs on your local machine, download and install the Lua system from the [Lua downloads page](https://www.lua.org/download.html) or use your favorite package manager.
 
 Once installed, programs in this folder can be run from the command line like so:
 
@@ -37,16 +37,19 @@ Continue your study of Lua via:
 - [Awesome Lua](https://github.com/LewisJEllis/awesome-lua)
 - [Lua Home](http://www.lua.org/)
 - [List of Lua Books](http://www.lua.org/docs.html#books)
-- [Lua Reference Manual](http://www.lua.org/manual/5.4/)
-- [The book _Programming in Lua_ by Lua’s creator, Roberto Ierusalimschy](http://www.lua.org/pil/)
+- [Lua Reference Manual](http://www.lua.org/manual/)
+- The book [_Programming in Lua_](http://www.lua.org/pil/) by Lua’s creator, Roberto Ierusalimschy
 - [List of Lua Books](https://realtoughcandy.com/best-lua-books/)
 - [List of video games scripted in Lua](<https://en.wikipedia.org/wiki/Category:Lua_(programming_language)-scripted_video_games>)
 
 ## Lua Open Source Projects
 
 Studying, and contributing to, open source projects is an excellent way to improve your proficiency in any language. Of the many projects using Lua, you may enjoy:
 
+- [Trending Lua Repositories on GitHub](https://github.com/trending/lua)
+- [Top 100 Starred Lua Repositories on GitHub](https://github.com/EvanLi/Github-Ranking/blob/master/Top100/Lua.md)
 - [Luvit](https://github.com/luvit/luvit)
+- [KOReader](https://github.com/koreader/koreader)
 - [CorsixTH](https://github.com/CorsixTH/CorsixTH)
 - [termtris](https://github.com/tylerneylon/termtris)
 - [PacPac](https://github.com/tylerneylon/pacpac)

lua/test.sh

@@ -3,7 +3,10 @@ lua anagrams.lua rats | diff ../test/rats_heap_expected - && \
 lua and_or_demo.lua && \
 lua basic_latin_wordcount.lua < ../test/wordcount_ascii_input | diff ../test/wordcount_ascii_expected -  && \
 lua binding.lua && \
+lua character_counts.lua && \
+lua clockhands.lua && \
 lua coroutine_demo.lua && \
+lua coroutine_wrap_demo.lua && \
 lua delegation_example.lua && \
 lua errors.lua && \
 lua exploring_parameters.lua && \

lua/vectors.lua

@@ -1,33 +1,33 @@
-Vector = (function (class, meta, prototype)
+Vector = (function (class)
+  local meta = {
+    __add = function(self, v)
+      return class.new(self.i + v.i, self.j + v.j)
+    end,
+    __mul = function(self, v)
+      return self.i * v.i + self.j * v.j
+    end,
+    __tostring = function(self)
+      return string.format("<%g,%g>", self.i, self.j)
+    end,
+    __index = {
+      magnitude = function(self)
+        return math.sqrt(self.i * self.i + self.j * self.j)
+      end
+    },
+  }
+
   class.new = function (i, j)
     return setmetatable({i = i, j = j}, meta)
   end
 
-  prototype.magnitude = function (self)
-    return math.sqrt(self.i * self.i + self.j * self.j)
-  end
-
-  meta.__index = prototype
-
-  meta.__add = function (self, v)
-    return class.new(self.i + v.i, self.j + v.j)
-  end
-
-  meta.__mul = function (self, v)
-    return self.i * v.i + self.j * v.j
-  end
-
-  meta.__tostring = function (self)
-    return string.format('<%g,%g>', self.i, self.j)
-  end
-
   return class
-end)({}, {}, {})
+end)({})
 
 u = Vector.new(3, 4)
 v = Vector.new(-5, 10)
 assert(tostring(u) == "<3,4>")
 assert(tostring(v) == "<-5,10>")
+assert(u.i == 3)
 assert(u.j == 4)
 assert(u:magnitude() == 5.0)
 assert(tostring(u + v) == "<-2,14>")