(A : pType) (B : A -> pType) : pType := [pForall A (pointed_fam B), point_pforall B].
Require Import Basics Types. Require Import Homotopy.IdentitySystems. Require Import WildCat. Require Import Truncations.Core. Require Import ReflectiveSubuniverse. Require Import Extensions.