{A : pType} {P : pFam A} {f g : pForall A P} (p : f = g) : phomotopy_path (p^) ==* (phomotopy_path p)^*. Proof. induction p. simpl. symmetry. exact gpd_rev_1. Defined.
Require Import Basics Types. Require Import Homotopy.IdentitySystems. Require Import WildCat. Require Import Truncations.Core. Require Import ReflectiveSubuniverse. Require Import Extensions.