Control.ApplicativeのliftA2を使って
liftA2 (,) f g
でもいけるよ。