haskell - Haskell リスト内包表記とパターン マッチング

Question

たとえば、文字の一致するすべての数字を提供する関数を探していますgiveNumber "D" [("D", 5), ("A", 4) ("D", 25)] = [5,25]

giveNumber :: String -> [(String, a)] -> [a]
giveNumber letter (x:xs) = [snd x | x <- xs | fst x == letter]

パーサーエラーが発生します。