haskell - haskellカードフィルター

Question

私はカードのグループを持っています

initialCards :: GameState
initialCards = [[Card s1 r1, Card s2 r2] | s1 <- [minBound .. maxBound]::[Suit], r1 <- [minBound.. maxBound]::[Rank], 
                                       s2 <- [minBound .. maxBound]::[Suit], r2 <- [minBound .. maxBound]::[Rank], 
                                       s1 /= s2, r1 /= r2]

たとえば、ランクスーツとダイアモンドの[カード]を保持したいのですが、どうすればコードを書くことができますか。

Answer 1

カードのリストでフィルター関数を使用し、スーツとダイアモンドを True にマップする関数を提供します。