{A : pType} `{IsHomogeneous A} : homogeneous_pt_id (point A) ==* pequiv_pmap_idmap := peisretr _.
Require Import Basics Types Pointed WildCat.Core. Require Import Truncations.Core Truncations.Connectedness.