This commit is contained in:
George Thomas 2025-12-08 22:43:17 +00:00
parent 25efc19b31
commit 1d22a1c188

View File

@ -11,7 +11,9 @@ puzzle :: Puzzle
puzzle =
Puzzle
{ number = 8
, parser = \isRealData -> (if isRealData then 1000 else 10,) <$> (V3 <$> decimal <* single ',' <*> decimal <* single ',' <*> decimal) `sepEndBy` newline
, parser = \isRealData ->
(if isRealData then 1000 else 10,)
<$> (V3 <$> decimal <* single ',' <*> decimal <* single ',' <*> decimal) `sepEndBy` newline
, parts =
[ uncurry \n ->
TL.show