[Código-Haskell] Recorrer Lista declarada por usuario - JaAViEr

main = do
  putStrLn("Escribe elementos separados por espacio:")
  elementos <- getLine
  let elementos_lista=words elementos
  let list=reverse elementos_lista
  let recorre p=if p>=0 then "Elemento '"++list !! p++"'\n"++recorre(p-1) else ""
  let cantidad_elementos=length elementos_lista-1
  let salida=recorre cantidad_elementos
  putStrLn salida

root@dhcppc4:/home/jaavier/haskell# runhaskell test
Escribe elementos separados por espacio:
Hola underc0de, Saludos!
Elemento 'Hola'
Elemento 'underc0de,'
Elemento 'Saludos!'

root@dhcppc4:/home/jaavier/haskell#