Получение нужных данных из списка

Question

data SomeData = A Int 
       | B Int 
       | C Int 

list :: [SomeData] 
list = [ A 1, B 2, C 3] 

wantedData = filter (?) list -- wantedData is A 1 

Для кода выше, какую функцию следует поместить (?), Чтобы получить нужные данные?

Answer 1

Если вы хотите только список содержит A значения, то это должно работать в качестве предиката:

isA (A _) = True 
isA _ = False 

Это просто сопоставление с образцом.

Answer 2

Что-то, что ближе к возможности писать анонимную функцию и не нужно определять новую функцию, - это понимание списка.

Например, вы можете сказать

list = [ A 1, B 2, C 3] 

wantedData = [ A n | A n <- list ] -- result: [A 1] 

Answer 3

Другая возможность:

data SomeData = A Int | B Int | C Int 
          deriving (Show, Read, Eq) 

list :: [SomeData] 
list = [ A 1, B 2, C 3 ] 

wantedData :: [SomeData] 
wantedData = filter (== A 1) list    -- wantedData is A 1 

Тест:

> wantedData 
> [A 1]