Step
*
of Lemma
subtype_rel_partial
∀[A,B:Type].  partial(A) ⊆r partial(B) supposing A ⊆r B
BY
{ (Auto THEN (D 0 THENA Auto) THEN (D -1 THENA Auto) THEN EqTypeCD THEN Auto) }
1
.....antecedent..... 
1. A : Type
2. B : Type
3. A ⊆r B
4. x : Base
5. x1 : Base
6. x = x1 ∈ pertype(λx,y. ((x ∈ base-partial(A)) ∧ (y ∈ base-partial(A)) ∧ per-partial(A;x;y)))
7. x ∈ base-partial(A)
8. x1 ∈ base-partial(A)
9. per-partial(A;x;x1)
⊢ per-partial(B;x;x1)
Latex:
Latex:
\mforall{}[A,B:Type].    partial(A)  \msubseteq{}r  partial(B)  supposing  A  \msubseteq{}r  B
By
Latex:
(Auto  THEN  (D  0  THENA  Auto)  THEN  (D  -1  THENA  Auto)  THEN  EqTypeCD  THEN  Auto)
Home
Index