关于带元组的Haskell函数的问题

Question

如何帮助我让这个主要功能运行，不知道该怎么做，我做了一个小例子：

tuple :: String -> (Bool, String)
tuple x = (True, x)

getStr :: String
getStr = "test"

main = do
    putStrLn snd (tuple getStr)
    putStrLn "End"

Answer 1

snd

的应用程序缺少括号

main = do
    putStrLn (snd (tuple getStr))
    putStrLn "End"