[Haskell-beginners] filter by max length a list of lists with equivalent values