Clean bench

This commit is contained in:
ctsk
2023-08-30 13:39:18 +02:00
parent 69dbc4e001
commit eb35f60231
4 changed files with 10 additions and 16 deletions

View File

@@ -71,7 +71,4 @@ part2 :: Intermediate -> Vector Char
part2 = uncurry ((fmap head .) . foldl (move CM9001))
day :: Day
day = parsecDay parser (definitive . part1, definitive . part2)
fast :: Day
fast = day
day = parsecDay parser (definitive . part1, definitive . part2)