∀ {α : Type u_2} {β : Type u_3} [inst : Preorder α] [inst_1 : Preorder β] [inst_2 : MulOneClass α]
  [inst_3 : MulOneClass β] (f : α →*o β) (h : Monotone (↑↑f).toFun), { toMonoidHom := ↑f, monotone' := h } = f