November 2017 1HaskellADay 1Liner problem and solutions

• November 5th, 2017: f :: Map Int [a] -> [b] - > [(Int, b)]
  for, e.g.: f mapping bs
  length bs == length (concat (Map.elems mapping))
  define f
• Andreas Källberg @Anka213 Using parallel list comprehensions:
  f mp bs = [ (k,b) | (k,as) <-assocs mp, a <- as | b <- bs]
• Steve Trout @strout f = zip . foldMapWithKey (fmap . const)