Theorem ltexnq 10898

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 10849	. . . 4 ⊢ <Q ⊆ (Q × Q)
2	1	brel 5697	. . 3 ⊢ (𝐴 <Q 𝐵 → (𝐴 ∈ Q ∧ 𝐵 ∈ Q))
3		ordpinq 10866	. . . 4 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → (𝐴 <Q 𝐵 ↔ ((1st ‘𝐴) ·N (2nd ‘𝐵)) <N ((1st ‘𝐵) ·N (2nd ‘𝐴))))
4		elpqn 10848	. . . . . . . . 9 ⊢ (𝐴 ∈ Q → 𝐴 ∈ (N × N))
5	4	adantr 480	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → 𝐴 ∈ (N × N))
6		xp1st 7975	. . . . . . . 8 ⊢ (𝐴 ∈ (N × N) → (1st ‘𝐴) ∈ N)
7	5, 6	syl 17	. . . . . . 7 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → (1st ‘𝐴) ∈ N)
8		elpqn 10848	. . . . . . . . 9 ⊢ (𝐵 ∈ Q → 𝐵 ∈ (N × N))
9	8	adantl 481	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → 𝐵 ∈ (N × N))
10		xp2nd 7976	. . . . . . . 8 ⊢ (𝐵 ∈ (N × N) → (2nd ‘𝐵) ∈ N)
11	9, 10	syl 17	. . . . . . 7 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → (2nd ‘𝐵) ∈ N)
12		mulclpi 10816	. . . . . . 7 ⊢ (((1st ‘𝐴) ∈ N ∧ (2nd ‘𝐵) ∈ N) → ((1st ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
13	7, 11, 12	syl2anc 585	. . . . . 6 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → ((1st ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
14		xp1st 7975	. . . . . . . 8 ⊢ (𝐵 ∈ (N × N) → (1st ‘𝐵) ∈ N)
15	9, 14	syl 17	. . . . . . 7 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → (1st ‘𝐵) ∈ N)
16		xp2nd 7976	. . . . . . . 8 ⊢ (𝐴 ∈ (N × N) → (2nd ‘𝐴) ∈ N)
17	5, 16	syl 17	. . . . . . 7 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → (2nd ‘𝐴) ∈ N)
18		mulclpi 10816	. . . . . . 7 ⊢ (((1st ‘𝐵) ∈ N ∧ (2nd ‘𝐴) ∈ N) → ((1st ‘𝐵) ·N (2nd ‘𝐴)) ∈ N)
19	15, 17, 18	syl2anc 585	. . . . . 6 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → ((1st ‘𝐵) ·N (2nd ‘𝐴)) ∈ N)
20		ltexpi 10825	. . . . . 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 585	. . . . 5 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → (((1st ‘𝐴) ·N (2nd ‘𝐵)) <N ((1st ‘𝐵) ·N (2nd ‘𝐴)) ↔ ∃𝑦 ∈ N (((1st ‘𝐴) ·N (2nd ‘𝐵)) +N 𝑦) = ((1st ‘𝐵) ·N (2nd ‘𝐴))))
22		relxp 5650	. . . . . . . . . . . 12 ⊢ Rel (N × N)
23	4	ad2antrr 727	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → 𝐴 ∈ (N × N))
24		1st2nd 7993	. . . . . . . . . . . 12 ⊢ ((Rel (N × N) ∧ 𝐴 ∈ (N × N)) → 𝐴 = ⟨(1st ‘𝐴), (2nd ‘𝐴)⟩)
25	22, 23, 24	sylancr 588	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → 𝐴 = ⟨(1st ‘𝐴), (2nd ‘𝐴)⟩)
26	25	oveq1d 7383	. . . . . . . . . 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 10816	. . . . . . . . . . . . 13 ⊢ (((2nd ‘𝐴) ∈ N ∧ (2nd ‘𝐵) ∈ N) → ((2nd ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
31	17, 11, 30	syl2anc 585	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → ((2nd ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
32	31	adantr 480	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → ((2nd ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
33		addpipq 10860	. . . . . . . . . . 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 839	. . . . . . . . . 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 2772	. . . . . . . . 9 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → (𝐴 +pQ ⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩) = ⟨(((1st ‘𝐴) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵))) +N (𝑦 ·N (2nd ‘𝐴))), ((2nd ‘𝐴) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵)))⟩)
36		oveq2 7376	. . . . . . . . . . . 12 ⊢ ((((1st ‘𝐴) ·N (2nd ‘𝐵)) +N 𝑦) = ((1st ‘𝐵) ·N (2nd ‘𝐴)) → ((2nd ‘𝐴) ·N (((1st ‘𝐴) ·N (2nd ‘𝐵)) +N 𝑦)) = ((2nd ‘𝐴) ·N ((1st ‘𝐵) ·N (2nd ‘𝐴))))
37		distrpi 10821	. . . . . . . . . . . . 13 ⊢ ((2nd ‘𝐴) ·N (((1st ‘𝐴) ·N (2nd ‘𝐵)) +N 𝑦)) = (((2nd ‘𝐴) ·N ((1st ‘𝐴) ·N (2nd ‘𝐵))) +N ((2nd ‘𝐴) ·N 𝑦))
38		fvex 6855	. . . . . . . . . . . . . . 15 ⊢ (2nd ‘𝐴) ∈ V
39		fvex 6855	. . . . . . . . . . . . . . 15 ⊢ (1st ‘𝐴) ∈ V
40		fvex 6855	. . . . . . . . . . . . . . 15 ⊢ (2nd ‘𝐵) ∈ V
41		mulcompi 10819	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ·N 𝑦) = (𝑦 ·N 𝑥)
42		mulasspi 10820	. . . . . . . . . . . . . . 15 ⊢ ((𝑥 ·N 𝑦) ·N 𝑧) = (𝑥 ·N (𝑦 ·N 𝑧))
43	38, 39, 40, 41, 42	caov12 7596	. . . . . . . . . . . . . 14 ⊢ ((2nd ‘𝐴) ·N ((1st ‘𝐴) ·N (2nd ‘𝐵))) = ((1st ‘𝐴) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵)))
44		mulcompi 10819	. . . . . . . . . . . . . 14 ⊢ ((2nd ‘𝐴) ·N 𝑦) = (𝑦 ·N (2nd ‘𝐴))
45	43, 44	oveq12i 7380	. . . . . . . . . . . . 13 ⊢ (((2nd ‘𝐴) ·N ((1st ‘𝐴) ·N (2nd ‘𝐵))) +N ((2nd ‘𝐴) ·N 𝑦)) = (((1st ‘𝐴) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵))) +N (𝑦 ·N (2nd ‘𝐴)))
46	37, 45	eqtr2i 2761	. . . . . . . . . . . 12 ⊢ (((1st ‘𝐴) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵))) +N (𝑦 ·N (2nd ‘𝐴))) = ((2nd ‘𝐴) ·N (((1st ‘𝐴) ·N (2nd ‘𝐵)) +N 𝑦))
47		mulasspi 10820	. . . . . . . . . . . . 13 ⊢ (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (1st ‘𝐵)) = ((2nd ‘𝐴) ·N ((2nd ‘𝐴) ·N (1st ‘𝐵)))
48		mulcompi 10819	. . . . . . . . . . . . . 14 ⊢ ((2nd ‘𝐴) ·N (1st ‘𝐵)) = ((1st ‘𝐵) ·N (2nd ‘𝐴))
49	48	oveq2i 7379	. . . . . . . . . . . . 13 ⊢ ((2nd ‘𝐴) ·N ((2nd ‘𝐴) ·N (1st ‘𝐵))) = ((2nd ‘𝐴) ·N ((1st ‘𝐵) ·N (2nd ‘𝐴)))
50	47, 49	eqtri 2760	. . . . . . . . . . . 12 ⊢ (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (1st ‘𝐵)) = ((2nd ‘𝐴) ·N ((1st ‘𝐵) ·N (2nd ‘𝐴)))
51	36, 46, 50	3eqtr4g 2797	. . . . . . . . . . 11 ⊢ ((((1st ‘𝐴) ·N (2nd ‘𝐵)) +N 𝑦) = ((1st ‘𝐵) ·N (2nd ‘𝐴)) → (((1st ‘𝐴) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵))) +N (𝑦 ·N (2nd ‘𝐴))) = (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (1st ‘𝐵)))
52		mulasspi 10820	. . . . . . . . . . . . 13 ⊢ (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐵)) = ((2nd ‘𝐴) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵)))
53	52	eqcomi 2746	. . . . . . . . . . . 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 4839	. . . . . . . . . 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 2748	. . . . . . . . 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 6842	. . . . . . . . 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 10879	. . . . . . . . . . 11 ⊢ (([Q]‘𝐴) +Q ([Q]‘⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)) = ([Q]‘(𝐴 +pQ ⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩))
60		nqerid 10856	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ Q → ([Q]‘𝐴) = 𝐴)
61	60	ad2antrr 727	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → ([Q]‘𝐴) = 𝐴)
62	61	oveq1d 7383	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → (([Q]‘𝐴) +Q ([Q]‘⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)) = (𝐴 +Q ([Q]‘⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)))
63	59, 62	eqtr3id 2786	. . . . . . . . . 10 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → ([Q]‘(𝐴 +pQ ⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)) = (𝐴 +Q ([Q]‘⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)))
64		mulclpi 10816	. . . . . . . . . . . . . . . 16 ⊢ (((2nd ‘𝐴) ∈ N ∧ (2nd ‘𝐴) ∈ N) → ((2nd ‘𝐴) ·N (2nd ‘𝐴)) ∈ N)
65	17, 17, 64	syl2anc 585	. . . . . . . . . . . . . . 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 10883	. . . . . . . . . . . . . 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 1374	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → ⟨(((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (1st ‘𝐵)), (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐵))⟩ ~Q ⟨(1st ‘𝐵), (2nd ‘𝐵)⟩)
71	8	ad2antlr 728	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → 𝐵 ∈ (N × N))
72		1st2nd 7993	. . . . . . . . . . . . . 14 ⊢ ((Rel (N × N) ∧ 𝐵 ∈ (N × N)) → 𝐵 = ⟨(1st ‘𝐵), (2nd ‘𝐵)⟩)
73	22, 71, 72	sylancr 588	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → 𝐵 = ⟨(1st ‘𝐵), (2nd ‘𝐵)⟩)
74	70, 73	breqtrrd 5128	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → ⟨(((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (1st ‘𝐵)), (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐵))⟩ ~Q 𝐵)
75		mulclpi 10816	. . . . . . . . . . . . . . 15 ⊢ ((((2nd ‘𝐴) ·N (2nd ‘𝐴)) ∈ N ∧ (1st ‘𝐵) ∈ N) → (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (1st ‘𝐵)) ∈ N)
76	66, 67, 75	syl2anc 585	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (1st ‘𝐵)) ∈ N)
77		mulclpi 10816	. . . . . . . . . . . . . . 15 ⊢ ((((2nd ‘𝐴) ·N (2nd ‘𝐴)) ∈ N ∧ (2nd ‘𝐵) ∈ N) → (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐵)) ∈ N)
78	66, 68, 77	syl2anc 585	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐵)) ∈ N)
79	76, 78	opelxpd 5671	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → ⟨(((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (1st ‘𝐵)), (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐵))⟩ ∈ (N × N))
80		nqereq 10858	. . . . . . . . . . . . 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 585	. . . . . . . . . . . 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 10856	. . . . . . . . . . . 12 ⊢ (𝐵 ∈ Q → ([Q]‘𝐵) = 𝐵)
84	83	ad2antlr 728	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → ([Q]‘𝐵) = 𝐵)
85	82, 84	eqtrd 2772	. . . . . . . . . 10 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑦 ∈ N) → ([Q]‘⟨(((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (1st ‘𝐵)), (((2nd ‘𝐴) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐵))⟩) = 𝐵)
86	63, 85	eqeq12d 2753	. . . . . . . . 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 6855	. . . . . . . 8 ⊢ ([Q]‘⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩) ∈ V
90		oveq2 7376	. . . . . . . . 9 ⊢ (𝑥 = ([Q]‘⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩) → (𝐴 +Q 𝑥) = (𝐴 +Q ([Q]‘⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)))
91	90	eqeq1d 2739	. . . . . . . 8 ⊢ (𝑥 = ([Q]‘⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩) → ((𝐴 +Q 𝑥) = 𝐵 ↔ (𝐴 +Q ([Q]‘⟨𝑦, ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)) = 𝐵))
92	89, 91	spcev 3562	. . . . . . 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 3139	. . . . 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 2825	. . . . . . 7 ⊢ ((𝐴 +Q 𝑥) = 𝐵 → ((𝐴 +Q 𝑥) ∈ Q ↔ 𝐵 ∈ Q))
99	98	biimparc 479	. . . . . 6 ⊢ ((𝐵 ∈ Q ∧ (𝐴 +Q 𝑥) = 𝐵) → (𝐴 +Q 𝑥) ∈ Q)
100		addnqf 10871	. . . . . . . 8 ⊢ +Q :(Q × Q)⟶Q
101	100	fdmi 6681	. . . . . . 7 ⊢ dom +Q = (Q × Q)
102		0nnq 10847	. . . . . . 7 ⊢ ¬ ∅ ∈ Q
103	101, 102	ndmovrcl 7554	. . . . . 6 ⊢ ((𝐴 +Q 𝑥) ∈ Q → (𝐴 ∈ Q ∧ 𝑥 ∈ Q))
104		ltaddnq 10897	. . . . . 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 5126	. . . 4 ⊢ ((𝐵 ∈ Q ∧ (𝐴 +Q 𝑥) = 𝐵) → 𝐴 <Q 𝐵)
108	107	ex 412	. . 3 ⊢ (𝐵 ∈ Q → ((𝐴 +Q 𝑥) = 𝐵 → 𝐴 <Q 𝐵))
109	108	exlimdv 1935	. 2 ⊢ (𝐵 ∈ Q → (∃𝑥(𝐴 +Q 𝑥) = 𝐵 → 𝐴 <Q 𝐵))
110	97, 109	impbid2 226	1 ⊢ (𝐵 ∈ Q → (𝐴 <Q 𝐵 ↔ ∃𝑥(𝐴 +Q 𝑥) = 𝐵))

Syntax hints:   → wi 4   ↔ wb 206   ∧ wa 395   = wceq 1542  ∃wex 1781   ∈ wcel 2114  ∃wrex 3062  ⟨cop 4588   class class class wbr 5100   × cxp 5630  Rel wrel 5637  ‘cfv 6500  (class class class)co 7368  1^st c1st 7941  2^nd c2nd 7942  Ncnpi 10767   +_N cpli 10768   ·_N cmi 10769   <_N clti 10770   +_pQ cplpq 10771   ~_Q ceq 10774  Qcnq 10775  [Q]cerq 10777   +_Q cplq 10778   <_Q cltq 10781

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 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-sep 5243  ax-nul 5253  ax-pr 5379  ax-un 7690

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-ral 3053  df-rex 3063  df-rmo 3352  df-reu 3353  df-rab 3402  df-v 3444  df-sbc 3743  df-csb 3852  df-dif 3906  df-un 3908  df-in 3910  df-ss 3920  df-pss 3923  df-nul 4288  df-if 4482  df-pw 4558  df-sn 4583  df-pr 4585  df-op 4589  df-uni 4866  df-int 4905  df-iun 4950  df-br 5101  df-opab 5163  df-mpt 5182  df-tr 5208  df-id 5527  df-eprel 5532  df-po 5540  df-so 5541  df-fr 5585  df-we 5587  df-xp 5638  df-rel 5639  df-cnv 5640  df-co 5641  df-dm 5642  df-rn 5643  df-res 5644  df-ima 5645  df-pred 6267  df-ord 6328  df-on 6329  df-lim 6330  df-suc 6331  df-iota 6456  df-fun 6502  df-fn 6503  df-f 6504  df-f1 6505  df-fo 6506  df-f1o 6507  df-fv 6508  df-ov 7371  df-oprab 7372  df-mpo 7373  df-om 7819  df-1st 7943  df-2nd 7944  df-frecs 8233  df-wrecs 8264  df-recs 8313  df-rdg 8351  df-1o 8407  df-oadd 8411  df-omul 8412  df-er 8645  df-ni 10795  df-pli 10796  df-mi 10797  df-lti 10798  df-plpq 10831  df-mpq 10832  df-ltpq 10833  df-enq 10834  df-nq 10835  df-erq 10836  df-plq 10837  df-mq 10838  df-1nq 10839  df-ltnq 10841

This theorem is referenced by:  ltbtwnnq  10901  prnmadd  10920  ltexprlem4  10962  ltexprlem7  10965  prlem936  10970