Haskell 'Either'データ型と可読性？

Question

私はHaskellで 'のいずれかのデータ構造を学んだし、次のように書かれている：

type PhoneBook = [(String, String)] 
createPhoneBook :: PhoneBook --Use function to generate instance of type 
createPhoneBook = [("betty","1212-232"), 
        ("billy", "3443-434"), 
        ("derdre", "3232-221")] 

data PresentInPhoneBook = Present | NotPresent deriving (Show, Eq) --Either 
type IsPresent = String 
type IsNotPresent = String 

checkPhoneBook :: String -> PhoneBook -> Either IsPresent IsNotPresent 
checkPhoneBook name pb = if foldRes == True then Left "Match" else Right "No Match" 
where 
    foldRes = foldl (\acc (key,value) -> if key == name then True else acc) False pb 

は、このコードを読みやすくするために任意の改善はありますか？

わかりましたが、私はこの段階で学んでいます。

Answer 1

私はそのように記述します。

import Data.Maybe (isJust) 

checkPhoneBook :: String -> PhoneBook -> PresentInPhoneBook 
checkPhoneBook name pb = isJust (lookup name pb) 

checkPhoneBookリターンEither IsPresent IsNotPresentを持っているために使用する理由はありません。ちょうどPresentInPhoneBookを返す。この場合、Boolを返すこともできます。また、私が上記で使用しているlookupのメモを取ってください。それはMaybeという値を返します。したがって、名前を検索したり、電話帳に名前が存在するかどうかを調べるために使用することができます。

Answer 2

偶然この

if foldRes == True then 

です、またはあなただけの

if foldRes then 

後者の場合に比べて、それがより読みやすい見つけるか、私はどの必見

if (foldRes == True) == True then 

を提案したいです拡張によって、さらに読みやすくなります。