к
Size: a a a
ЗП
ЗП
Selective =>
ЗП
Decidable
подойдетЗП
class Functor f <= Coapply f where
coapply :: forall a b. f (Either a b) -> Either (f a) (f b)
pchoose
:: forall p f a b a1 a2
. Corepresentable p f
=> Coapply f
=> (a -> Either a1 a2)
-> p a1 b
-> p a2 b
-> p a b
pchoose f x y = cotabulate \s -> codup $ bimap (cosieve x) (cosieve y) (coapply (f <$> s))
ЗП
cotabulate \s -> either (cosieve x) (cosieve y) (coapply (f <$> s))
MK
NonEmpty
неудобный — сложно писать литералыAV
MK
MK
AV
к
NonEmpty
неудобный — сложно писать литералыAV
AA
KV
AA
MK
AV
аа