> applyEach [(+1), (+3), (+2)] 1 > => [2,4,3] :: [Integer] > > > applyEach' :: [a->b] -> a -> [b] > > applyEach' funs x = map applyx funs where applyx (fun) = fun x
...or more simply: applyEach' l x = map ($x) l _______________________________________________ Haskell-Cafe mailing list [EMAIL PROTECTED] http://www.haskell.org/mailman/listinfo/haskell-cafe
