∀[A:Type]. ∀[B:type-function{i:l}(A)].  (per-function(A;a.B[a]) ∈ Type)
{ (UnivCD THENA Auto) }
1. A : Type
2. B : type-function{i:l}(A)
⊢ per-function(A;a.B[a]) ∈ Type