From 967e964f453fc031816270b90d6eab38410769a3 Mon Sep 17 00:00:00 2001
From: Tomasz Chojnacki <tomaszchojnacki2001@gmail.com>
Date: Fri, 9 Dec 2022 19:31:24 +0100
Subject: Extract common functions to util module

---
 aoc-2022-dotnet/Day06/Day06.fsproj | 4 ++++
 aoc-2022-dotnet/Day06/Program.fs   | 3 ++-
 2 files changed, 6 insertions(+), 1 deletion(-)

(limited to 'aoc-2022-dotnet/Day06')

diff --git a/aoc-2022-dotnet/Day06/Day06.fsproj b/aoc-2022-dotnet/Day06/Day06.fsproj
index 249287d..e7e4a65 100644
--- a/aoc-2022-dotnet/Day06/Day06.fsproj
+++ b/aoc-2022-dotnet/Day06/Day06.fsproj
@@ -12,4 +12,8 @@
     <Compile Include="Program.fs" />
   </ItemGroup>
 
+  <ItemGroup>
+    <ProjectReference Include="..\Common\Common.fsproj" />
+  </ItemGroup>
+
 </Project>
diff --git a/aoc-2022-dotnet/Day06/Program.fs b/aoc-2022-dotnet/Day06/Program.fs
index c9f6568..78902cd 100644
--- a/aoc-2022-dotnet/Day06/Program.fs
+++ b/aoc-2022-dotnet/Day06/Program.fs
@@ -1,10 +1,11 @@
 module Day06
 
 open System.IO
+open Common
 
 let solution n =
     Seq.windowed n
-    >> Seq.findIndex (Set >> Set.count >> (=) n)
+    >> Seq.findIndex (Util.countDistinct >> (=) n)
     >> (+) n
 
 assert
-- 
cgit v1.2.3