Cleaning
authorGrégory Burri <gregory.burri@matisa.ch>
Fri, 1 Dec 2017 11:57:44 +0000 (12:57 +0100)
committerGrégory Burri <gregory.burri@matisa.ch>
Fri, 1 Dec 2017 11:57:44 +0000 (12:57 +0100)
AdventOfCode2017/Day1.fs

index 005fd22..1dfea78 100644 (file)
@@ -1,6 +1,6 @@
 module AdventOfCode2017.Day1
 
-let readDigit d = int d - 48
+let readDigit d = int d - int '0'
 
 let solveCaptchaPart1 (captcha : string) =
     let numbers = captcha.ToCharArray () |> List.ofArray |> List.map readDigit