processRequest :: Int -> Map.Map Int Organ -> String
processRequest id' catalog = processAndReport organ
    where organ = Map.lookup id' catalog
processRequest :: Int -> Map.Map Int Organ -> String
processRequest id' catalog = processAndReport organ
    where organ = Map.lookup id' catalog
processRequest id' catalog = processAndReport organ
    where organ = Map.lookup id' catalog