Scaffolding

This commit is contained in:
Smaug123
2023-12-07 23:55:46 +00:00
parent bcd2bb6349
commit afe82facb6
6 changed files with 94 additions and 0 deletions

View File

@@ -16,6 +16,7 @@
<Compile Include="Day5.fs" />
<Compile Include="Day6.fs" />
<Compile Include="Day7.fs" />
<Compile Include="Day8.fs" />
</ItemGroup>
</Project>

View File

@@ -0,0 +1,30 @@
namespace AdventOfCode2023
open System
open System.Globalization
[<RequireQualifiedAccess>]
module Day8 =
let parse (s : string) : ResizeArray<int> =
use mutable lines = StringSplitEnumerator.make '\n' s
let result = ResizeArray ()
while lines.MoveNext () do
if not lines.Current.IsEmpty then
use mutable line = StringSplitEnumerator.make' ' ' lines.Current
line.MoveNext () |> ignore
result.Add (3)
result
let part1 (s : string) =
let arr = parse s
let mutable answer = 0
answer
let part2 (s : string) =
let arr = parse s
let mutable answer = 0
answer