# 08.08.07

## Exercise 9.4

applyEach :: [(a -> b)] -> a -> [b] applyEach [] _ = [] applyEach (f:fs) x = f x : applyEach fs x |

solutions from the exercises in the book

applyEach :: [(a -> b)] -> a -> [b] applyEach [] _ = [] applyEach (f:fs) x = f x : applyEach fs x |

anonyoumous said,

February 21, 2008 at 12:52 pm

applyEach fs x = map (\f -> f x) fs

or using ($)

applyEach fs x = map ($ x) fs