![](/img/trans.png)
[英]What is the best way to realize `(->) ((->) a b)` as an applicative functor?
[英]What is the Applicative's pure for Data Two a b = Two a b
給定此類型:
data Two a b = Two a b deriving (Eq, Show)
適用的定義是什么。 我不能夠得到pure
權利,沒有上添加約束a
例如像Num a
instance (Num a, Monoid a) => Applicative (Two a) where
pure b = Two 1 b
Two f f' <*> Two a b = Two a (f' b)
沒有約束就不能擁有它。 您需要對a
做點事情,並且需要能夠對該類型進行操作,您可以通過兩種方式:使用特定類型(例如, Int
或抽象類型,需要一個typeclass實例)。
在這種情況下,想到的最一般的約束是Monoid
,它使您的實例與2元素元組相同:
instance Monoid a => Applicative ((,) a) where
pure x = (mempty, x)
(u, f) <*> (v, x) = (u `mappend` v, f x)
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.