boomBangs xs = [if x < 10 then "BOOM!" else "BANG!" | x <- xs, odd x]