Theorem ltexnq 10386

Description: Ordering on positive fractions in terms of existence of sum. Definition in Proposition 9-2.6 of [Gleason] p. 119. (Contributed by NM, 24-Apr-1996.) (Revised by Mario Carneiro, 10-May-2013.) (New usage is discouraged.)

Assertion

Ref	Expression
ltexnq	⊢ (𝐵 ∈ Q → (𝐴 <Q 𝐵 ↔ ∃𝑥(𝐴 +Q 𝑥) = 𝐵))

Distinct variable groups:   𝑥,𝐴   𝑥,𝐵

Proof of Theorem ltexnq

Dummy variables 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		ltrelnq 10337	. . . 4 ⊢ <Q ⊆ (Q × Q)
2	1	brel 5581	. . 3 ⊢ (𝐴 <Q 𝐵 → (𝐴 ∈ Q ∧ 𝐵 ∈ Q))
3		ordpinq 10354	. . . 4 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → (𝐴 <Q 𝐵 ↔ ((1st ‘𝐴) ·N (2nd ‘𝐵)) <N ((1st ‘𝐵) ·N (2nd ‘𝐴))))
4		elpqn 10336	. . . . . . . . 9 ⊢ (𝐴 ∈ Q → 𝐴 ∈ (N × N))
5	4	adantr 484	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → 𝐴 ∈ (N × N))
6		xp1st 7703	. . . . . . . 8 ⊢ (𝐴 ∈ (N × N) → (1st ‘𝐴) ∈ N)
7	5, 6	syl 17	. . . . . . 7 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → (1st ‘𝐴) ∈ N)
8		elpqn 10336	. . . . . . . . 9 ⊢ (𝐵 ∈ Q → 𝐵 ∈ (N × N))
9	8	adantl 485	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → 𝐵 ∈ (N × N))
10		xp2nd 7704	. . . . . . . 8 ⊢ (𝐵 ∈ (N × N) → (2nd ‘𝐵) ∈ N)
11	9, 10	syl 17	. . . . . . 7 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → (2nd ‘𝐵) ∈ N)
12		mulclpi 10304	. . . . . . 7 ⊢ (((1st ‘𝐴) ∈ N ∧ (2nd ‘𝐵) ∈ N) → ((1st ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
13	7, 11, 12	syl2anc 587	. . . . . 6 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → ((1st ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
14		xp1st 7703	. . . . . . . 8 ⊢ (𝐵 ∈ (N × N) → (1st ‘𝐵) ∈ N)
15	9, 14	syl 17	. . . . . . 7 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → (1st ‘𝐵) ∈ N)
16		xp2nd 7704	. . . . . . . 8 ⊢ (𝐴 ∈ (N × N) → (2nd ‘𝐴) ∈ N)
17	5, 16	syl 17	. . . . . . 7 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → (2nd ‘𝐴) ∈ N)
18		mulclpi 10304	. . . . . . 7 ⊢ (((1st ‘𝐵) ∈ N ∧ (2nd ‘𝐴) ∈ N) → ((1st ‘𝐵) ·N (2nd ‘𝐴)) ∈ N)
19	15, 17, 18	syl2anc 587	. . . . . 6 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → ((1st ‘𝐵) ·N (2nd ‘𝐴)) ∈ N)
20		ltexpi 10313	. . . . . 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 587	. . . . 5 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → (((1st ‘𝐴) ·N (2nd ‘𝐵)) <N ((1st ‘𝐵) ·N (2nd ‘𝐴)) ↔ ∃𝑦 ∈ N (((1st ‘𝐴) ·N (2nd ‘𝐵)) +N 𝑦) = ((1st ‘𝐵) ·N (2nd ‘𝐴))))
22		relxp 5537	. . . . . . . . . . . 12 ⊢ Rel (N × N)
23	4	ad2antrr 725	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → 𝐴 ∈ (N × N))
24		1st2nd 7720	. . . . . . . . . . . 12 ⊢ ((Rel (N × N) ∧ 𝐴 ∈ (N × N)) → 𝐴 = ⟨(1st ‘𝐴), (2nd ‘𝐴)⟩)
25	22, 23, 24	sylancr 590	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → 𝐴 = ⟨(1st ‘𝐴), (2nd ‘𝐴)⟩)
26	25	oveq1d 7150	. . . . . . . . . 10 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → (𝐴 +pQ ⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩) = (⟨(1st ‘𝐴), (2nd ‘𝐴)⟩ +pQ ⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩))
27	7	adantr 484	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → (1st ‘𝐴) ∈ N)
28	17	adantr 484	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → (2nd ‘𝐴) ∈ N)
29		simpr 488	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → 𝑦 ∈ N)
30		mulclpi 10304	. . . . . . . . . . . . 13 ⊢ (((2nd ‘𝐴) ∈ N ∧ (2nd ‘𝐵) ∈ N) → ((2nd ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
31	17, 11, 30	syl2anc 587	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → ((2nd ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
32	31	adantr 484	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → ((2nd ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
33		addpipq 10348	. . . . . . . . . . 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 837	. . . . . . . . . 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 2833	. . . . . . . . 9 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → (𝐴 +pQ ⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩) = ⟨(((1st ‘𝐴) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵))) +N (𝑦 ·N (2nd ‘𝐴))), ((2nd ‘𝐴) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵)))⟩)
36		oveq2 7143	. . . . . . . . . . . 12 ⊢ ((((1st ‘𝐴) ·N (2nd ‘𝐵)) +N 𝑦) = ((1st ‘𝐵) ·N (2nd ‘𝐴)) → ((2nd ‘𝐴) ·N (((1st ‘𝐴) ·N (2nd ‘𝐵)) +N 𝑦)) = ((2nd ‘𝐴) ·N ((1st ‘𝐵) ·N (2nd ‘𝐴))))
37		distrpi 10309	. . . . . . . . . . . . 13 ⊢ ((2nd ‘𝐴) ·N (((1st ‘𝐴) ·N (2nd ‘𝐵)) +N 𝑦)) = (((2nd ‘𝐴) ·N ((1st ‘𝐴) ·N (2nd ‘𝐵))) +N ((2nd ‘𝐴) ·N 𝑦))
38		fvex 6658	. . . . . . . . . . . . . . 15 ⊢ (2nd ‘𝐴) ∈ V
39		fvex 6658	. . . . . . . . . . . . . . 15 ⊢ (1st ‘𝐴) ∈ V
40		fvex 6658	. . . . . . . . . . . . . . 15 ⊢ (2nd ‘𝐵) ∈ V
41		mulcompi 10307	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ·N 𝑦) = (𝑦 ·N 𝑥)
42		mulasspi 10308	. . . . . . . . . . . . . . 15 ⊢ ((𝑥 ·N 𝑦) ·N 𝑧) = (𝑥 ·N (𝑦 ·N 𝑧))
43	38, 39, 40, 41, 42	caov12 7356	. . . . . . . . . . . . . 14 ⊢ ((2nd ‘𝐴) ·N ((1st ‘𝐴) ·N (2nd ‘𝐵))) = ((1st ‘𝐴) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵)))
44		mulcompi 10307	. . . . . . . . . . . . . 14 ⊢ ((2nd ‘𝐴) ·N 𝑦) = (𝑦 ·N (2nd ‘𝐴))
45	43, 44	oveq12i 7147	. . . . . . . . . . . . 13 ⊢ (((2nd ‘𝐴) ·N ((1st ‘𝐴) ·N (2nd ‘𝐵))) +N ((2nd ‘𝐴) ·N 𝑦)) = (((1st ‘𝐴) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵))) +N (𝑦 ·N (2nd ‘𝐴)))
46	37, 45	eqtr2i 2822	. . . . . . . . . . . 12 ⊢ (((1st ‘𝐴) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵))) +N (𝑦 ·N (2nd ‘𝐴))) = ((2nd ‘𝐴) ·N (((1st ‘𝐴) ·N (2nd ‘𝐵)) +N 𝑦))
47		mulasspi 10308	. . . . . . . . . . . . 13 ⊢ (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (1st ‘𝐵)) = ((2nd ‘𝐴) ·N ((2nd ‘𝐴) ·N (1st ‘𝐵)))
48		mulcompi 10307	. . . . . . . . . . . . . 14 ⊢ ((2nd ‘𝐴) ·N (1st ‘𝐵)) = ((1st ‘𝐵) ·N (2nd ‘𝐴))
49	48	oveq2i 7146	. . . . . . . . . . . . 13 ⊢ ((2nd ‘𝐴) ·N ((2nd ‘𝐴) ·N (1st ‘𝐵))) = ((2nd ‘𝐴) ·N ((1st ‘𝐵) ·N (2nd ‘𝐴)))
50	47, 49	eqtri 2821	. . . . . . . . . . . 12 ⊢ (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (1st ‘𝐵)) = ((2nd ‘𝐴) ·N ((1st ‘𝐵) ·N (2nd ‘𝐴)))
51	36, 46, 50	3eqtr4g 2858	. . . . . . . . . . 11 ⊢ ((((1st ‘𝐴) ·N (2nd ‘𝐵)) +N 𝑦) = ((1st ‘𝐵) ·N (2nd ‘𝐴)) → (((1st ‘𝐴) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵))) +N (𝑦 ·N (2nd ‘𝐴))) = (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (1st ‘𝐵)))
52		mulasspi 10308	. . . . . . . . . . . . 13 ⊢ (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐵)) = ((2nd ‘𝐴) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵)))
53	52	eqcomi 2807	. . . . . . . . . . . 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 4773	. . . . . . . . . 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 2809	. . . . . . . . 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 248	. . . . . . . 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 6645	. . . . . . . . 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 10367	. . . . . . . . . . 11 ⊢ (([Q]‘𝐴) +Q ([Q]‘⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)) = ([Q]‘(𝐴 +pQ ⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩))
60		nqerid 10344	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ Q → ([Q]‘𝐴) = 𝐴)
61	60	ad2antrr 725	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → ([Q]‘𝐴) = 𝐴)
62	61	oveq1d 7150	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → (([Q]‘𝐴) +Q ([Q]‘⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)) = (𝐴 +Q ([Q]‘⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)))
63	59, 62	syl5eqr 2847	. . . . . . . . . 10 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → ([Q]‘(𝐴 +pQ ⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)) = (𝐴 +Q ([Q]‘⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)))
64		mulclpi 10304	. . . . . . . . . . . . . . . 16 ⊢ (((2nd ‘𝐴) ∈ N ∧ (2nd ‘𝐴) ∈ N) → ((2nd ‘𝐴) ·N (2nd ‘𝐴)) ∈ N)
65	17, 17, 64	syl2anc 587	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → ((2nd ‘𝐴) ·N (2nd ‘𝐴)) ∈ N)
66	65	adantr 484	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → ((2nd ‘𝐴) ·N (2nd ‘𝐴)) ∈ N)
67	15	adantr 484	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → (1st ‘𝐵) ∈ N)
68	11	adantr 484	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → (2nd ‘𝐵) ∈ N)
69		mulcanenq 10371	. . . . . . . . . . . . . 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 1368	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → ⟨(((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (1st ‘𝐵)), (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐵))⟩ ~Q ⟨(1st ‘𝐵), (2nd ‘𝐵)⟩)
71	8	ad2antlr 726	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → 𝐵 ∈ (N × N))
72		1st2nd 7720	. . . . . . . . . . . . . 14 ⊢ ((Rel (N × N) ∧ 𝐵 ∈ (N × N)) → 𝐵 = ⟨(1st ‘𝐵), (2nd ‘𝐵)⟩)
73	22, 71, 72	sylancr 590	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → 𝐵 = ⟨(1st ‘𝐵), (2nd ‘𝐵)⟩)
74	70, 73	breqtrrd 5058	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → ⟨(((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (1st ‘𝐵)), (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐵))⟩ ~Q 𝐵)
75		mulclpi 10304	. . . . . . . . . . . . . . 15 ⊢ ((((2nd ‘𝐴) ·N (2nd ‘𝐴)) ∈ N ∧ (1st ‘𝐵) ∈ N) → (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (1st ‘𝐵)) ∈ N)
76	66, 67, 75	syl2anc 587	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (1st ‘𝐵)) ∈ N)
77		mulclpi 10304	. . . . . . . . . . . . . . 15 ⊢ ((((2nd ‘𝐴) ·N (2nd ‘𝐴)) ∈ N ∧ (2nd ‘𝐵) ∈ N) → (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐵)) ∈ N)
78	66, 68, 77	syl2anc 587	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐵)) ∈ N)
79	76, 78	opelxpd 5557	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → ⟨(((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (1st ‘𝐵)), (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐵))⟩ ∈ (N × N))
80		nqereq 10346	. . . . . . . . . . . . 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 587	. . . . . . . . . . . 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 235	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → ([Q]‘⟨(((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (1st ‘𝐵)), (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐵))⟩) = ([Q]‘𝐵))
83		nqerid 10344	. . . . . . . . . . . 12 ⊢ (𝐵 ∈ Q → ([Q]‘𝐵) = 𝐵)
84	83	ad2antlr 726	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → ([Q]‘𝐵) = 𝐵)
85	82, 84	eqtrd 2833	. . . . . . . . . 10 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → ([Q]‘⟨(((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (1st ‘𝐵)), (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐵))⟩) = 𝐵)
86	63, 85	eqeq12d 2814	. . . . . . . . 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 247	. . . . . . . 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 6658	. . . . . . . 8 ⊢ ([Q]‘⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩) ∈ V
90		oveq2 7143	. . . . . . . . 9 ⊢ (𝑥 = ([Q]‘⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩) → (𝐴 +Q 𝑥) = (𝐴 +Q ([Q]‘⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)))
91	90	eqeq1d 2800	. . . . . . . 8 ⊢ (𝑥 = ([Q]‘⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩) → ((𝐴 +Q 𝑥) = 𝐵 ↔ (𝐴 +Q ([Q]‘⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)) = 𝐵))
92	89, 91	spcev 3555	. . . . . . 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 3243	. . . . 5 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → (∃𝑦 ∈ N (((1st ‘𝐴) ·N (2nd ‘𝐵)) +N 𝑦) = ((1st ‘𝐵) ·N (2nd ‘𝐴)) → ∃𝑥(𝐴 +Q 𝑥) = 𝐵))
95	21, 94	sylbid 243	. . . 4 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → (((1st ‘𝐴) ·N (2nd ‘𝐵)) <N ((1st ‘𝐵) ·N (2nd ‘𝐴)) → ∃𝑥(𝐴 +Q 𝑥) = 𝐵))
96	3, 95	sylbid 243	. . 3 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → (𝐴 <Q 𝐵 → ∃𝑥(𝐴 +Q 𝑥) = 𝐵))
97	2, 96	mpcom 38	. 2 ⊢ (𝐴 <Q 𝐵 → ∃𝑥(𝐴 +Q 𝑥) = 𝐵)
98		eleq1 2877	. . . . . . 7 ⊢ ((𝐴 +Q 𝑥) = 𝐵 → ((𝐴 +Q 𝑥) ∈ Q ↔ 𝐵 ∈ Q))
99	98	biimparc 483	. . . . . 6 ⊢ ((𝐵 ∈ Q ∧ (𝐴 +Q 𝑥) = 𝐵) → (𝐴 +Q 𝑥) ∈ Q)
100		addnqf 10359	. . . . . . . 8 ⊢ +Q :(Q × Q)⟶Q
101	100	fdmi 6498	. . . . . . 7 ⊢ dom +Q = (Q × Q)
102		0nnq 10335	. . . . . . 7 ⊢ ¬ ∅ ∈ Q
103	101, 102	ndmovrcl 7314	. . . . . 6 ⊢ ((𝐴 +Q 𝑥) ∈ Q → (𝐴 ∈ Q ∧ 𝑥 ∈ Q))
104		ltaddnq 10385	. . . . . 6 ⊢ ((𝐴 ∈ Q ∧ 𝑥 ∈ Q) → 𝐴 <Q (𝐴 +Q 𝑥))
105	99, 103, 104	3syl 18	. . . . 5 ⊢ ((𝐵 ∈ Q ∧ (𝐴 +Q 𝑥) = 𝐵) → 𝐴 <Q (𝐴 +Q 𝑥))
106		simpr 488	. . . . 5 ⊢ ((𝐵 ∈ Q ∧ (𝐴 +Q 𝑥) = 𝐵) → (𝐴 +Q 𝑥) = 𝐵)
107	105, 106	breqtrd 5056	. . . 4 ⊢ ((𝐵 ∈ Q ∧ (𝐴 +Q 𝑥) = 𝐵) → 𝐴 <Q 𝐵)
108	107	ex 416	. . 3 ⊢ (𝐵 ∈ Q → ((𝐴 +Q 𝑥) = 𝐵 → 𝐴 <Q 𝐵))
109	108	exlimdv 1934	. 2 ⊢ (𝐵 ∈ Q → (∃𝑥(𝐴 +Q 𝑥) = 𝐵 → 𝐴 <Q 𝐵))
110	97, 109	impbid2 229	1 ⊢ (𝐵 ∈ Q → (𝐴 <Q 𝐵 ↔ ∃𝑥(𝐴 +Q 𝑥) = 𝐵))

