From 217582a34d4c47c5b0bc6e137e6019f2485b741f Mon Sep 17 00:00:00 2001
From: Brian Chu <brianmchu42@gmail.com>
Date: Wed, 30 Nov 2022 23:02:09 -0800
Subject: template scaffolding and day1 solution

---
 solutions/day1.fs | 19 +++++++++++++++++++
 1 file changed, 19 insertions(+)
 create mode 100644 solutions/day1.fs

(limited to 'solutions')

diff --git a/solutions/day1.fs b/solutions/day1.fs
new file mode 100644
index 0000000..0b2c519
--- /dev/null
+++ b/solutions/day1.fs
@@ -0,0 +1,19 @@
+namespace Solutions
+
+module Day1 =
+    open System.IO
+
+    let lines = File.ReadLines("inputs/day1.txt")
+    let totalWeights = seq {
+        let mutable subseq = 0
+
+        for line in lines do
+        if line.Equals("") then
+            yield subseq
+            subseq <- 0
+        else
+            subseq <- subseq + int line
+    }
+
+    let part1 () = totalWeights |> Seq.max
+    let part2 () = totalWeights |> Seq.sortDescending |> Seq.take 3 |> Seq.sum
-- 
cgit 1.4.1-2-gfad0