X-Git-Url: https://git.njae.me.uk/?p=advent-of-code-22.git;a=blobdiff_plain;f=advent20%2FMain.hs;fp=advent20%2FMain.hs;h=355d949ff56e9c144b931975f9ea40281e4d796d;hp=eb60a158b15bd9b034c571b69f1ef6beb1ae5999;hb=3ad0f674265f18dc390d3d6078348cea5f36f98c;hpb=402a27d38485107852e8128f20a443cc7a684c6d diff --git a/advent20/Main.hs b/advent20/Main.hs index eb60a15..355d949 100644 --- a/advent20/Main.hs +++ b/advent20/Main.hs @@ -1,10 +1,10 @@ -- Writeup at https://work.njae.me.uk/2022/12/21/advent-of-code-2022-day-20/ import AoC -import Data.List +import Data.List hiding (elemIndex) import Data.Maybe import Data.CircularList -import Control.Lens +import Control.Lens hiding (element) data IndexedElem = IndexedElem { _idx :: Int, _shift :: Int, _value :: Int} deriving (Show, Eq, Ord)