Step | Hyp | Ref
| Expression |
1 | | ltrelnq 10682 |
. . . 4
⊢
<Q ⊆ (Q ×
Q) |
2 | 1 | brel 5652 |
. . 3
⊢ (𝐴 <Q
𝐵 → (𝐴 ∈ Q ∧ 𝐵 ∈
Q)) |
3 | | ordpinq 10699 |
. . . 4
⊢ ((𝐴 ∈ Q ∧
𝐵 ∈ Q)
→ (𝐴
<Q 𝐵 ↔ ((1st ‘𝐴)
·N (2nd ‘𝐵)) <N
((1st ‘𝐵)
·N (2nd ‘𝐴)))) |
4 | | elpqn 10681 |
. . . . . . . . 9
⊢ (𝐴 ∈ Q →
𝐴 ∈ (N
× N)) |
5 | 4 | adantr 481 |
. . . . . . . 8
⊢ ((𝐴 ∈ Q ∧
𝐵 ∈ Q)
→ 𝐴 ∈
(N × N)) |
6 | | xp1st 7863 |
. . . . . . . 8
⊢ (𝐴 ∈ (N ×
N) → (1st ‘𝐴) ∈ N) |
7 | 5, 6 | syl 17 |
. . . . . . 7
⊢ ((𝐴 ∈ Q ∧
𝐵 ∈ Q)
→ (1st ‘𝐴) ∈ N) |
8 | | elpqn 10681 |
. . . . . . . . 9
⊢ (𝐵 ∈ Q →
𝐵 ∈ (N
× N)) |
9 | 8 | adantl 482 |
. . . . . . . 8
⊢ ((𝐴 ∈ Q ∧
𝐵 ∈ Q)
→ 𝐵 ∈
(N × N)) |
10 | | xp2nd 7864 |
. . . . . . . 8
⊢ (𝐵 ∈ (N ×
N) → (2nd ‘𝐵) ∈ N) |
11 | 9, 10 | syl 17 |
. . . . . . 7
⊢ ((𝐴 ∈ Q ∧
𝐵 ∈ Q)
→ (2nd ‘𝐵) ∈ N) |
12 | | mulclpi 10649 |
. . . . . . 7
⊢
(((1st ‘𝐴) ∈ N ∧
(2nd ‘𝐵)
∈ N) → ((1st ‘𝐴) ·N
(2nd ‘𝐵))
∈ N) |
13 | 7, 11, 12 | syl2anc 584 |
. . . . . 6
⊢ ((𝐴 ∈ Q ∧
𝐵 ∈ Q)
→ ((1st ‘𝐴) ·N
(2nd ‘𝐵))
∈ N) |
14 | | xp1st 7863 |
. . . . . . . 8
⊢ (𝐵 ∈ (N ×
N) → (1st ‘𝐵) ∈ N) |
15 | 9, 14 | syl 17 |
. . . . . . 7
⊢ ((𝐴 ∈ Q ∧
𝐵 ∈ Q)
→ (1st ‘𝐵) ∈ N) |
16 | | xp2nd 7864 |
. . . . . . . 8
⊢ (𝐴 ∈ (N ×
N) → (2nd ‘𝐴) ∈ N) |
17 | 5, 16 | syl 17 |
. . . . . . 7
⊢ ((𝐴 ∈ Q ∧
𝐵 ∈ Q)
→ (2nd ‘𝐴) ∈ N) |
18 | | mulclpi 10649 |
. . . . . . 7
⊢
(((1st ‘𝐵) ∈ N ∧
(2nd ‘𝐴)
∈ N) → ((1st ‘𝐵) ·N
(2nd ‘𝐴))
∈ N) |
19 | 15, 17, 18 | syl2anc 584 |
. . . . . 6
⊢ ((𝐴 ∈ Q ∧
𝐵 ∈ Q)
→ ((1st ‘𝐵) ·N
(2nd ‘𝐴))
∈ N) |
20 | | ltexpi 10658 |
. . . . . 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 5607 |
. . . . . . . . . . . 12
⊢ Rel
(N × N) |
23 | 4 | ad2antrr 723 |
. . . . . . . . . . . 12
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → 𝐴
∈ (N × N)) |
24 | | 1st2nd 7880 |
. . . . . . . . . . . 12
⊢ ((Rel
(N × N) ∧ 𝐴 ∈ (N ×
N)) → 𝐴
= 〈(1st ‘𝐴), (2nd ‘𝐴)〉) |
25 | 22, 23, 24 | sylancr 587 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → 𝐴 =
〈(1st ‘𝐴), (2nd ‘𝐴)〉) |
26 | 25 | oveq1d 7290 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → (𝐴
+pQ 〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉) = (〈(1st
‘𝐴), (2nd
‘𝐴)〉
+pQ 〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉)) |
27 | 7 | adantr 481 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → (1st ‘𝐴) ∈ N) |
28 | 17 | adantr 481 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → (2nd ‘𝐴) ∈ N) |
29 | | simpr 485 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → 𝑦
∈ N) |
30 | | mulclpi 10649 |
. . . . . . . . . . . . 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 481 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → ((2nd ‘𝐴) ·N
(2nd ‘𝐵))
∈ N) |
33 | | addpipq 10693 |
. . . . . . . . . . 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 836 |
. . . . . . . . . 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 2778 |
. . . . . . . . 9
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → (𝐴
+pQ 〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉) = 〈(((1st
‘𝐴)
·N ((2nd ‘𝐴) ·N
(2nd ‘𝐵)))
+N (𝑦 ·N
(2nd ‘𝐴))), ((2nd ‘𝐴)
·N ((2nd ‘𝐴) ·N
(2nd ‘𝐵)))〉) |
36 | | oveq2 7283 |
. . . . . . . . . . . 12
⊢
((((1st ‘𝐴) ·N
(2nd ‘𝐵))
+N 𝑦) = ((1st ‘𝐵) ·N
(2nd ‘𝐴))
→ ((2nd ‘𝐴) ·N
(((1st ‘𝐴)
·N (2nd ‘𝐵)) +N 𝑦)) = ((2nd
‘𝐴)
·N ((1st ‘𝐵) ·N
(2nd ‘𝐴)))) |
37 | | distrpi 10654 |
. . . . . . . . . . . . 13
⊢
((2nd ‘𝐴) ·N
(((1st ‘𝐴)
·N (2nd ‘𝐵)) +N 𝑦)) = (((2nd
‘𝐴)
·N ((1st ‘𝐴) ·N
(2nd ‘𝐵)))
+N ((2nd ‘𝐴) ·N 𝑦)) |
38 | | fvex 6787 |
. . . . . . . . . . . . . . 15
⊢
(2nd ‘𝐴) ∈ V |
39 | | fvex 6787 |
. . . . . . . . . . . . . . 15
⊢
(1st ‘𝐴) ∈ V |
40 | | fvex 6787 |
. . . . . . . . . . . . . . 15
⊢
(2nd ‘𝐵) ∈ V |
41 | | mulcompi 10652 |
. . . . . . . . . . . . . . 15
⊢ (𝑥
·N 𝑦) = (𝑦 ·N 𝑥) |
42 | | mulasspi 10653 |
. . . . . . . . . . . . . . 15
⊢ ((𝑥
·N 𝑦) ·N 𝑧) = (𝑥 ·N (𝑦
·N 𝑧)) |
43 | 38, 39, 40, 41, 42 | caov12 7500 |
. . . . . . . . . . . . . 14
⊢
((2nd ‘𝐴) ·N
((1st ‘𝐴)
·N (2nd ‘𝐵))) = ((1st ‘𝐴)
·N ((2nd ‘𝐴) ·N
(2nd ‘𝐵))) |
44 | | mulcompi 10652 |
. . . . . . . . . . . . . 14
⊢
((2nd ‘𝐴) ·N 𝑦) = (𝑦 ·N
(2nd ‘𝐴)) |
45 | 43, 44 | oveq12i 7287 |
. . . . . . . . . . . . 13
⊢
(((2nd ‘𝐴) ·N
((1st ‘𝐴)
·N (2nd ‘𝐵))) +N
((2nd ‘𝐴)
·N 𝑦)) = (((1st ‘𝐴)
·N ((2nd ‘𝐴) ·N
(2nd ‘𝐵)))
+N (𝑦 ·N
(2nd ‘𝐴))) |
46 | 37, 45 | eqtr2i 2767 |
. . . . . . . . . . . 12
⊢
(((1st ‘𝐴) ·N
((2nd ‘𝐴)
·N (2nd ‘𝐵))) +N (𝑦
·N (2nd ‘𝐴))) = ((2nd ‘𝐴)
·N (((1st ‘𝐴) ·N
(2nd ‘𝐵))
+N 𝑦)) |
47 | | mulasspi 10653 |
. . . . . . . . . . . . 13
⊢
(((2nd ‘𝐴) ·N
(2nd ‘𝐴))
·N (1st ‘𝐵)) = ((2nd ‘𝐴)
·N ((2nd ‘𝐴) ·N
(1st ‘𝐵))) |
48 | | mulcompi 10652 |
. . . . . . . . . . . . . 14
⊢
((2nd ‘𝐴) ·N
(1st ‘𝐵))
= ((1st ‘𝐵) ·N
(2nd ‘𝐴)) |
49 | 48 | oveq2i 7286 |
. . . . . . . . . . . . 13
⊢
((2nd ‘𝐴) ·N
((2nd ‘𝐴)
·N (1st ‘𝐵))) = ((2nd ‘𝐴)
·N ((1st ‘𝐵) ·N
(2nd ‘𝐴))) |
50 | 47, 49 | eqtri 2766 |
. . . . . . . . . . . 12
⊢
(((2nd ‘𝐴) ·N
(2nd ‘𝐴))
·N (1st ‘𝐵)) = ((2nd ‘𝐴)
·N ((1st ‘𝐵) ·N
(2nd ‘𝐴))) |
51 | 36, 46, 50 | 3eqtr4g 2803 |
. . . . . . . . . . 11
⊢
((((1st ‘𝐴) ·N
(2nd ‘𝐵))
+N 𝑦) = ((1st ‘𝐵) ·N
(2nd ‘𝐴))
→ (((1st ‘𝐴) ·N
((2nd ‘𝐴)
·N (2nd ‘𝐵))) +N (𝑦
·N (2nd ‘𝐴))) = (((2nd ‘𝐴)
·N (2nd ‘𝐴)) ·N
(1st ‘𝐵))) |
52 | | mulasspi 10653 |
. . . . . . . . . . . . 13
⊢
(((2nd ‘𝐴) ·N
(2nd ‘𝐴))
·N (2nd ‘𝐵)) = ((2nd ‘𝐴)
·N ((2nd ‘𝐴) ·N
(2nd ‘𝐵))) |
53 | 52 | eqcomi 2747 |
. . . . . . . . . . . 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 4812 |
. . . . . . . . . 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 2749 |
. . . . . . . . 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 244 |
. . . . . . . 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 6774 |
. . . . . . . . 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 10712 |
. . . . . . . . . . 11
⊢
(([Q]‘𝐴) +Q
([Q]‘〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉)) = ([Q]‘(𝐴 +pQ
〈𝑦, ((2nd
‘𝐴)
·N (2nd ‘𝐵))〉)) |
60 | | nqerid 10689 |
. . . . . . . . . . . . 13
⊢ (𝐴 ∈ Q →
([Q]‘𝐴)
= 𝐴) |
61 | 60 | ad2antrr 723 |
. . . . . . . . . . . 12
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → ([Q]‘𝐴) = 𝐴) |
62 | 61 | oveq1d 7290 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → (([Q]‘𝐴) +Q
([Q]‘〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉)) = (𝐴 +Q
([Q]‘〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉))) |
63 | 59, 62 | eqtr3id 2792 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → ([Q]‘(𝐴 +pQ 〈𝑦, ((2nd ‘𝐴)
·N (2nd ‘𝐵))〉)) = (𝐴 +Q
([Q]‘〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉))) |
64 | | mulclpi 10649 |
. . . . . . . . . . . . . . . 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 481 |
. . . . . . . . . . . . . 14
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → ((2nd ‘𝐴) ·N
(2nd ‘𝐴))
∈ N) |
67 | 15 | adantr 481 |
. . . . . . . . . . . . . 14
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → (1st ‘𝐵) ∈ N) |
68 | 11 | adantr 481 |
. . . . . . . . . . . . . 14
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → (2nd ‘𝐵) ∈ N) |
69 | | mulcanenq 10716 |
. . . . . . . . . . . . . 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 1370 |
. . . . . . . . . . . . 13
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → 〈(((2nd ‘𝐴) ·N
(2nd ‘𝐴))
·N (1st ‘𝐵)), (((2nd ‘𝐴)
·N (2nd ‘𝐴)) ·N
(2nd ‘𝐵))〉 ~Q
〈(1st ‘𝐵), (2nd ‘𝐵)〉) |
71 | 8 | ad2antlr 724 |
. . . . . . . . . . . . . 14
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → 𝐵
∈ (N × N)) |
72 | | 1st2nd 7880 |
. . . . . . . . . . . . . 14
⊢ ((Rel
(N × N) ∧ 𝐵 ∈ (N ×
N)) → 𝐵
= 〈(1st ‘𝐵), (2nd ‘𝐵)〉) |
73 | 22, 71, 72 | sylancr 587 |
. . . . . . . . . . . . 13
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → 𝐵 =
〈(1st ‘𝐵), (2nd ‘𝐵)〉) |
74 | 70, 73 | breqtrrd 5102 |
. . . . . . . . . . . 12
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → 〈(((2nd ‘𝐴) ·N
(2nd ‘𝐴))
·N (1st ‘𝐵)), (((2nd ‘𝐴)
·N (2nd ‘𝐴)) ·N
(2nd ‘𝐵))〉 ~Q 𝐵) |
75 | | mulclpi 10649 |
. . . . . . . . . . . . . . 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 10649 |
. . . . . . . . . . . . . . 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 5627 |
. . . . . . . . . . . . 13
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → 〈(((2nd ‘𝐴) ·N
(2nd ‘𝐴))
·N (1st ‘𝐵)), (((2nd ‘𝐴)
·N (2nd ‘𝐴)) ·N
(2nd ‘𝐵))〉 ∈ (N ×
N)) |
80 | | nqereq 10691 |
. . . . . . . . . . . . 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 231 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → ([Q]‘〈(((2nd
‘𝐴)
·N (2nd ‘𝐴)) ·N
(1st ‘𝐵)),
(((2nd ‘𝐴)
·N (2nd ‘𝐴)) ·N
(2nd ‘𝐵))〉) = ([Q]‘𝐵)) |
83 | | nqerid 10689 |
. . . . . . . . . . . 12
⊢ (𝐵 ∈ Q →
([Q]‘𝐵)
= 𝐵) |
84 | 83 | ad2antlr 724 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → ([Q]‘𝐵) = 𝐵) |
85 | 82, 84 | eqtrd 2778 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ Q ∧
𝐵 ∈ Q)
∧ 𝑦 ∈
N) → ([Q]‘〈(((2nd
‘𝐴)
·N (2nd ‘𝐴)) ·N
(1st ‘𝐵)),
(((2nd ‘𝐴)
·N (2nd ‘𝐴)) ·N
(2nd ‘𝐵))〉) = 𝐵) |
86 | 63, 85 | eqeq12d 2754 |
. . . . . . . . 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 | syl5ib 243 |
. . . . . . . 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 6787 |
. . . . . . . 8
⊢
([Q]‘〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉) ∈ V |
90 | | oveq2 7283 |
. . . . . . . . 9
⊢ (𝑥 =
([Q]‘〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉) → (𝐴 +Q 𝑥) = (𝐴 +Q
([Q]‘〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉))) |
91 | 90 | eqeq1d 2740 |
. . . . . . . 8
⊢ (𝑥 =
([Q]‘〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉) → ((𝐴 +Q 𝑥) = 𝐵 ↔ (𝐴 +Q
([Q]‘〈𝑦, ((2nd ‘𝐴) ·N
(2nd ‘𝐵))〉)) = 𝐵)) |
92 | 89, 91 | spcev 3545 |
. . . . . . 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 3213 |
. . . . 5
⊢ ((𝐴 ∈ Q ∧
𝐵 ∈ Q)
→ (∃𝑦 ∈
N (((1st ‘𝐴) ·N
(2nd ‘𝐵))
+N 𝑦) = ((1st ‘𝐵) ·N
(2nd ‘𝐴))
→ ∃𝑥(𝐴 +Q
𝑥) = 𝐵)) |
95 | 21, 94 | sylbid 239 |
. . . 4
⊢ ((𝐴 ∈ Q ∧
𝐵 ∈ Q)
→ (((1st ‘𝐴) ·N
(2nd ‘𝐵))
<N ((1st ‘𝐵) ·N
(2nd ‘𝐴))
→ ∃𝑥(𝐴 +Q
𝑥) = 𝐵)) |
96 | 3, 95 | sylbid 239 |
. . 3
⊢ ((𝐴 ∈ Q ∧
𝐵 ∈ Q)
→ (𝐴
<Q 𝐵 → ∃𝑥(𝐴 +Q 𝑥) = 𝐵)) |
97 | 2, 96 | mpcom 38 |
. 2
⊢ (𝐴 <Q
𝐵 → ∃𝑥(𝐴 +Q 𝑥) = 𝐵) |
98 | | eleq1 2826 |
. . . . . . 7
⊢ ((𝐴 +Q
𝑥) = 𝐵 → ((𝐴 +Q 𝑥) ∈ Q ↔
𝐵 ∈
Q)) |
99 | 98 | biimparc 480 |
. . . . . 6
⊢ ((𝐵 ∈ Q ∧
(𝐴
+Q 𝑥) = 𝐵) → (𝐴 +Q 𝑥) ∈
Q) |
100 | | addnqf 10704 |
. . . . . . . 8
⊢
+Q :(Q ×
Q)⟶Q |
101 | 100 | fdmi 6612 |
. . . . . . 7
⊢ dom
+Q = (Q ×
Q) |
102 | | 0nnq 10680 |
. . . . . . 7
⊢ ¬
∅ ∈ Q |
103 | 101, 102 | ndmovrcl 7458 |
. . . . . 6
⊢ ((𝐴 +Q
𝑥) ∈ Q
→ (𝐴 ∈
Q ∧ 𝑥
∈ Q)) |
104 | | ltaddnq 10730 |
. . . . . 6
⊢ ((𝐴 ∈ Q ∧
𝑥 ∈ Q)
→ 𝐴
<Q (𝐴 +Q 𝑥)) |
105 | 99, 103, 104 | 3syl 18 |
. . . . 5
⊢ ((𝐵 ∈ Q ∧
(𝐴
+Q 𝑥) = 𝐵) → 𝐴 <Q (𝐴 +Q
𝑥)) |
106 | | simpr 485 |
. . . . 5
⊢ ((𝐵 ∈ Q ∧
(𝐴
+Q 𝑥) = 𝐵) → (𝐴 +Q 𝑥) = 𝐵) |
107 | 105, 106 | breqtrd 5100 |
. . . 4
⊢ ((𝐵 ∈ Q ∧
(𝐴
+Q 𝑥) = 𝐵) → 𝐴 <Q 𝐵) |
108 | 107 | ex 413 |
. . 3
⊢ (𝐵 ∈ Q →
((𝐴
+Q 𝑥) = 𝐵 → 𝐴 <Q 𝐵)) |
109 | 108 | exlimdv 1936 |
. 2
⊢ (𝐵 ∈ Q →
(∃𝑥(𝐴 +Q 𝑥) = 𝐵 → 𝐴 <Q 𝐵)) |
110 | 97, 109 | impbid2 225 |
1
⊢ (𝐵 ∈ Q →
(𝐴
<Q 𝐵 ↔ ∃𝑥(𝐴 +Q 𝑥) = 𝐵)) |