Or:

fpairs p s l = sequence [[(a,b) | b <- filter (p a) l] | a <- s]



_______________________________________________
Haskell-Cafe mailing list
[email protected]
http://www.haskell.org/mailman/listinfo/haskell-cafe

Reply via email to