- let eSeeds = tidyIntervals $ expandRanges seeds
- -- print seeds
- -- print eSeeds
- -- print almanac
- -- print $ useAMap (almanac ! "seed") [97, 98, 99, 100]
- -- print $ useAMap (almanac ! "seed") [49, 50, 51, 53, 96, 97, 98]
- -- print $ useAMap (almanac ! "seed") [79, 14, 55, 13]