| Step | Hyp | Ref
| Expression |
| 1 | | ltrelnq 10945 |
. . . 4
⊢
<Q ⊆ (Q ×
Q) |
| 2 | 1 | brel 5724 |
. . 3
⊢ (𝐴 <Q
𝐵 → (𝐴 ∈ Q ∧ 𝐵 ∈
Q)) |
| 3 | | ordpinq 10962 |
. . . 4
⊢ ((𝐴 ∈ Q ∧
𝐵 ∈ Q)
→ (𝐴
<Q 𝐵 ↔ ((1st ‘𝐴)
·N (2nd ‘𝐵)) <N
((1st ‘𝐵)
·N (2nd ‘𝐴)))) |
| 4 | | elpqn 10944 |
. . . . . . . . 9
⊢ (𝐴 ∈ Q →
𝐴 ∈ (N
× N)) |
| 5 | 4 | adantr 480 |
. . . . . . . 8
⊢ ((𝐴 ∈ Q ∧
𝐵 ∈ Q)
→ 𝐴 ∈
(N × N)) |
| 6 | | xp1st 8025 |
. . . . . . . 8
⊢ (𝐴 ∈ (N ×
N) → (1st ‘𝐴) ∈ N) |
| 7 | 5, 6 | syl 17 |
. . . . . . 7
⊢ ((𝐴 ∈ Q ∧
𝐵 ∈ Q)
→ (1st ‘𝐴) ∈ N) |
| 8 | | elpqn 10944 |
. . . . . . . . 9
⊢ (𝐵 ∈ Q →
𝐵 ∈ (N
× N)) |
| 9 | 8 | adantl 481 |
. . . . . . . 8
⊢ ((𝐴 ∈ Q ∧
𝐵 ∈ Q)
→ 𝐵 ∈
(N × N)) |
| 10 | | xp2nd 8026 |
. . . . . . . 8
⊢ (𝐵 ∈ (N ×
N) → (2nd ‘𝐵) ∈ N) |
| 11 | 9, 10 | syl 17 |
. . . . . . 7
⊢ ((𝐴 ∈ Q ∧
𝐵 ∈ Q)
→ (2nd ‘𝐵) ∈ N) |
| 12 | | mulclpi 10912 |
. . . . . . 7
⊢
(((1st ‘𝐴) ∈ N ∧
(2nd ‘𝐵)
∈ N) → ((1st ‘𝐴) ·N
(2nd ‘𝐵))
∈ N) |
| 13 | 7, 11, 12 | syl2anc 584 |
. . . . . 6
⊢ ((𝐴 ∈ Q ∧
𝐵 ∈ Q)
→ ((1st ‘𝐴) ·N
(2nd ‘𝐵))
∈ N) |
| 14 | | xp1st 8025 |
. . . . . . . 8
⊢ (𝐵 ∈ (N ×
N) → (1st ‘𝐵) ∈ N) |
| 15 | 9, 14 | syl 17 |
. . . . . . 7
⊢ ((𝐴 ∈ Q ∧
𝐵 ∈ Q)
→ (1st ‘𝐵) ∈ N) |
| 16 | | xp2nd 8026 |
. . . . . . . 8
⊢ (𝐴 ∈ (N ×
N) → (2nd ‘𝐴) ∈ N) |
| 17 | 5, 16 | syl 17 |
. . . . . . 7
⊢ ((𝐴 ∈ Q ∧
𝐵 ∈ Q)
→ (2nd ‘𝐴) ∈ N) |
| 18 | | mulclpi 10912 |
. . . . . . 7
⊢
(((1st ‘𝐵) ∈ N ∧
(2nd ‘𝐴)
∈ N) → ((1st ‘𝐵) ·N
(2nd ‘𝐴))
∈ N) |
| 19 | 15, 17, 18 | syl2anc 584 |
. . . . . 6
⊢ ((𝐴 ∈ Q ∧
𝐵 ∈ Q)
→ ((1st ‘𝐵) ·N
(2nd ‘𝐴))
∈ N) |
| 20 | | ltexpi 10921 |
. . . . . 6
⊢
((((1st ‘𝐴) ·N
(2nd ‘𝐵))
∈ N ∧ ((1st ‘𝐵) ·N
(2nd ‘𝐴))
∈ N) → (((1st ‘𝐴) ·N
(2nd ‘𝐵))
<N ((1st ‘𝐵) ·N
(2nd ‘𝐴))
↔ ∃𝑦 ∈
N (((1st ‘𝐴) ·N
(2nd ‘𝐵))
+N 𝑦) = ((1st ‘𝐵) ·N
(2nd ‘𝐴)))) |
| 21 | 13, 19, 20 | syl2anc 584 |
. . . . 5
⊢ ((𝐴 ∈ Q ∧
𝐵 ∈ Q)
→ (((1st ‘𝐴) ·N
(2nd ‘𝐵))
<N ((1st ‘𝐵) ·N
(2nd ‘𝐴))
↔ ∃𝑦 ∈
N (((1st ‘𝐴) ·N
(2nd ‘𝐵))
+N 𝑦) = ((1st ‘𝐵) ·N
(2nd ‘𝐴)))) |
| 22 | | relxp 5677 |
. . . . . . . . . . . 12
⊢ Rel
(N × N) |
| 23 | 4 | ad2antrr 726 |
. . . . . . . . . . . 12
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → 𝐴
∈ (N × N)) |
| 24 | | 1st2nd 8043 |
. . . . . . . . . . . 12
⊢ ((Rel
(N × N) ∧ 𝐴 ∈ (N ×
N)) → 𝐴
= 〈(1st ‘𝐴), (2nd ‘𝐴)〉) |
| 25 | 22, 23, 24 | sylancr 587 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → 𝐴 =
〈(1st ‘𝐴), (2nd ‘𝐴)〉) |
| 26 | 25 | oveq1d 7425 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → (𝐴
+pQ 〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉) = (〈(1st
‘𝐴), (2nd
‘𝐴)〉
+pQ 〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉)) |
| 27 | 7 | adantr 480 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → (1st ‘𝐴) ∈ N) |
| 28 | 17 | adantr 480 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → (2nd ‘𝐴) ∈ N) |
| 29 | | simpr 484 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → 𝑦
∈ N) |
| 30 | | mulclpi 10912 |
. . . . . . . . . . . . 13
⊢
(((2nd ‘𝐴) ∈ N ∧
(2nd ‘𝐵)
∈ N) → ((2nd ‘𝐴) ·N
(2nd ‘𝐵))
∈ N) |
| 31 | 17, 11, 30 | syl2anc 584 |
. . . . . . . . . . . 12
⊢ ((𝐴 ∈ Q ∧
𝐵 ∈ Q)
→ ((2nd ‘𝐴) ·N
(2nd ‘𝐵))
∈ N) |
| 32 | 31 | adantr 480 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → ((2nd ‘𝐴) ·N
(2nd ‘𝐵))
∈ N) |
| 33 | | addpipq 10956 |
. . . . . . . . . . 11
⊢
((((1st ‘𝐴) ∈ N ∧
(2nd ‘𝐴)
∈ N) ∧ (𝑦 ∈ N ∧
((2nd ‘𝐴)
·N (2nd ‘𝐵)) ∈ N)) →
(〈(1st ‘𝐴), (2nd ‘𝐴)〉 +pQ
〈𝑦, ((2nd
‘𝐴)
·N (2nd ‘𝐵))〉) = 〈(((1st
‘𝐴)
·N ((2nd ‘𝐴) ·N
(2nd ‘𝐵)))
+N (𝑦 ·N
(2nd ‘𝐴))), ((2nd ‘𝐴)
·N ((2nd ‘𝐴) ·N
(2nd ‘𝐵)))〉) |
| 34 | 27, 28, 29, 32, 33 | syl22anc 838 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → (〈(1st ‘𝐴), (2nd ‘𝐴)〉 +pQ
〈𝑦, ((2nd
‘𝐴)
·N (2nd ‘𝐵))〉) = 〈(((1st
‘𝐴)
·N ((2nd ‘𝐴) ·N
(2nd ‘𝐵)))
+N (𝑦 ·N
(2nd ‘𝐴))), ((2nd ‘𝐴)
·N ((2nd ‘𝐴) ·N
(2nd ‘𝐵)))〉) |
| 35 | 26, 34 | eqtrd 2771 |
. . . . . . . . 9
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → (𝐴
+pQ 〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉) = 〈(((1st
‘𝐴)
·N ((2nd ‘𝐴) ·N
(2nd ‘𝐵)))
+N (𝑦 ·N
(2nd ‘𝐴))), ((2nd ‘𝐴)
·N ((2nd ‘𝐴) ·N
(2nd ‘𝐵)))〉) |
| 36 | | oveq2 7418 |
. . . . . . . . . . . 12
⊢
((((1st ‘𝐴) ·N
(2nd ‘𝐵))
+N 𝑦) = ((1st ‘𝐵) ·N
(2nd ‘𝐴))
→ ((2nd ‘𝐴) ·N
(((1st ‘𝐴)
·N (2nd ‘𝐵)) +N 𝑦)) = ((2nd
‘𝐴)
·N ((1st ‘𝐵) ·N
(2nd ‘𝐴)))) |
| 37 | | distrpi 10917 |
. . . . . . . . . . . . 13
⊢
((2nd ‘𝐴) ·N
(((1st ‘𝐴)
·N (2nd ‘𝐵)) +N 𝑦)) = (((2nd
‘𝐴)
·N ((1st ‘𝐴) ·N
(2nd ‘𝐵)))
+N ((2nd ‘𝐴) ·N 𝑦)) |
| 38 | | fvex 6894 |
. . . . . . . . . . . . . . 15
⊢
(2nd ‘𝐴) ∈ V |
| 39 | | fvex 6894 |
. . . . . . . . . . . . . . 15
⊢
(1st ‘𝐴) ∈ V |
| 40 | | fvex 6894 |
. . . . . . . . . . . . . . 15
⊢
(2nd ‘𝐵) ∈ V |
| 41 | | mulcompi 10915 |
. . . . . . . . . . . . . . 15
⊢ (𝑥
·N 𝑦) = (𝑦 ·N 𝑥) |
| 42 | | mulasspi 10916 |
. . . . . . . . . . . . . . 15
⊢ ((𝑥
·N 𝑦) ·N 𝑧) = (𝑥 ·N (𝑦
·N 𝑧)) |
| 43 | 38, 39, 40, 41, 42 | caov12 7640 |
. . . . . . . . . . . . . 14
⊢
((2nd ‘𝐴) ·N
((1st ‘𝐴)
·N (2nd ‘𝐵))) = ((1st ‘𝐴)
·N ((2nd ‘𝐴) ·N
(2nd ‘𝐵))) |
| 44 | | mulcompi 10915 |
. . . . . . . . . . . . . 14
⊢
((2nd ‘𝐴) ·N 𝑦) = (𝑦 ·N
(2nd ‘𝐴)) |
| 45 | 43, 44 | oveq12i 7422 |
. . . . . . . . . . . . 13
⊢
(((2nd ‘𝐴) ·N
((1st ‘𝐴)
·N (2nd ‘𝐵))) +N
((2nd ‘𝐴)
·N 𝑦)) = (((1st ‘𝐴)
·N ((2nd ‘𝐴) ·N
(2nd ‘𝐵)))
+N (𝑦 ·N
(2nd ‘𝐴))) |
| 46 | 37, 45 | eqtr2i 2760 |
. . . . . . . . . . . 12
⊢
(((1st ‘𝐴) ·N
((2nd ‘𝐴)
·N (2nd ‘𝐵))) +N (𝑦
·N (2nd ‘𝐴))) = ((2nd ‘𝐴)
·N (((1st ‘𝐴) ·N
(2nd ‘𝐵))
+N 𝑦)) |
| 47 | | mulasspi 10916 |
. . . . . . . . . . . . 13
⊢
(((2nd ‘𝐴) ·N
(2nd ‘𝐴))
·N (1st ‘𝐵)) = ((2nd ‘𝐴)
·N ((2nd ‘𝐴) ·N
(1st ‘𝐵))) |
| 48 | | mulcompi 10915 |
. . . . . . . . . . . . . 14
⊢
((2nd ‘𝐴) ·N
(1st ‘𝐵))
= ((1st ‘𝐵) ·N
(2nd ‘𝐴)) |
| 49 | 48 | oveq2i 7421 |
. . . . . . . . . . . . 13
⊢
((2nd ‘𝐴) ·N
((2nd ‘𝐴)
·N (1st ‘𝐵))) = ((2nd ‘𝐴)
·N ((1st ‘𝐵) ·N
(2nd ‘𝐴))) |
| 50 | 47, 49 | eqtri 2759 |
. . . . . . . . . . . 12
⊢
(((2nd ‘𝐴) ·N
(2nd ‘𝐴))
·N (1st ‘𝐵)) = ((2nd ‘𝐴)
·N ((1st ‘𝐵) ·N
(2nd ‘𝐴))) |
| 51 | 36, 46, 50 | 3eqtr4g 2796 |
. . . . . . . . . . 11
⊢
((((1st ‘𝐴) ·N
(2nd ‘𝐵))
+N 𝑦) = ((1st ‘𝐵) ·N
(2nd ‘𝐴))
→ (((1st ‘𝐴) ·N
((2nd ‘𝐴)
·N (2nd ‘𝐵))) +N (𝑦
·N (2nd ‘𝐴))) = (((2nd ‘𝐴)
·N (2nd ‘𝐴)) ·N
(1st ‘𝐵))) |
| 52 | | mulasspi 10916 |
. . . . . . . . . . . . 13
⊢
(((2nd ‘𝐴) ·N
(2nd ‘𝐴))
·N (2nd ‘𝐵)) = ((2nd ‘𝐴)
·N ((2nd ‘𝐴) ·N
(2nd ‘𝐵))) |
| 53 | 52 | eqcomi 2745 |
. . . . . . . . . . . 12
⊢
((2nd ‘𝐴) ·N
((2nd ‘𝐴)
·N (2nd ‘𝐵))) = (((2nd ‘𝐴)
·N (2nd ‘𝐴)) ·N
(2nd ‘𝐵)) |
| 54 | 53 | a1i 11 |
. . . . . . . . . . 11
⊢
((((1st ‘𝐴) ·N
(2nd ‘𝐵))
+N 𝑦) = ((1st ‘𝐵) ·N
(2nd ‘𝐴))
→ ((2nd ‘𝐴) ·N
((2nd ‘𝐴)
·N (2nd ‘𝐵))) = (((2nd ‘𝐴)
·N (2nd ‘𝐴)) ·N
(2nd ‘𝐵))) |
| 55 | 51, 54 | opeq12d 4862 |
. . . . . . . . . 10
⊢
((((1st ‘𝐴) ·N
(2nd ‘𝐵))
+N 𝑦) = ((1st ‘𝐵) ·N
(2nd ‘𝐴))
→ 〈(((1st ‘𝐴) ·N
((2nd ‘𝐴)
·N (2nd ‘𝐵))) +N (𝑦
·N (2nd ‘𝐴))), ((2nd ‘𝐴)
·N ((2nd ‘𝐴) ·N
(2nd ‘𝐵)))〉 = 〈(((2nd
‘𝐴)
·N (2nd ‘𝐴)) ·N
(1st ‘𝐵)),
(((2nd ‘𝐴)
·N (2nd ‘𝐴)) ·N
(2nd ‘𝐵))〉) |
| 56 | 55 | eqeq2d 2747 |
. . . . . . . . 9
⊢
((((1st ‘𝐴) ·N
(2nd ‘𝐵))
+N 𝑦) = ((1st ‘𝐵) ·N
(2nd ‘𝐴))
→ ((𝐴
+pQ 〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉) = 〈(((1st
‘𝐴)
·N ((2nd ‘𝐴) ·N
(2nd ‘𝐵)))
+N (𝑦 ·N
(2nd ‘𝐴))), ((2nd ‘𝐴)
·N ((2nd ‘𝐴) ·N
(2nd ‘𝐵)))〉 ↔ (𝐴 +pQ 〈𝑦, ((2nd ‘𝐴)
·N (2nd ‘𝐵))〉) = 〈(((2nd
‘𝐴)
·N (2nd ‘𝐴)) ·N
(1st ‘𝐵)),
(((2nd ‘𝐴)
·N (2nd ‘𝐴)) ·N
(2nd ‘𝐵))〉)) |
| 57 | 35, 56 | syl5ibcom 245 |
. . . . . . . 8
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → ((((1st ‘𝐴) ·N
(2nd ‘𝐵))
+N 𝑦) = ((1st ‘𝐵) ·N
(2nd ‘𝐴))
→ (𝐴
+pQ 〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉) = 〈(((2nd
‘𝐴)
·N (2nd ‘𝐴)) ·N
(1st ‘𝐵)),
(((2nd ‘𝐴)
·N (2nd ‘𝐴)) ·N
(2nd ‘𝐵))〉)) |
| 58 | | fveq2 6881 |
. . . . . . . . 9
⊢ ((𝐴 +pQ
〈𝑦, ((2nd
‘𝐴)
·N (2nd ‘𝐵))〉) = 〈(((2nd
‘𝐴)
·N (2nd ‘𝐴)) ·N
(1st ‘𝐵)),
(((2nd ‘𝐴)
·N (2nd ‘𝐴)) ·N
(2nd ‘𝐵))〉 →
([Q]‘(𝐴
+pQ 〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉)) =
([Q]‘〈(((2nd ‘𝐴) ·N
(2nd ‘𝐴))
·N (1st ‘𝐵)), (((2nd ‘𝐴)
·N (2nd ‘𝐴)) ·N
(2nd ‘𝐵))〉)) |
| 59 | | adderpq 10975 |
. . . . . . . . . . 11
⊢
(([Q]‘𝐴) +Q
([Q]‘〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉)) = ([Q]‘(𝐴 +pQ
〈𝑦, ((2nd
‘𝐴)
·N (2nd ‘𝐵))〉)) |
| 60 | | nqerid 10952 |
. . . . . . . . . . . . 13
⊢ (𝐴 ∈ Q →
([Q]‘𝐴)
= 𝐴) |
| 61 | 60 | ad2antrr 726 |
. . . . . . . . . . . 12
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → ([Q]‘𝐴) = 𝐴) |
| 62 | 61 | oveq1d 7425 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → (([Q]‘𝐴) +Q
([Q]‘〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉)) = (𝐴 +Q
([Q]‘〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉))) |
| 63 | 59, 62 | eqtr3id 2785 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → ([Q]‘(𝐴 +pQ 〈𝑦, ((2nd ‘𝐴)
·N (2nd ‘𝐵))〉)) = (𝐴 +Q
([Q]‘〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉))) |
| 64 | | mulclpi 10912 |
. . . . . . . . . . . . . . . 16
⊢
(((2nd ‘𝐴) ∈ N ∧
(2nd ‘𝐴)
∈ N) → ((2nd ‘𝐴) ·N
(2nd ‘𝐴))
∈ N) |
| 65 | 17, 17, 64 | syl2anc 584 |
. . . . . . . . . . . . . . 15
⊢ ((𝐴 ∈ Q ∧
𝐵 ∈ Q)
→ ((2nd ‘𝐴) ·N
(2nd ‘𝐴))
∈ N) |
| 66 | 65 | adantr 480 |
. . . . . . . . . . . . . 14
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → ((2nd ‘𝐴) ·N
(2nd ‘𝐴))
∈ N) |
| 67 | 15 | adantr 480 |
. . . . . . . . . . . . . 14
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → (1st ‘𝐵) ∈ N) |
| 68 | 11 | adantr 480 |
. . . . . . . . . . . . . 14
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → (2nd ‘𝐵) ∈ N) |
| 69 | | mulcanenq 10979 |
. . . . . . . . . . . . . 14
⊢
((((2nd ‘𝐴) ·N
(2nd ‘𝐴))
∈ N ∧ (1st ‘𝐵) ∈ N ∧
(2nd ‘𝐵)
∈ N) → 〈(((2nd ‘𝐴) ·N
(2nd ‘𝐴))
·N (1st ‘𝐵)), (((2nd ‘𝐴)
·N (2nd ‘𝐴)) ·N
(2nd ‘𝐵))〉 ~Q
〈(1st ‘𝐵), (2nd ‘𝐵)〉) |
| 70 | 66, 67, 68, 69 | syl3anc 1373 |
. . . . . . . . . . . . 13
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → 〈(((2nd ‘𝐴) ·N
(2nd ‘𝐴))
·N (1st ‘𝐵)), (((2nd ‘𝐴)
·N (2nd ‘𝐴)) ·N
(2nd ‘𝐵))〉 ~Q
〈(1st ‘𝐵), (2nd ‘𝐵)〉) |
| 71 | 8 | ad2antlr 727 |
. . . . . . . . . . . . . 14
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → 𝐵
∈ (N × N)) |
| 72 | | 1st2nd 8043 |
. . . . . . . . . . . . . 14
⊢ ((Rel
(N × N) ∧ 𝐵 ∈ (N ×
N)) → 𝐵
= 〈(1st ‘𝐵), (2nd ‘𝐵)〉) |
| 73 | 22, 71, 72 | sylancr 587 |
. . . . . . . . . . . . 13
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → 𝐵 =
〈(1st ‘𝐵), (2nd ‘𝐵)〉) |
| 74 | 70, 73 | breqtrrd 5152 |
. . . . . . . . . . . 12
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → 〈(((2nd ‘𝐴) ·N
(2nd ‘𝐴))
·N (1st ‘𝐵)), (((2nd ‘𝐴)
·N (2nd ‘𝐴)) ·N
(2nd ‘𝐵))〉 ~Q 𝐵) |
| 75 | | mulclpi 10912 |
. . . . . . . . . . . . . . 15
⊢
((((2nd ‘𝐴) ·N
(2nd ‘𝐴))
∈ N ∧ (1st ‘𝐵) ∈ N) →
(((2nd ‘𝐴)
·N (2nd ‘𝐴)) ·N
(1st ‘𝐵))
∈ N) |
| 76 | 66, 67, 75 | syl2anc 584 |
. . . . . . . . . . . . . 14
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → (((2nd ‘𝐴) ·N
(2nd ‘𝐴))
·N (1st ‘𝐵)) ∈ N) |
| 77 | | mulclpi 10912 |
. . . . . . . . . . . . . . 15
⊢
((((2nd ‘𝐴) ·N
(2nd ‘𝐴))
∈ N ∧ (2nd ‘𝐵) ∈ N) →
(((2nd ‘𝐴)
·N (2nd ‘𝐴)) ·N
(2nd ‘𝐵))
∈ N) |
| 78 | 66, 68, 77 | syl2anc 584 |
. . . . . . . . . . . . . 14
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → (((2nd ‘𝐴) ·N
(2nd ‘𝐴))
·N (2nd ‘𝐵)) ∈ N) |
| 79 | 76, 78 | opelxpd 5698 |
. . . . . . . . . . . . 13
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → 〈(((2nd ‘𝐴) ·N
(2nd ‘𝐴))
·N (1st ‘𝐵)), (((2nd ‘𝐴)
·N (2nd ‘𝐴)) ·N
(2nd ‘𝐵))〉 ∈ (N ×
N)) |
| 80 | | nqereq 10954 |
. . . . . . . . . . . . 13
⊢
((〈(((2nd ‘𝐴) ·N
(2nd ‘𝐴))
·N (1st ‘𝐵)), (((2nd ‘𝐴)
·N (2nd ‘𝐴)) ·N
(2nd ‘𝐵))〉 ∈ (N ×
N) ∧ 𝐵
∈ (N × N)) →
(〈(((2nd ‘𝐴) ·N
(2nd ‘𝐴))
·N (1st ‘𝐵)), (((2nd ‘𝐴)
·N (2nd ‘𝐴)) ·N
(2nd ‘𝐵))〉 ~Q 𝐵 ↔
([Q]‘〈(((2nd ‘𝐴) ·N
(2nd ‘𝐴))
·N (1st ‘𝐵)), (((2nd ‘𝐴)
·N (2nd ‘𝐴)) ·N
(2nd ‘𝐵))〉) = ([Q]‘𝐵))) |
| 81 | 79, 71, 80 | syl2anc 584 |
. . . . . . . . . . . 12
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → (〈(((2nd ‘𝐴) ·N
(2nd ‘𝐴))
·N (1st ‘𝐵)), (((2nd ‘𝐴)
·N (2nd ‘𝐴)) ·N
(2nd ‘𝐵))〉 ~Q 𝐵 ↔
([Q]‘〈(((2nd ‘𝐴) ·N
(2nd ‘𝐴))
·N (1st ‘𝐵)), (((2nd ‘𝐴)
·N (2nd ‘𝐴)) ·N
(2nd ‘𝐵))〉) = ([Q]‘𝐵))) |
| 82 | 74, 81 | mpbid 232 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → ([Q]‘〈(((2nd
‘𝐴)
·N (2nd ‘𝐴)) ·N
(1st ‘𝐵)),
(((2nd ‘𝐴)
·N (2nd ‘𝐴)) ·N
(2nd ‘𝐵))〉) = ([Q]‘𝐵)) |
| 83 | | nqerid 10952 |
. . . . . . . . . . . 12
⊢ (𝐵 ∈ Q →
([Q]‘𝐵)
= 𝐵) |
| 84 | 83 | ad2antlr 727 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → ([Q]‘𝐵) = 𝐵) |
| 85 | 82, 84 | eqtrd 2771 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → ([Q]‘〈(((2nd
‘𝐴)
·N (2nd ‘𝐴)) ·N
(1st ‘𝐵)),
(((2nd ‘𝐴)
·N (2nd ‘𝐴)) ·N
(2nd ‘𝐵))〉) = 𝐵) |
| 86 | 63, 85 | eqeq12d 2752 |
. . . . . . . . 9
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → (([Q]‘(𝐴 +pQ 〈𝑦, ((2nd ‘𝐴)
·N (2nd ‘𝐵))〉)) =
([Q]‘〈(((2nd ‘𝐴) ·N
(2nd ‘𝐴))
·N (1st ‘𝐵)), (((2nd ‘𝐴)
·N (2nd ‘𝐴)) ·N
(2nd ‘𝐵))〉) ↔ (𝐴 +Q
([Q]‘〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉)) = 𝐵)) |
| 87 | 58, 86 | imbitrid 244 |
. . . . . . . 8
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → ((𝐴
+pQ 〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉) = 〈(((2nd
‘𝐴)
·N (2nd ‘𝐴)) ·N
(1st ‘𝐵)),
(((2nd ‘𝐴)
·N (2nd ‘𝐴)) ·N
(2nd ‘𝐵))〉 → (𝐴 +Q
([Q]‘〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉)) = 𝐵)) |
| 88 | 57, 87 | syld 47 |
. . . . . . 7
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → ((((1st ‘𝐴) ·N
(2nd ‘𝐵))
+N 𝑦) = ((1st ‘𝐵) ·N
(2nd ‘𝐴))
→ (𝐴
+Q ([Q]‘〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉)) = 𝐵)) |
| 89 | | fvex 6894 |
. . . . . . . 8
⊢
([Q]‘〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉) ∈ V |
| 90 | | oveq2 7418 |
. . . . . . . . 9
⊢ (𝑥 =
([Q]‘〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉) → (𝐴 +Q 𝑥) = (𝐴 +Q
([Q]‘〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉))) |
| 91 | 90 | eqeq1d 2738 |
. . . . . . . 8
⊢ (𝑥 =
([Q]‘〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉) → ((𝐴 +Q 𝑥) = 𝐵 ↔ (𝐴 +Q
([Q]‘〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉)) = 𝐵)) |
| 92 | 89, 91 | spcev 3590 |
. . . . . . 7
⊢ ((𝐴 +Q
([Q]‘〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉)) = 𝐵 → ∃𝑥(𝐴 +Q 𝑥) = 𝐵) |
| 93 | 88, 92 | syl6 35 |
. . . . . 6
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → ((((1st ‘𝐴) ·N
(2nd ‘𝐵))
+N 𝑦) = ((1st ‘𝐵) ·N
(2nd ‘𝐴))
→ ∃𝑥(𝐴 +Q
𝑥) = 𝐵)) |
| 94 | 93 | rexlimdva 3142 |
. . . . 5
⊢ ((𝐴 ∈ Q ∧
𝐵 ∈ Q)
→ (∃𝑦 ∈
N (((1st ‘𝐴) ·N
(2nd ‘𝐵))
+N 𝑦) = ((1st ‘𝐵) ·N
(2nd ‘𝐴))
→ ∃𝑥(𝐴 +Q
𝑥) = 𝐵)) |
| 95 | 21, 94 | sylbid 240 |
. . . 4
⊢ ((𝐴 ∈ Q ∧
𝐵 ∈ Q)
→ (((1st ‘𝐴) ·N
(2nd ‘𝐵))
<N ((1st ‘𝐵) ·N
(2nd ‘𝐴))
→ ∃𝑥(𝐴 +Q
𝑥) = 𝐵)) |
| 96 | 3, 95 | sylbid 240 |
. . 3
⊢ ((𝐴 ∈ Q ∧
𝐵 ∈ Q)
→ (𝐴
<Q 𝐵 → ∃𝑥(𝐴 +Q 𝑥) = 𝐵)) |
| 97 | 2, 96 | mpcom 38 |
. 2
⊢ (𝐴 <Q
𝐵 → ∃𝑥(𝐴 +Q 𝑥) = 𝐵) |
| 98 | | eleq1 2823 |
. . . . . . 7
⊢ ((𝐴 +Q
𝑥) = 𝐵 → ((𝐴 +Q 𝑥) ∈ Q ↔
𝐵 ∈
Q)) |
| 99 | 98 | biimparc 479 |
. . . . . 6
⊢ ((𝐵 ∈ Q ∧
(𝐴
+Q 𝑥) = 𝐵) → (𝐴 +Q 𝑥) ∈
Q) |
| 100 | | addnqf 10967 |
. . . . . . . 8
⊢
+Q :(Q ×
Q)⟶Q |
| 101 | 100 | fdmi 6722 |
. . . . . . 7
⊢ dom
+Q = (Q ×
Q) |
| 102 | | 0nnq 10943 |
. . . . . . 7
⊢ ¬
∅ ∈ Q |
| 103 | 101, 102 | ndmovrcl 7598 |
. . . . . 6
⊢ ((𝐴 +Q
𝑥) ∈ Q
→ (𝐴 ∈
Q ∧ 𝑥
∈ Q)) |
| 104 | | ltaddnq 10993 |
. . . . . 6
⊢ ((𝐴 ∈ Q ∧
𝑥 ∈ Q)
→ 𝐴
<Q (𝐴 +Q 𝑥)) |
| 105 | 99, 103, 104 | 3syl 18 |
. . . . 5
⊢ ((𝐵 ∈ Q ∧
(𝐴
+Q 𝑥) = 𝐵) → 𝐴 <Q (𝐴 +Q
𝑥)) |
| 106 | | simpr 484 |
. . . . 5
⊢ ((𝐵 ∈ Q ∧
(𝐴
+Q 𝑥) = 𝐵) → (𝐴 +Q 𝑥) = 𝐵) |
| 107 | 105, 106 | breqtrd 5150 |
. . . 4
⊢ ((𝐵 ∈ Q ∧
(𝐴
+Q 𝑥) = 𝐵) → 𝐴 <Q 𝐵) |
| 108 | 107 | ex 412 |
. . 3
⊢ (𝐵 ∈ Q →
((𝐴
+Q 𝑥) = 𝐵 → 𝐴 <Q 𝐵)) |
| 109 | 108 | exlimdv 1933 |
. 2
⊢ (𝐵 ∈ Q →
(∃𝑥(𝐴 +Q 𝑥) = 𝐵 → 𝐴 <Q 𝐵)) |
| 110 | 97, 109 | impbid2 226 |
1
⊢ (𝐵 ∈ Q →
(𝐴
<Q 𝐵 ↔ ∃𝑥(𝐴 +Q 𝑥) = 𝐵)) |