This commit is contained in:
shu 2019-12-04 08:21:27 +01:00
parent 61958979c6
commit 137e8c22e9

View File

@ -1,10 +1,8 @@
import Data.List import Data.List
main = do main = do
let bottom = 130254 print (day4a 130254 678275)
let top = 678275 print (day4b 130254 678275)
print (day4a bottom top)
print (day4b bottom top)
day4a bottom top = dumbbrute bottom top p 0 day4a bottom top = dumbbrute bottom top p 0
day4b bottom top = dumbbrute bottom top p' 0 day4b bottom top = dumbbrute bottom top p' 0