AP
locus state == Just (T t)
переписать наJust (T t') <- [locus state]
t' == t
Size: a a a
AP
locus state == Just (T t)
переписать наJust (T t') <- [locus state]
t' == t
K
locus state == Just (T t)
переписать наJust (T t') <- [locus state]
t' == t
[]
вокруг locus state
?AP
| Just (T t') <- map locus states
, t' == t
AP
[]
вокруг locus state
?AP
AP
AP
AP
[ x | Just x <- [Nothing, Just 42, Nothing] ]
-> [42]
AP
AP
[ x | Just x <- [Nothing, Just 42, Nothing] ]
-> [42]
K
, locus state == Just (T t)
- чем не предикат?AP
AP
DB
K
t
должен быть как минимум Ord
, я его в Set
/Map
ключами сую самого и в структурах