(I : pType) (X : I -> pType) : psigma (pointed_fam X) $-> FamilyWedge I X := Build_pMap _ _ pushl (pglue pt).
Require Import Basics Types. Require Import Pointed.Core Pointed.pSusp. Require Import Colimits.Pushout. Require Import WildCat. Require Import Homotopy.Suspension.