假设我有一个:
假设我有一个棱镜
data SumType = A | B | C
list = [A, B, B, A, C, A]
(as, rest) = span (\case A -> True; _ -> False) list
假设我有一个棱镜
_A
,是否有一种更简洁的方式使用lens
来编写它?
Control.Lens.Fold.has
作为isn't
的否定。 - danidiazControl.Lens.Extras.is
。 - user239558