fact: Definition loop_susp_unit_natural {X Y : pType} (f : X ->* Y) : loop_susp_unit Y o* f ==* fmap loops (fmap psusp f) o* loop_susp_unit X.
imports: Basics Types Pointed.Core Pointed.Loops Pointed.pTrunc Pointed.pEquiv Homotopy.Suspension Homotopy.Freudenthal Truncations WildCat