From 375169efa68219af7e53ab24b10cfb8e5ee988ab Mon Sep 17 00:00:00 2001
From: Andreas Grois <andi@grois.info>
Date: Fri, 19 Dec 2025 22:20:34 +0100
Subject: Day5

---
 day5/part1.TXT | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)
 create mode 100644 day5/part1.TXT

(limited to 'day5/part1.TXT')

diff --git a/day5/part1.TXT b/day5/part1.TXT
new file mode 100644
index 0000000..9dca82a
--- /dev/null
+++ b/day5/part1.TXT
@@ -0,0 +1,24 @@
+\START92\
+\COMMENT=Single file dated Fri Dec 19 22:13:02 20
+\NAME=part1
+\FILE=day5.part1.92f
+(rs,vs)
+Func
+Local lowerb,upperb,dimb,dimv,i,t,result
+mat\to\list(rs[1])\->\lowerb
+mat\to\list(rs[2])\->\upperb
+dim(lowerb)\->\dimb
+dim(vs)\->\dimv
+
+0\->\result
+
+For i,1,dimv
+ init(dimb,vs[i])\->\t
+ If any(t\>=\lowerb and t\<=\upperb) Then
+  result+1\->\result
+ EndIf
+EndFor
+result
+EndFunc
+
+\STOP92\
-- 
cgit v1.2.3