Búsqueda en lista de listas de pares

3 Comentarios

1. Haskell

   busca :: Eq a => a -> [[(a,b)]] -> [b] busca x pss = [b | (a,b) <- concat pss, a == x]

   1 2	busca :: Eq a => a -> [[(a,b)]] -> [b] busca x pss = [b | (a,b) <- concat pss, a == x]

   Responder

2. Haskell

   busca :: Eq a => a -> [[(a,b)]] -> [b] busca x pss = [y | ps <- pss, (x1,y) <- ps, x1 == x]

   1 2	busca :: Eq a => a -> [[(a,b)]] -> [b] busca x pss = [y | ps <- pss, (x1,y) <- ps, x1 == x]

   Responder

3. Haskell

   busca :: Eq a => a -> [[(a,b)]] -> [b] busca x pss = concat [busca1 x ps | ps <- pss] where busca1 c t = [v | (c1,v) <- t, c1 == c]

   1 2 3

   busca :: Eq a => a -> [[(a,b)]] -> [b] busca x pss = concat [busca1 x ps | ps <- pss]     where busca1 c t = [v | (c1,v) <- t, c1 == c]

   Responder