{A : pType} {P : pFam A} {f g : pForall A P} (h : f ==* g) : h (point A) @ dpoint_eq g = dpoint_eq f. Proof. apply moveR_pM. exact (dpoint_eq h). Defined.
Require Import Basics Types. Require Import Homotopy.IdentitySystems. Require Import WildCat. Require Import Truncations.Core. Require Import ReflectiveSubuniverse. Require Import Extensions.