diff options
Diffstat (limited to 'day4/parse.TXT')
| -rw-r--r-- | day4/parse.TXT | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/day4/parse.TXT b/day4/parse.TXT new file mode 100644 index 0000000..f496de4 --- /dev/null +++ b/day4/parse.TXT @@ -0,0 +1,16 @@ +\START92\
+\COMMENT=Parses input to a list of binary numbers
+\NAME=parse
+\FILE=day4.parse.92f
+(numipts,patt)
+Func
+Local result,i
+
+newList(numipts)\->\result
+For i,1,numipts
+ parseln(expr(patt&string(i)))\->\result[i]
+EndFor
+result
+EndFunc
+
+\STOP92\
|
