fact: Definition pfiber2_fmap_loops {A B : pType} (f : A ->* B) : pfiber2_loops f o* pfib (pfib (pfib f)) ==* fmap loops f o* (loops_inv _ o* pfiber2_loops (pfib f)).
imports: Basics Types WildCat HFiber Pointed.Core Pointed.pEquiv Pointed.Loops