---

Step * 1 1 of Lemma int-equal-in-rationals


1. x : ℤ
2. y : ℤ
3. x = y ∈ pertype(λr,s. ((r ∈ ℤ ⋃ (ℤ × ℤ-o)) ∧ (s ∈ ℤ ⋃ (ℤ × ℤ-o)) ∧ qeq(r;s) = tt))
4. qeq(x;y) = tt
⊢ x = y ∈ ℤ
BY
{ (Unfold `qeq` (-1) THEN RepeatFor 2 ((CallByValueReduce (-1) THENA Auto)) THEN Reduce (-1) THEN Auto)⋅ }

1
1. x : ℤ
2. y : ℤ
3. x = y ∈ pertype(λr,s. ((r ∈ ℤ ⋃ (ℤ × ℤ-o)) ∧ (s ∈ ℤ ⋃ (ℤ × ℤ-o)) ∧ qeq(r;s) = tt))
4. (x =z y) = tt
⊢ x = y ∈ ℤ

---

Latex:

---

Latex:

1.  x  :  \mBbbZ{}
2.  y  :  \mBbbZ{}
3.  x  =  y
4.  qeq(x;y)  =  tt
\mvdash{}  x  =  y


By

---

Latex:
(Unfold  `qeq`  (-1)
  THEN  RepeatFor  2  ((CallByValueReduce  (-1)  THENA  Auto))
  THEN  Reduce  (-1)
  THEN  Auto)\mcdot{}

---

Home Index