1votos

Superhéroes y supervillanos en Haskell

por josejuan hace 6 años

Nadie dijo que había que implementar el BST XD

¡Salva a la Humanidad separando a los superhéroes de los supervillanos! :P :P :P

1
2
3
4
5
6
7
8
9
import qualified Data.Map as M 
 
volcarabst = foldl (\a s -> M.insert s (elem 's' s || elem 'S' s) a) M.empty 
 
volcaraficheros marvel = let  (heroes, villains) = M.partition id marvel 
                         in do writeFile "heroes.dat"   (unlines $ M.keys heroes) 
                               writeFile "villains.dat" (unlines $ M.keys villains) 
 
main = readFile "Marvel_Universe_Names.txt" >>= volcaraficheros . volcarabst . lines 
2 comentarios
0votos

Escrito por drabor hace 6 años

¿Significa entonces que en python podría haberlo hecho con un conjunto?, me quita los elementos repetidos y al recorrerlo me los devuelve de forma ordenada, justo lo se necesita
0votos

Escrito por josejuan hace 6 años

Siempre que tu estructura "conjunto" se comporte como un BST supongo que sí :)

Comenta la solución

Tienes que identificarte para poder publicar tu comentario.