Monadify deSugar/MatchLit: use do, return, applicative, standard monad functions