-- Exercise 5
whatWentWrong :: [LogMessage] -> [String]
whatWentWrong = map stringFromError .  filter isSevereError . inOrder . build
whatWentWrong :: [LogMessage] -> [String]
whatWentWrong = map stringFromError .  filter isSevereError . inOrder . build
whatWentWrong = map stringFromError .  filter isSevereError . inOrder . build