map' f (x:xs) = a : b
    where
        !a = f x
        !b = map' f xs
map' f (x:xs) = a : b
    where
        !a = f x
        !b = map' f xs
map' f (x:xs) = a : b
    where
        !a = f x
        !b = map' f xs