∀[A,B:Type].  (B ⊆r imp-type(A;B))
{ (Auto THEN (D 0 THENA Auto)) }
.....subterm..... T:t
1:n
1. A : Type
2. B : Type
3. x : B
⊢ x ∈ imp-type(A;B)