∀ {R : Type u} [inst : CommRing R] {X Y : Type v} [inst_1 : AddCommGroup X] [inst_2 : Module R X]
  [inst_3 : AddCommGroup Y] [inst_4 : Module R Y] [inst_5 : Coalgebra R X] [inst_6 : Coalgebra R Y] (e : X ≃ₗc[R] Y),
  e.toCoalgIso.inv = CoalgCat.ofHom ↑e.symm