Cum poate fi definit sequence ?

1) In do-notatie, in mod recursiv ar putea fi definit ca:

sequence_         :: [ IO() ] -> IO ()
sequence_  []     = return ()
sequence_  (a:as) = do a
                       sequence_ as

2) Vazut ca un foldr ar putea fi definit ca:

sequence_ = foldr (>>) (return () )

<= Inapoi la pagina principala Ro/Haskell