Now try this one

g :: (a -> b) -> (b -> c) -> (a -> c)
g = undefined