From 34d27f7ec8e539037061fd999487bab2737076aa Mon Sep 17 00:00:00 2001
From: cassowarii <cassowary@cassowary.me>
Date: Fri, 10 Jul 2026 16:16:15 -0700
Subject: [PATCH] project euler #6

---
 sample/project_euler/pe06.sa | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)
 create mode 100644 sample/project_euler/pe06.sa

diff --git a/sample/project_euler/pe06.sa b/sample/project_euler/pe06.sa
new file mode 100644
index 0000000..6c32957
--- /dev/null
+++ b/sample/project_euler/pe06.sa
@@ -0,0 +1,21 @@
+def sum list {
+  let acc = 0
+  list.each => elem {
+    acc = acc + elem
+  }
+  acc
+}
+
+def square num {
+  num * num
+}
+
+def sum_squares list {
+  list.map(square) | sum _
+}
+
+def square_sum list {
+  sum list | square _
+}
+
+list::iota 1, 101 | (square_sum _) - (sum_squares _) | println _
-- 
1.8.3.1