I don't see an implementation (although there is ContravariantMonoidal, which is more constrained). I'll plan to send a PR, but if anyone sees a reason why this can't exist, please feel free to let me know.