fact: Definition equiv_pprod_coind {A : pType} (P Q : pFam A) : (pForall A P * pForall A Q) <~> (pForall A (Build_pFam (fun a => prod (P a) (Q a)) (dpoint P, dpoint Q))).
imports: Basics Types PathAny WildCat Truncations.Core ReflectiveSubuniverse Extensions