---

Step * 1 of Lemma uanti_sym_shift


1. A : Type
2. B : Type
3. R : A ⟶ A ⟶ ℙ
4. S : B ⟶ B ⟶ ℙ
5. f : A ⟶ B
6. ∀a1,a2:A.  (((f a1) = (f a2) ∈ B) ⇒ (a1 = a2 ∈ A))
7. ∀x,y:A.  (R[x;y] ⇐⇒ S[f x;f y])
8. ∀[x,y:B].  (x = y ∈ B) supposing (S[y;x] and S[x;y])
9. x : A
10. y : A
11. R[x;y]
12. R[y;x]
⊢ x = y ∈ A
BY
{ ((HypBackchain) THEN Auto) }

---

Latex:

---

Latex:

1.  A  :  Type
2.  B  :  Type
3.  R  :  A  {}\mrightarrow{}  A  {}\mrightarrow{}  \mBbbP{}
4.  S  :  B  {}\mrightarrow{}  B  {}\mrightarrow{}  \mBbbP{}
5.  f  :  A  {}\mrightarrow{}  B
6.  \mforall{}a1,a2:A.    (((f  a1)  =  (f  a2))  {}\mRightarrow{}  (a1  =  a2))
7.  \mforall{}x,y:A.    (R[x;y]  \mLeftarrow{}{}\mRightarrow{}  S[f  x;f  y])
8.  \mforall{}[x,y:B].    (x  =  y)  supposing  (S[y;x]  and  S[x;y])
9.  x  :  A
10.  y  :  A
11.  R[x;y]
12.  R[y;x]
\mvdash{}  x  =  y


By

---

Latex:
((HypBackchain)  THEN  Auto)

---

Home Index