Syntax hints:   → wi 4   ↔ wb 209   ∧ wa 399   = wceq 1538  ∃wex 1781   ∈ wcel 2111  ∃wrex 3107  ⟨cop 4531   class class class wbr 5030   × cxp 5517  Rel wrel 5524  ‘cfv 6324  (class class class)co 7135  1^st c1st 7669  2^nd c2nd 7670  Ncnpi 10255   +_N cpli 10256   ·_N cmi 10257   <_N clti 10258   +_pQ cplpq 10259   ~_Q ceq 10262  Qcnq 10263  [Q]cerq 10265   +_Q cplq 10266   <_Q cltq 10269

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2113  ax-9 2121  ax-10 2142  ax-11 2158  ax-12 2175  ax-ext 2770  ax-sep 5167  ax-nul 5174  ax-pow 5231  ax-pr 5295  ax-un 7441

This theorem depends on definitions:  df-bi 210  df-an 400  df-or 845  df-3or 1085  df-3an 1086  df-tru 1541  df-ex 1782  df-nf 1786  df-sb 2070  df-mo 2598  df-eu 2629  df-clab 2777  df-cleq 2791  df-clel 2870  df-nfc 2938  df-ne 2988  df-ral 3111  df-rex 3112  df-reu 3113  df-rmo 3114  df-rab 3115  df-v 3443  df-sbc 3721  df-csb 3829  df-dif 3884  df-un 3886  df-in 3888  df-ss 3898  df-pss 3900  df-nul 4244  df-if 4426  df-pw 4499  df-sn 4526  df-pr 4528  df-tp 4530  df-op 4532  df-uni 4801  df-int 4839  df-iun 4883  df-br 5031  df-opab 5093  df-mpt 5111  df-tr 5137  df-id 5425  df-eprel 5430  df-po 5438  df-so 5439  df-fr 5478  df-we 5480  df-xp 5525  df-rel 5526  df-cnv 5527  df-co 5528  df-dm 5529  df-rn 5530  df-res 5531  df-ima 5532  df-pred 6116  df-ord 6162  df-on 6163  df-lim 6164  df-suc 6165  df-iota 6283  df-fun 6326  df-fn 6327  df-f 6328  df-f1 6329  df-fo 6330  df-f1o 6331  df-fv 6332  df-ov 7138  df-oprab 7139  df-mpo 7140  df-om 7561  df-1st 7671  df-2nd 7672  df-wrecs 7930  df-recs 7991  df-rdg 8029  df-1o 8085  df-oadd 8089  df-omul 8090  df-er 8272  df-ni 10283  df-pli 10284  df-mi 10285  df-lti 10286  df-plpq 10319  df-mpq 10320  df-ltpq 10321  df-enq 10322  df-nq 10323  df-erq 10324  df-plq 10325  df-mq 10326  df-1nq 10327  df-ltnq 10329

This theorem is referenced by:  ltbtwnnq  10389  prnmadd  10408  ltexprlem4  10450  ltexprlem7  10453  prlem936  10458