Back to hill climbing for day 11
authorNeil Smith <neil.git@njae.me.uk>
Mon, 12 Dec 2016 16:56:50 +0000 (16:56 +0000)
committerNeil Smith <neil.git@njae.me.uk>
Mon, 12 Dec 2016 16:56:50 +0000 (16:56 +0000)
advent11.hs

index fd96636830de0ea89fe69ff06fc187d0edbb83a1..33bfe3c7cc2e788c03cfdc65bc46984179a0494c 100644 (file)
@@ -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]] []