diff options
author | Logan Hunt <loganhunt@simponic.xyz> | 2022-12-13 00:46:19 -0700 |
---|---|---|
committer | GitHub <noreply@github.com> | 2022-12-13 00:46:19 -0700 |
commit | 868561eda86be873d755c62ea5b7fbb3047d4c3a (patch) | |
tree | de24111620065f71a903a810a6827dc0d7142112 /day-07 | |
parent | 5a68f700ecc30e5fdbdc802fc44c2ca0cbc85aaf (diff) | |
download | aoc-868561eda86be873d755c62ea5b7fbb3047d4c3a.tar.gz aoc-868561eda86be873d755c62ea5b7fbb3047d4c3a.zip |
Update sol.hs
Diffstat (limited to 'day-07')
-rw-r--r-- | day-07/sol.hs | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/day-07/sol.hs b/day-07/sol.hs index 8de828b..c6b8c35 100644 --- a/day-07/sol.hs +++ b/day-07/sol.hs @@ -62,9 +62,6 @@ rotl = reverse . transpose rotr :: [[Int]] -> [[Int]] rotr = transpose . reverse -mmult :: [[Int]] -> [[Int]] -> [[Int]] -mmult a b = [[sum $ zipWith (*) ar bc | bc <- (transpose b)] | ar <- a] - main = do ls <- fmap Text.lines (Text.readFile "input") let digits = map (getDigitsFromString . Text.unpack) ls |