fact: Definition phomotopy_compose_Vp {A : pType} {P : pFam A} {f g : pForall A P} (p : f ==* g) : p ^* @* p ==* phomotopy_reflexive g.
imports: Basics Types PathAny WildCat Truncations.Core ReflectiveSubuniverse Extensions