ᅠ
Size: a a a
ᅠ
GP
p
ЗП
p
MK
p
ЗП
groupMapBy :: forall f k v. Ord k => Foldable f => f (Tuple k v) -> M.Map k (Array v)
groupMapBy = (foldMap (\(Tuple k v) -> M.SemigroupMap $ M.singleton k [v]) :: f (Tuple k v) -> _) # coerce
ЗП
Т
p
SG
type ListUsers
= GET "/users"
{ query ::
{ sortBy :: UserSort
, sortDir :: SortDir
}
, response ::
{ ok :: JSON (Array User)
}
http://....... + /usersSG
p
p
SG