fact: Definition fmap_pi_loops (n : nat) {X Y : pType} (f : X ->* Y) : (pi_loops n Y) o* (fmap (Pi n.+1) f) ==* (fmap (pPi n o loops) f) o* (pi_loops n X).
imports: Basics Types Pointed HSet Modalities.Modality Truncations.Core Truncations.SeparatedTrunc Algebra.AbGroups WildCat