SOE ex.9.3
xs = [1, 2, 3] :: [Float]
ys = map (+) xs
{-
map :: (a -> b) -> [a] -> [b]
(+) :: Num a => a -> a -> a
ys = [ (+1), (+2), (+3) ]
ys :: [ Float -> Float ]
-}
xs = [1, 2, 3] :: [Float]
ys = map (+) xs
{-
map :: (a -> b) -> [a] -> [b]
(+) :: Num a => a -> a -> a
ys = [ (+1), (+2), (+3) ]
ys :: [ Float -> Float ]
-}