missionDisplay f alleg (MessengerMission tgt) = do
  missionDisplayGeneric f alleg ["You have an important message that you need to",
                                 "bring to the planet of " ++ tgt ++ "."]
missionDisplay f alleg (MessengerMission tgt) = do
  missionDisplayGeneric f alleg ["You have an important message that you need to",
                                 "bring to the planet of " ++ tgt ++ "."]
missionDisplay f alleg (MessengerMission tgt) = do
  missionDisplayGeneric f alleg ["You have an important message that you need to",
                                 "bring to the planet of " ++ tgt ++ "."]