Step
*
1
1
3
1
1
of Lemma
coprime-equiv-unique
1. q : ℤ
2. p : ℤ
3. b : ℤ
4. a : ℤ
5. CoPrime(q,p)
6. CoPrime(b,a)
7. (q * a) = (b * p) ∈ ℤ
8. q | b
9. b | q
10. x : ℤ
11. y : ℤ
12. ((p * x) + (q * y)) = 1 ∈ ℤ
⊢ a = (p * ((a * x) + (b * y))) ∈ ℤ
BY
{ xxx(xxx(Assert a = (a * 1) ∈ ℤ BY Auto)xxx THEN RevHypSubst' -2 -1 THEN (NthHypEq (-1)) THEN EqCD THEN Auto)xxx }
1
.....subterm..... T:t
3:n
1. q : ℤ
2. p : ℤ
3. b : ℤ
4. a : ℤ
5. CoPrime(q,p)
6. CoPrime(b,a)
7. (q * a) = (b * p) ∈ ℤ
8. q | b
9. b | q
10. x : ℤ
11. y : ℤ
12. ((p * x) + (q * y)) = 1 ∈ ℤ
13. a = (a * ((p * x) + (q * y))) ∈ ℤ
⊢ (p * ((a * x) + (b * y))) = (a * ((p * x) + (q * y))) ∈ ℤ
Latex:
Latex:
1.  q  :  \mBbbZ{}
2.  p  :  \mBbbZ{}
3.  b  :  \mBbbZ{}
4.  a  :  \mBbbZ{}
5.  CoPrime(q,p)
6.  CoPrime(b,a)
7.  (q  *  a)  =  (b  *  p)
8.  q  |  b
9.  b  |  q
10.  x  :  \mBbbZ{}
11.  y  :  \mBbbZ{}
12.  ((p  *  x)  +  (q  *  y))  =  1
\mvdash{}  a  =  (p  *  ((a  *  x)  +  (b  *  y)))
By
Latex:
xxx(xxx(Assert  a  =  (a  *  1)  BY
                            Auto)xxx
        THEN  RevHypSubst'  -2  -1
        THEN  (NthHypEq  (-1))
        THEN  EqCD
        THEN  Auto)xxx
Home
Index