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

[JaAViEr]

Bien, tras unos codes, traigo uno con recursividad
El cual en este caso me permitirá recorrer la lista(array)
que el usuario ingrese:

Código: haskell

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

Ejemplo:

Código: text

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# 

Gracias a la recursividad es posible recorrer los elementos, pues
haskell no tiene bucles lo que complica todo, pero no imposibilita.