-- input foo = f {- comment attached to <$> -} <$> {- comment attached to x -} x >>= g