Build_MonoidIsomorphism' {M N : Monoid} (f : M <~> N) (h : IsMonoidPreserving f) : MonoidHomomorphism M N. Proof. snrapply Build_MonoidIsomorphism. 1: srapply Build_MonoidHomomorphism. exact _. Defined.
Require Import Basics.Overture Basics.Tactics Basics.Equivalences Basics.Trunc. Require Import Types.Sigma Types.Forall Types.Prod. Require Import WildCat.Core WildCat.Induced WildCat.Equiv WildCat.Universe Require Import (notations) Classes.interfaces.canonical_names.