From 377dc5dec49f9ce8d624d7f052fdfb510feb2373 Mon Sep 17 00:00:00 2001
From: rzuckerm <rzdulc@gmail.com>
Date: Sat, 14 Mar 2026 19:38:06 -0500
Subject: [PATCH 1/2] Add Baklava in ALGOL 60

---
 archive/a/algol60/baklava.alg | 19 +++++++++++++++++++
 1 file changed, 19 insertions(+)
 create mode 100644 archive/a/algol60/baklava.alg

diff --git a/archive/a/algol60/baklava.alg b/archive/a/algol60/baklava.alg
new file mode 100644
index 000000000..1fca45313
--- /dev/null
+++ b/archive/a/algol60/baklava.alg
@@ -0,0 +1,19 @@
+begin
+    procedure outRepeatString(n, s);
+    integer n;
+    string s;
+    begin
+        integer i;
+        for i := 1 step 1 until n do outstring(1, s)
+    end outRepeatString;
+
+    integer i, numspaces, numstars;
+    for i := -10 step 1 until 10 do
+    begin
+        numspaces := abs(i);
+        numstars := 21 - 2 * numspaces;
+        outRepeatString(numspaces, " ");
+        outRepeatString(numstars, "*");
+        outstring(1, "\n")
+    end
+end

From 80b2eab0f1ec1b2fe206c1fd07c1010d97bd40bf Mon Sep 17 00:00:00 2001
From: rzuckerm <rzdulc@gmail.com>
Date: Sat, 14 Mar 2026 20:18:49 -0500
Subject: [PATCH 2/2] Add value statement

---
 archive/a/algol60/baklava.alg | 1 +
 1 file changed, 1 insertion(+)

diff --git a/archive/a/algol60/baklava.alg b/archive/a/algol60/baklava.alg
index 1fca45313..aba8b5151 100644
--- a/archive/a/algol60/baklava.alg
+++ b/archive/a/algol60/baklava.alg
@@ -1,5 +1,6 @@
 begin
     procedure outRepeatString(n, s);
+    value n;
     integer n;
     string s;
     begin