Lemma isaprop_RelModule_Mor_laws (hs : has_homsets D) (M N : RelModule_data R) (φ : ∏ a : C, M a --> N a) : isaprop (is_relmodule_mor M N φ). Proof. repeat (apply impred; intro); apply hs. Qed.
Require Import UniMath.Foundations.All. Require Import UniMath.MoreFoundations.All. Require Import UniMath.CategoryTheory.Core.Categories. Require Import UniMath.CategoryTheory.Core.Functors. Require Import UniMath.CategoryTheory.Core.NaturalTransformations. Require Import UniMath.CategoryTheory.Monads.RelativeMonads.