Purescript应用程序不执行

Question

执行：

main = do 
  ctx <- getCanvasElementById "stage" >>= getContext2D
  bs  <- initBranches
  tick 0 ctx bs

但这不是：

main = tick 0 <$> (getCanvasElementById "stage" >>= getContext2D)
              <*> initBranches

但是，两者都是可编译的，据我所知，两者都具有相同的基本含义。 为什么会这样呢？ 我可以在这里使用适用的语法吗（恕我直言，恕我直言）

---

这也有效

main = do
  a <- (tick 0) <$> (getCanvasElementById "stage" >>= getContext2D) <*> initBranches 
  b <- a
  fprint b

Answer 1

main = join $ tick 0 <$> (getCanvasElementById "stage" >>= getContext2D) 
                     <*> initBranches 

应用程序创建一个嵌套的Eff，join可以轻松解决此问题