簡體   English   中英

是否有標准的reverseLookup函數?

[英]Is there a standard reverseLookup function?

我正在尋找具有以下功能簽名的東西

Eq b => b -> [(a, b)] -> Maybe a

您可以使用功能find :: (a -> Bool) -> [a] -> Maybe a a- find :: (a -> Bool) -> [a] -> Maybe a來自基本包的Data.List模塊中的a。 不幸的是,我現在無法測試代碼,但它可能像這樣:

sndLookup :: Eq b => b -> [(a, b)] -> Maybe a
sndLookup query = fst <$> find (\(_,b) -> b == query)

暫無
暫無

聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.

 
粵ICP備18138465號  © 2020-2024 STACKOOM.COM