readUserExitedRoomNotification :: Inbound.Header -> IO Inbound.InboundMessage
readUserExitedRoomNotification header =
   do
    let userId = Inbound.messageRefNumber header
    return . Inbound.UserExitedRoomMessage $ Inbound.UserExitedRoom userId
readUserExitedRoomNotification :: Inbound.Header -> IO Inbound.InboundMessage
readUserExitedRoomNotification header =
   do
    let userId = Inbound.messageRefNumber header
    return . Inbound.UserExitedRoomMessage $ Inbound.UserExitedRoom userId
readUserExitedRoomNotification header =
   do
    let userId = Inbound.messageRefNumber header
    return . Inbound.UserExitedRoomMessage $ Inbound.UserExitedRoom userId