(A B : pType) (f : A -> B) (p : f (point A) = point B) : A ->* B := Build_pForall A (pfam_const B) f p.
Require Import Basics Types. Require Import Homotopy.IdentitySystems. Require Import WildCat. Require Import Truncations.Core. Require Import ReflectiveSubuniverse. Require Import Extensions.