Introduced type aliases and using liftM in a couple of places