What kind of effect-sequencing behavior is ListT supposed to exhibit? I ask because in haskell, ListT m a is a newtype wrapper of m [a], and if purescript's ListT is meant to be modeled after haskell's, ListT Effect Int should perhaps then behave like Effect [Int]. However, the haskell community has also considered alternative models for ListT like the following:
-- https://github.com/nikita-volkov/list-t/blob/master/library/ListT.hs
newtype ListT m a = ListT (m (Maybe (a, ListT m a)))
Because ListT in Pursuit's 'transformers' package is defined as ...
newtype ListT f a = ListT (f (Step a (ListT f a)))
data Step a s = Yield a (Lazy s) | Skip (Lazy s) | Done
... Volkov's ListT (shown above) seems to be the underlying model for purescript's own ListT.
What kind of effect-sequencing behavior, then, should Volkov's ListT exhibit? Unfortunately, at the moment, I can't experiment with his code directly; however, it seems that, under specific conditions, Volkov's ListT m Int should behave similarly to [m Int] -- in particular, when a list-like construct in either case (ListT m Int or [m Int]) is fully traversed/consumed with pre-order congruence and the final effect of ListT is pure or ignored. (Or at least I assume; perhaps there are details that invalidate this comparison.)
If this comparison is sound, users in purescript-land might expect values of the analogous purescript types ListT Effect Int, List (Effect Int) and Compose List Effect Int, under appropriate conditions, also to exhibit identical behavior. I'm not sure that's the case, however.
Consider, for example, product0 and product1 below:
import Control.Monad.List.Trans as T
-- other imports ...
io :: forall a b. Show b => b -> a -> Effect a
io x y = log (show x) *> pure y
-- `list0` and `list1` below are meant to have congruent sequences of data AND effects.
list0 :: ListT Effect Int
list0 = fromEffect (io 2 2) <|> fromEffect (io 1 1) <|> fromEffect (io 0 0) <|> T.nil
list1 :: Compose List Effect Int
list1 = Compose $ pure (io 2 2) <|> pure (io 1 1) <|> pure (io 0 0) <|> Nil
f0 :: ListT Effect (Int -> Int)
f0 = fromEffect (io "id" identity)
f1 :: Compose List Effect (Int -> Int)
f1 = Compose (pure (io "id" identity))
product0 = f0 <*> list0 :: ListT Effect Int
product1 = f1 <*> list1 :: Compose List Effect Int
If product0 and product1 are fully traversed, results like the following occur:
sequenceListT :: forall a. ListT Effect a -> Effect (List a)
sequenceListT = foldl' (\x y -> pure (x <> pure y)) Nil
sequenceCompose :: forall a. Compose List Effect a -> Effect (List a)
sequenceCompose = sequence <<< unwrap
-- PROMPT> sequenceListT product0
-- "id"
-- 2
-- 1
-- 0
-- (2 : 1 : 0 : Nil)
-- PROMPT> sequenceCompose product1
-- "id"
-- 2
-- "id"
-- 1
-- "id"
-- 0
-- (2 : 1 : 0 : Nil)
Other helpful comparisons to try might include the following:
product2 = T.nil <*> list0 :: ListT Effect Int
product3 = pure Nil <*> list1 :: Compose List Effect Int
product4 = Backwards f0 <*> Backwards list0 :: Backwards (ListT Effect) Int
product5 = Backwards f1 <*> Backwards list1 :: Backwards (Compose List Effect) Int
Although I've tried to model the same sequence of bundled data and effects as both an instance of ListT Effect Int and as an instance of Compose List Effect Int and although I (myself at least) expect similar behavior because of my assumptions listed above, the two values product0 and product1 have different overall effects when traversed.
The source of this difference in behavior appears to be related to the Apply typeclass. Whereas List's apply member has a static flavor, ListT's implementation of apply is monadic and therefore directionally biased.
I'm not sure which style of applicative multiplication might be generally preferable. I'm not even sure that List and ListT should have exactly identical effect-sequencing semantics (in relevant scenarios). However, because this difference in behavior surprised me at least, I figured I'd note this distinction as an issue for maintainers to consider. Perhaps it's a point confusing/interesting enough to include in documentation.
Thanks much
What kind of effect-sequencing behavior is
ListTsupposed to exhibit? I ask because in haskell,ListT m ais a newtype wrapper ofm [a], and if purescript'sListTis meant to be modeled after haskell's,ListT Effect Intshould perhaps then behave likeEffect [Int]. However, the haskell community has also considered alternative models forListTlike the following:Because
ListTin Pursuit's 'transformers' package is defined as ...... Volkov's
ListT(shown above) seems to be the underlying model for purescript's ownListT.What kind of effect-sequencing behavior, then, should Volkov's
ListTexhibit? Unfortunately, at the moment, I can't experiment with his code directly; however, it seems that, under specific conditions, Volkov'sListT m Intshould behave similarly to[m Int]-- in particular, when a list-like construct in either case (ListT m Intor[m Int]) is fully traversed/consumed with pre-order congruence and the final effect ofListTis pure or ignored. (Or at least I assume; perhaps there are details that invalidate this comparison.)If this comparison is sound, users in purescript-land might expect values of the analogous purescript types
ListT Effect Int,List (Effect Int)andCompose List Effect Int, under appropriate conditions, also to exhibit identical behavior. I'm not sure that's the case, however.Consider, for example,
product0andproduct1below:If
product0andproduct1are fully traversed, results like the following occur:Other helpful comparisons to try might include the following:
Although I've tried to model the same sequence of bundled data and effects as both an instance of
ListT Effect Intand as an instance ofCompose List Effect Intand although I (myself at least) expect similar behavior because of my assumptions listed above, the two valuesproduct0andproduct1have different overall effects when traversed.The source of this difference in behavior appears to be related to the
Applytypeclass. WhereasList'sapplymember has a static flavor,ListT's implementation ofapplyis monadic and therefore directionally biased.I'm not sure which style of applicative multiplication might be generally preferable. I'm not even sure that
ListandListTshould have exactly identical effect-sequencing semantics (in relevant scenarios). However, because this difference in behavior surprised me at least, I figured I'd note this distinction as an issue for maintainers to consider. Perhaps it's a point confusing/interesting enough to include in documentation.Thanks much