s d (m : morphism (C -> D) s d) : morphism ((D -> E) -> (C -> E)) (whiskerR_functor _ s) (whiskerR_functor _ d) := Build_NaturalTransformation (whiskerR_functor E s) (whiskerR_functor E d) (fun x => x oL m) (fun _ _ _ => exchange_whisker _ _).
Require Import Category.Core Functor.Core NaturalTransformation.Core. Require Import Functor.Composition.Core NaturalTransformation.Composition.Core. Require Import Category.Prod FunctorCategory.Core NaturalTransformation.Composition.Functorial NaturalTransformation.Composition.Laws ExponentialLaws.Law4.Functors. Require Import NaturalTransformation.Paths.