Theorem ltexnq 11032

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 10983	. . . 4 ⊢ <Q ⊆ (Q × Q)
2	1	brel 5712	. . 3 ⊢ (𝐴 <Q 𝐵 → (𝐴 ∈ Q ∧ 𝐵 ∈ Q))
3		ordpinq 11000	. . . 4 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → (𝐴 <Q 𝐵 ↔ ((1st ‘𝐴) ·N (2nd ‘𝐵)) <N ((1st ‘𝐵) ·N (2nd ‘𝐴))))
4		elpqn 10982	. . . . . . . . 9 ⊢ (𝐴 ∈ Q → 𝐴 ∈ (N × N))
5	4	adantr 486	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → 𝐴 ∈ (N × N))
6		xp1st 8016	. . . . . . . 8 ⊢ (𝐴 ∈ (N × N) → (1st ‘𝐴) ∈ N)
7	5, 6	syl 18	. . . . . . 7 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → (1st ‘𝐴) ∈ N)
8		elpqn 10982	. . . . . . . . 9 ⊢ (𝐵 ∈ Q → 𝐵 ∈ (N × N))
9	8	adantl 487	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → 𝐵 ∈ (N × N))
10		xp2nd 8017	. . . . . . . 8 ⊢ (𝐵 ∈ (N × N) → (2nd ‘𝐵) ∈ N)
11	9, 10	syl 18	. . . . . . 7 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → (2nd ‘𝐵) ∈ N)
12		mulclpi 10950	. . . . . . 7 ⊢ (((1st ‘𝐴) ∈ N ∧ (2nd ‘𝐵) ∈ N) → ((1st ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
13	7, 11, 12	syl2anc 596	. . . . . 6 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → ((1st ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
14		xp1st 8016	. . . . . . . 8 ⊢ (𝐵 ∈ (N × N) → (1st ‘𝐵) ∈ N)
15	9, 14	syl 18	. . . . . . 7 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → (1st ‘𝐵) ∈ N)
16		xp2nd 8017	. . . . . . . 8 ⊢ (𝐴 ∈ (N × N) → (2nd ‘𝐴) ∈ N)
17	5, 16	syl 18	. . . . . . 7 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → (2nd ‘𝐴) ∈ N)
18		mulclpi 10950	. . . . . . 7 ⊢ (((1st ‘𝐵) ∈ N ∧ (2nd ‘𝐴) ∈ N) → ((1st ‘𝐵) ·N (2nd ‘𝐴)) ∈ N)
19	15, 17, 18	syl2anc 596	. . . . . 6 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → ((1st ‘𝐵) ·N (2nd ‘𝐴)) ∈ N)
20		ltexpi 10959	. . . . . 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 596	. . . . 5 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → (((1st ‘𝐴) ·N (2nd ‘𝐵)) <N ((1st ‘𝐵) ·N (2nd ‘𝐴)) ↔ ∃𝑦 ∈ N (((1st ‘𝐴) ·N (2nd ‘𝐵)) +N 𝑦) = ((1st ‘𝐵) ·N (2nd ‘𝐴))))
22		relxp 5665	. . . . . . . . . . . 12 ⊢ Rel (N × N)
23	4	ad2antrr 739	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → 𝐴 ∈ (N × N))
24		1st2nd 8033	. . . . . . . . . . . 12 ⊢ ((Rel (N × N) ∧ 𝐴 ∈ (N × N)) → 𝐴 = ⟨(1st ‘𝐴), (2nd ‘𝐴)⟩)
25	22, 23, 24	sylancr 599	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → 𝐴 = ⟨(1st ‘𝐴), (2nd ‘𝐴)⟩)
26	25	oveq1d 7423	. . . . . . . . . 10 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → (𝐴 +pQ ⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩) = (⟨(1st ‘𝐴), (2nd ‘𝐴)⟩ +pQ ⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩))
27	7	adantr 486	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → (1st ‘𝐴) ∈ N)
28	17	adantr 486	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → (2nd ‘𝐴) ∈ N)
29		simpr 490	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → 𝑦 ∈ N)
30		mulclpi 10950	. . . . . . . . . . . . 13 ⊢ (((2nd ‘𝐴) ∈ N ∧ (2nd ‘𝐵) ∈ N) → ((2nd ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
31	17, 11, 30	syl2anc 596	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → ((2nd ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
32	31	adantr 486	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → ((2nd ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
33		addpipq 10994	. . . . . . . . . . 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 852	. . . . . . . . . 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 2795	. . . . . . . . 9 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → (𝐴 +pQ ⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩) = ⟨(((1st ‘𝐴) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵))) +N (𝑦 ·N (2nd ‘𝐴))), ((2nd ‘𝐴) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵)))⟩)
36		oveq2 7416	. . . . . . . . . . . 12 ⊢ ((((1st ‘𝐴) ·N (2nd ‘𝐵)) +N 𝑦) = ((1st ‘𝐵) ·N (2nd ‘𝐴)) → ((2nd ‘𝐴) ·N (((1st ‘𝐴) ·N (2nd ‘𝐵)) +N 𝑦)) = ((2nd ‘𝐴) ·N ((1st ‘𝐵) ·N (2nd ‘𝐴))))
37		distrpi 10955	. . . . . . . . . . . . 13 ⊢ ((2nd ‘𝐴) ·N (((1st ‘𝐴) ·N (2nd ‘𝐵)) +N 𝑦)) = (((2nd ‘𝐴) ·N ((1st ‘𝐴) ·N (2nd ‘𝐵))) +N ((2nd ‘𝐴) ·N 𝑦))
38		fvex 6886	. . . . . . . . . . . . . . 15 ⊢ (2nd ‘𝐴) ∈ V
39		fvex 6886	. . . . . . . . . . . . . . 15 ⊢ (1st ‘𝐴) ∈ V
40		fvex 6886	. . . . . . . . . . . . . . 15 ⊢ (2nd ‘𝐵) ∈ V
41		mulcompi 10953	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ·N 𝑦) = (𝑦 ·N 𝑥)
42		mulasspi 10954	. . . . . . . . . . . . . . 15 ⊢ ((𝑥 ·N 𝑦) ·N 𝑧) = (𝑥 ·N (𝑦 ·N 𝑧))
43	38, 39, 40, 41, 42	caov12 7637	. . . . . . . . . . . . . 14 ⊢ ((2nd ‘𝐴) ·N ((1st ‘𝐴) ·N (2nd ‘𝐵))) = ((1st ‘𝐴) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵)))
44		mulcompi 10953	. . . . . . . . . . . . . 14 ⊢ ((2nd ‘𝐴) ·N 𝑦) = (𝑦 ·N (2nd ‘𝐴))
45	43, 44	oveq12i 7420	. . . . . . . . . . . . 13 ⊢ (((2nd ‘𝐴) ·N ((1st ‘𝐴) ·N (2nd ‘𝐵))) +N ((2nd ‘𝐴) ·N 𝑦)) = (((1st ‘𝐴) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵))) +N (𝑦 ·N (2nd ‘𝐴)))
46	37, 45	eqtr2i 2784	. . . . . . . . . . . 12 ⊢ (((1st ‘𝐴) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵))) +N (𝑦 ·N (2nd ‘𝐴))) = ((2nd ‘𝐴) ·N (((1st ‘𝐴) ·N (2nd ‘𝐵)) +N 𝑦))
47		mulasspi 10954	. . . . . . . . . . . . 13 ⊢ (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (1st ‘𝐵)) = ((2nd ‘𝐴) ·N ((2nd ‘𝐴) ·N (1st ‘𝐵)))
48		mulcompi 10953	. . . . . . . . . . . . . 14 ⊢ ((2nd ‘𝐴) ·N (1st ‘𝐵)) = ((1st ‘𝐵) ·N (2nd ‘𝐴))
49	48	oveq2i 7419	. . . . . . . . . . . . 13 ⊢ ((2nd ‘𝐴) ·N ((2nd ‘𝐴) ·N (1st ‘𝐵))) = ((2nd ‘𝐴) ·N ((1st ‘𝐵) ·N (2nd ‘𝐴)))
50	47, 49	eqtri 2783	. . . . . . . . . . . 12 ⊢ (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (1st ‘𝐵)) = ((2nd ‘𝐴) ·N ((1st ‘𝐵) ·N (2nd ‘𝐴)))
51	36, 46, 50	3eqtr4g 2820	. . . . . . . . . . 11 ⊢ ((((1st ‘𝐴) ·N (2nd ‘𝐵)) +N 𝑦) = ((1st ‘𝐵) ·N (2nd ‘𝐴)) → (((1st ‘𝐴) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵))) +N (𝑦 ·N (2nd ‘𝐴))) = (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (1st ‘𝐵)))
52		mulasspi 10954	. . . . . . . . . . . . 13 ⊢ (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐵)) = ((2nd ‘𝐴) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵)))
53	52	eqcomi 2769	. . . . . . . . . . . 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 4840	. . . . . . . . . 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 2771	. . . . . . . . 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 6873	. . . . . . . . 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 11013	. . . . . . . . . . 11 ⊢ (([Q]‘𝐴) +Q ([Q]‘⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)) = ([Q]‘(𝐴 +pQ ⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩))
60		nqerid 10990	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ Q → ([Q]‘𝐴) = 𝐴)
61	60	ad2antrr 739	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → ([Q]‘𝐴) = 𝐴)
62	61	oveq1d 7423	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → (([Q]‘𝐴) +Q ([Q]‘⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)) = (𝐴 +Q ([Q]‘⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)))
63	59, 62	eqtr3id 2809	. . . . . . . . . 10 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → ([Q]‘(𝐴 +pQ ⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)) = (𝐴 +Q ([Q]‘⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)))
64		mulclpi 10950	. . . . . . . . . . . . . . . 16 ⊢ (((2nd ‘𝐴) ∈ N ∧ (2nd ‘𝐴) ∈ N) → ((2nd ‘𝐴) ·N (2nd ‘𝐴)) ∈ N)
65	17, 17, 64	syl2anc 596	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → ((2nd ‘𝐴) ·N (2nd ‘𝐴)) ∈ N)
66	65	adantr 486	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → ((2nd ‘𝐴) ·N (2nd ‘𝐴)) ∈ N)
67	15	adantr 486	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → (1st ‘𝐵) ∈ N)
68	11	adantr 486	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → (2nd ‘𝐵) ∈ N)
69		mulcanenq 11017	. . . . . . . . . . . . . 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 1398	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → ⟨(((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (1st ‘𝐵)), (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐵))⟩ ~Q ⟨(1st ‘𝐵), (2nd ‘𝐵)⟩)
71	8	ad2antlr 740	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → 𝐵 ∈ (N × N))
72		1st2nd 8033	. . . . . . . . . . . . . 14 ⊢ ((Rel (N × N) ∧ 𝐵 ∈ (N × N)) → 𝐵 = ⟨(1st ‘𝐵), (2nd ‘𝐵)⟩)
73	22, 71, 72	sylancr 599	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → 𝐵 = ⟨(1st ‘𝐵), (2nd ‘𝐵)⟩)
74	70, 73	breqtrrd 5132	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → ⟨(((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (1st ‘𝐵)), (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐵))⟩ ~Q 𝐵)
75		mulclpi 10950	. . . . . . . . . . . . . . 15 ⊢ ((((2nd ‘𝐴) ·N (2nd ‘𝐴)) ∈ N ∧ (1st ‘𝐵) ∈ N) → (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (1st ‘𝐵)) ∈ N)
76	66, 67, 75	syl2anc 596	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (1st ‘𝐵)) ∈ N)
77		mulclpi 10950	. . . . . . . . . . . . . . 15 ⊢ ((((2nd ‘𝐴) ·N (2nd ‘𝐴)) ∈ N ∧ (2nd ‘𝐵) ∈ N) → (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐵)) ∈ N)
78	66, 68, 77	syl2anc 596	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐵)) ∈ N)
79	76, 78	opelxpd 5686	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → ⟨(((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (1st ‘𝐵)), (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐵))⟩ ∈ (N × N))
80		nqereq 10992	. . . . . . . . . . . . 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 596	. . . . . . . . . . . 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 10990	. . . . . . . . . . . 12 ⊢ (𝐵 ∈ Q → ([Q]‘𝐵) = 𝐵)
84	83	ad2antlr 740	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → ([Q]‘𝐵) = 𝐵)
85	82, 84	eqtrd 2795	. . . . . . . . . 10 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → ([Q]‘⟨(((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (1st ‘𝐵)), (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐵))⟩) = 𝐵)
86	63, 85	eqeq12d 2776	. . . . . . . . 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 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 48	. . . . . . 7 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → ((((1st ‘𝐴) ·N (2nd ‘𝐵)) +N 𝑦) = ((1st ‘𝐵) ·N (2nd ‘𝐴)) → (𝐴 +Q ([Q]‘⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)) = 𝐵))
89		fvex 6886	. . . . . . . 8 ⊢ ([Q]‘⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩) ∈ V
90		oveq2 7416	. . . . . . . . 9 ⊢ (𝑥 = ([Q]‘⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩) → (𝐴 +Q 𝑥) = (𝐴 +Q ([Q]‘⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)))
91	90	eqeq1d 2762	. . . . . . . 8 ⊢ (𝑥 = ([Q]‘⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩) → ((𝐴 +Q 𝑥) = 𝐵 ↔ (𝐴 +Q ([Q]‘⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)) = 𝐵))
92	89, 91	spcev 3560	. . . . . . 7 ⊢ ((𝐴 +Q ([Q]‘⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)) = 𝐵 → ∃𝑥(𝐴 +Q 𝑥) = 𝐵)
93	88, 92	syl6 36	. . . . . 6 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → ((((1st ‘𝐴) ·N (2nd ‘𝐵)) +N 𝑦) = ((1st ‘𝐵) ·N (2nd ‘𝐴)) → ∃𝑥(𝐴 +Q 𝑥) = 𝐵))
94	93	rexlimdva 3163	. . . . 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 39	. 2 ⊢ (𝐴 <Q 𝐵 → ∃𝑥(𝐴 +Q 𝑥) = 𝐵)
98		eleq1 2848	. . . . . . 7 ⊢ ((𝐴 +Q 𝑥) = 𝐵 → ((𝐴 +Q 𝑥) ∈ Q ↔ 𝐵 ∈ Q))
99	98	biimparc 485	. . . . . 6 ⊢ ((𝐵 ∈ Q ∧ (𝐴 +Q 𝑥) = 𝐵) → (𝐴 +Q 𝑥) ∈ Q)
100		addnqf 11005	. . . . . . . 8 ⊢ +Q :(Q × Q)⟶Q
101	100	fdmi 6709	. . . . . . 7 ⊢ dom +Q = (Q × Q)
102		0nnq 10981	. . . . . . 7 ⊢ ¬ ∅ ∈ Q
103	101, 102	ndmovrcl 7595	. . . . . 6 ⊢ ((𝐴 +Q 𝑥) ∈ Q → (𝐴 ∈ Q ∧ 𝑥 ∈ Q))
104		ltaddnq 11031	. . . . . 6 ⊢ ((𝐴 ∈ Q ∧ 𝑥 ∈ Q) → 𝐴 <Q (𝐴 +Q 𝑥))
105	99, 103, 104	3syl 19	. . . . 5 ⊢ ((𝐵 ∈ Q ∧ (𝐴 +Q 𝑥) = 𝐵) → 𝐴 <Q (𝐴 +Q 𝑥))
106		simpr 490	. . . . 5 ⊢ ((𝐵 ∈ Q ∧ (𝐴 +Q 𝑥) = 𝐵) → (𝐴 +Q 𝑥) = 𝐵)
107	105, 106	breqtrd 5130	. . . 4 ⊢ ((𝐵 ∈ Q ∧ (𝐴 +Q 𝑥) = 𝐵) → 𝐴 <Q 𝐵)
108	107	ex 418	. . 3 ⊢ (𝐵 ∈ Q → ((𝐴 +Q 𝑥) = 𝐵 → 𝐴 <Q 𝐵))
109	108	exlimdv 1966	. 2 ⊢ (𝐵 ∈ Q → (∃𝑥(𝐴 +Q 𝑥) = 𝐵 → 𝐴 <Q 𝐵))
110	97, 109	impbid2 229	1 ⊢ (𝐵 ∈ Q → (𝐴 <Q 𝐵 ↔ ∃𝑥(𝐴 +Q 𝑥) = 𝐵))

