fact: Definition plus_path_to_plus {X : Type} (x y : X) : plus_path x y o to_plus L O (x = y) == @ap _ _ (to_plus L O X) x y.
imports: HoTT.Basics HoTT.Types Extensions HFiber Truncations NullHomotopy Limits.Pullback Descent Lex Separated