Definition is_nat_trans_relmodule_mor {M N : RelModule R} {φ : ∏ a : C, M a --> N a} (Hφ : is_relmodule_mor M N φ) : is_nat_trans (functor_from_relmodule M) (functor_from_relmodule N) φ. Proof. intros a b f. cbn. unfold mlift. apply Hφ. Defined.
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.