Tweak monad test