∀ (C : Type u_1) (D : Type u_2) [inst : CategoryTheory.Category.{v_1, u_1} C]
  [inst_1 : CategoryTheory.Category.{v_2, u_2} D] {A : Type u_5} [inst_2 : AddMonoid A]
  [inst_3 : CategoryTheory.HasShift D A] (a : A) {x x_1 : CategoryTheory.SingleFunctors C D A} (φ : x ⟶ x_1),
  (CategoryTheory.SingleFunctors.evaluation C D a).map φ = φ.hom a