[Haskell] LiftA2 over fmap