X-Git-Url: https://git.njae.me.uk/?a=blobdiff_plain;f=advent11.hs;h=33bfe3c7cc2e788c03cfdc65bc46984179a0494c;hb=4ed1e3133856105db52d16c8f6adb60b1ebde920;hp=fd96636830de0ea89fe69ff06fc187d0edbb83a1;hpb=a24758c516142d460d7302da070a2443cd713f29;p=advent-of-code-16.git diff --git a/advent11.hs b/advent11.hs index fd96636..33bfe3c 100644 --- a/advent11.hs +++ b/advent11.hs @@ -44,13 +44,13 @@ buildingTest = Building 0 [ main :: IO () main = do part1 - -- part2 + part2 part1 :: IO () -- part1 = print $ length $ init $ extractJust $ hillClimb [[buildingTest]] [] --- part1 = print $ length $ init $ extractJust $ hillClimb [[building1]] [] -part1 = print $ length $ init $ extractJust $ aStar [[building1]] [] +part1 = print $ length $ init $ extractJust $ hillClimb [[building1]] [] +-- part1 = print $ length $ init $ extractJust $ aStar [[building1]] [] part2 :: IO () part2 = print $ length $ init $ extractJust $ hillClimb [[building2]] []