adjNounHilarity adjectives nouns =
[adjective ++ " " ++ noun | adjective <- adjectives, noun <- nouns]