patrick/advent-of-code-2023
1
0
Fork 0
Code Issues Pull Requests 2 Packages Releases Activity

Add alternative

Browse Source
This commit is contained in:
Smaug123
2023-12-04 23:46:38 +00:00
parent 65b82a3f74
commit b063bce19a
1 changed files with 6 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
AdventOfCode2023.FSharp/AdventOfCode2023.FSharp.Lib/Day4.fs
View File

@@ -1,16 +1,17 @@
namespace AdventOfCode2023 namespace AdventOfCode2023
open System open System
open System.Globalization
[<RequireQualifiedAccess>] [<RequireQualifiedAccess>]
module Day4 = module Day4 =
let inline parseByte (chars : ReadOnlySpan<char>) : byte = let inline parseByte (chars : ReadOnlySpan<char>) : byte =
// Byte.Parse (chars, NumberStyles.None, NumberFormatInfo.InvariantInfo) Byte.Parse (chars, NumberStyles.None, NumberFormatInfo.InvariantInfo)
let mutable answer = 0uy //let mutable answer = 0uy
for c in chars do //for c in chars do
answer <- answer * 10uy + (byte c - 48uy) // answer <- answer * 10uy + (byte c - 48uy)
answer //answer
let part1 (s : string) = let part1 (s : string) =
use lines = StringSplitEnumerator.make '\n' s use lines = StringSplitEnumerator.make '\n' s