This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   = wceq 1570  ∃wex 1812   ∈ wcel 2145  ∃wrex 3086  ⟨cop 4589   class class class wbr 5102   × cxp 5645  Rel wrel 5652  ‘cfv 6527  (class class class)co 7408  1^st c1st 7982  2^nd c2nd 7983  Ncnpi 10901   +_N cpli 10902   ·_N cmi 10903   <_N clti 10904   +_pQ cplpq 10905   ~_Q ceq 10908  Qcnq 10909  [Q]cerq 10911   +_Q cplq 10912   <_Q cltq 10915

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2732  ax-sep 5248  ax-nul 5259  ax-pr 5390  ax-un 7734

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3739  df-csb 3847  df-dif 3901  df-un 3903  df-in 3905  df-ss 3915  df-pss 3918  df-nul 4279  df-if 4482  df-pw 4558  df-sn 4584  df-pr 4586  df-op 4590  df-uni 4867  df-int 4907  df-iun 4952  df-br 5103  df-opab 5167  df-mpt 5186  df-tr 5212  df-id 5542  df-eprel 5547  df-po 5555  df-so 5556  df-fr 5600  df-we 5602  df-xp 5653  df-rel 5654  df-cnv 5655  df-co 5656  df-dm 5657  df-rn 5658  df-res 5659  df-ima 5660  df-pred 6293  df-ord 6354  df-on 6355  df-lim 6356  df-suc 6357  df-iota 6483  df-fun 6529  df-fn 6530  df-f 6531  df-f1 6532  df-fo 6533  df-f1o 6534  df-fv 6535  df-ov 7411  df-oprab 7412  df-mpo 7413  df-om 7861  df-1st 7984  df-2nd 7985  df-frecs 8277  df-wrecs 8308  df-recs 8357  df-rdg 8396  df-1o 8454  df-oadd 8458  df-omul 8459  df-er 8695  df-ni 10929  df-pli 10930  df-mi 10931  df-lti 10932  df-plpq 10965  df-mpq 10966  df-ltpq 10967  df-enq 10968  df-nq 10969  df-erq 10970  df-plq 10971  df-mq 10972  df-1nq 10973  df-ltnq 10975

This theorem is used by:  ltbtwnnq  11035  prnmadd  11054  ltexprlem4  11096  ltexprlem7  11099  prlem936  11104