∀ {S : Type u'} {R : Type u} {M : Type v} [inst : AddMonoid R] [inst_1 : AddAction R M] [inst_2 : VAdd S R]
  [inst_3 : VAdd S M] [inst_4 : VAddAssocClass S R M] (p : SubAddAction R M) [inst_5 : VAdd Sᵃᵒᵖ R]
  [inst_6 : VAdd Sᵃᵒᵖ M] [inst_7 : VAddAssocClass Sᵃᵒᵖ R M] [IsCentralVAdd S M], IsCentralVAdd S ↥p