 Metamath Proof Explorer < Previous   Next > Nearby theorems Mirrors  >  Home  >  MPE Home  >  Th. List  >  archnq Structured version   Visualization version   GIF version

Theorem archnq 9994
 Description: For any fraction, there is an integer that is greater than it. This is also known as the "archimedean property". (Contributed by Mario Carneiro, 10-May-2013.) (New usage is discouraged.)
Assertion
Ref Expression
archnq (𝐴Q → ∃𝑥N 𝐴 <Q𝑥, 1𝑜⟩)
Distinct variable group:   𝑥,𝐴

Proof of Theorem archnq
StepHypRef Expression
1 elpqn 9939 . . . 4 (𝐴Q𝐴 ∈ (N × N))
2 xp1st 7365 . . . 4 (𝐴 ∈ (N × N) → (1st𝐴) ∈ N)
31, 2syl 17 . . 3 (𝐴Q → (1st𝐴) ∈ N)
4 1pi 9897 . . 3 1𝑜N
5 addclpi 9906 . . 3 (((1st𝐴) ∈ N ∧ 1𝑜N) → ((1st𝐴) +N 1𝑜) ∈ N)
63, 4, 5sylancl 697 . 2 (𝐴Q → ((1st𝐴) +N 1𝑜) ∈ N)
7 xp2nd 7366 . . . . . 6 (𝐴 ∈ (N × N) → (2nd𝐴) ∈ N)
81, 7syl 17 . . . . 5 (𝐴Q → (2nd𝐴) ∈ N)
9 mulclpi 9907 . . . . 5 ((((1st𝐴) +N 1𝑜) ∈ N ∧ (2nd𝐴) ∈ N) → (((1st𝐴) +N 1𝑜) ·N (2nd𝐴)) ∈ N)
106, 8, 9syl2anc 696 . . . 4 (𝐴Q → (((1st𝐴) +N 1𝑜) ·N (2nd𝐴)) ∈ N)
11 eqid 2760 . . . . . . 7 ((1st𝐴) +N 1𝑜) = ((1st𝐴) +N 1𝑜)
12 oveq2 6821 . . . . . . . . 9 (𝑥 = 1𝑜 → ((1st𝐴) +N 𝑥) = ((1st𝐴) +N 1𝑜))
1312eqeq1d 2762 . . . . . . . 8 (𝑥 = 1𝑜 → (((1st𝐴) +N 𝑥) = ((1st𝐴) +N 1𝑜) ↔ ((1st𝐴) +N 1𝑜) = ((1st𝐴) +N 1𝑜)))
1413rspcev 3449 . . . . . . 7 ((1𝑜N ∧ ((1st𝐴) +N 1𝑜) = ((1st𝐴) +N 1𝑜)) → ∃𝑥N ((1st𝐴) +N 𝑥) = ((1st𝐴) +N 1𝑜))
154, 11, 14mp2an 710 . . . . . 6 𝑥N ((1st𝐴) +N 𝑥) = ((1st𝐴) +N 1𝑜)
16 ltexpi 9916 . . . . . 6 (((1st𝐴) ∈ N ∧ ((1st𝐴) +N 1𝑜) ∈ N) → ((1st𝐴) <N ((1st𝐴) +N 1𝑜) ↔ ∃𝑥N ((1st𝐴) +N 𝑥) = ((1st𝐴) +N 1𝑜)))
1715, 16mpbiri 248 . . . . 5 (((1st𝐴) ∈ N ∧ ((1st𝐴) +N 1𝑜) ∈ N) → (1st𝐴) <N ((1st𝐴) +N 1𝑜))
183, 6, 17syl2anc 696 . . . 4 (𝐴Q → (1st𝐴) <N ((1st𝐴) +N 1𝑜))
19 nlt1pi 9920 . . . . 5 ¬ (2nd𝐴) <N 1𝑜
20 ltmpi 9918 . . . . . . 7 (((1st𝐴) +N 1𝑜) ∈ N → ((2nd𝐴) <N 1𝑜 ↔ (((1st𝐴) +N 1𝑜) ·N (2nd𝐴)) <N (((1st𝐴) +N 1𝑜) ·N 1𝑜)))
216, 20syl 17 . . . . . 6 (𝐴Q → ((2nd𝐴) <N 1𝑜 ↔ (((1st𝐴) +N 1𝑜) ·N (2nd𝐴)) <N (((1st𝐴) +N 1𝑜) ·N 1𝑜)))
22 mulidpi 9900 . . . . . . . 8 (((1st𝐴) +N 1𝑜) ∈ N → (((1st𝐴) +N 1𝑜) ·N 1𝑜) = ((1st𝐴) +N 1𝑜))
236, 22syl 17 . . . . . . 7 (𝐴Q → (((1st𝐴) +N 1𝑜) ·N 1𝑜) = ((1st𝐴) +N 1𝑜))
2423breq2d 4816 . . . . . 6 (𝐴Q → ((((1st𝐴) +N 1𝑜) ·N (2nd𝐴)) <N (((1st𝐴) +N 1𝑜) ·N 1𝑜) ↔ (((1st𝐴) +N 1𝑜) ·N (2nd𝐴)) <N ((1st𝐴) +N 1𝑜)))
2521, 24bitrd 268 . . . . 5 (𝐴Q → ((2nd𝐴) <N 1𝑜 ↔ (((1st𝐴) +N 1𝑜) ·N (2nd𝐴)) <N ((1st𝐴) +N 1𝑜)))
2619, 25mtbii 315 . . . 4 (𝐴Q → ¬ (((1st𝐴) +N 1𝑜) ·N (2nd𝐴)) <N ((1st𝐴) +N 1𝑜))
27 ltsopi 9902 . . . . 5 <N Or N
28 ltrelpi 9903 . . . . 5 <N ⊆ (N × N)
2927, 28sotri3 5684 . . . 4 (((((1st𝐴) +N 1𝑜) ·N (2nd𝐴)) ∈ N ∧ (1st𝐴) <N ((1st𝐴) +N 1𝑜) ∧ ¬ (((1st𝐴) +N 1𝑜) ·N (2nd𝐴)) <N ((1st𝐴) +N 1𝑜)) → (1st𝐴) <N (((1st𝐴) +N 1𝑜) ·N (2nd𝐴)))
3010, 18, 26, 29syl3anc 1477 . . 3 (𝐴Q → (1st𝐴) <N (((1st𝐴) +N 1𝑜) ·N (2nd𝐴)))
31 pinq 9941 . . . . . 6 (((1st𝐴) +N 1𝑜) ∈ N → ⟨((1st𝐴) +N 1𝑜), 1𝑜⟩ ∈ Q)
326, 31syl 17 . . . . 5 (𝐴Q → ⟨((1st𝐴) +N 1𝑜), 1𝑜⟩ ∈ Q)
33 ordpinq 9957 . . . . 5 ((𝐴Q ∧ ⟨((1st𝐴) +N 1𝑜), 1𝑜⟩ ∈ Q) → (𝐴 <Q ⟨((1st𝐴) +N 1𝑜), 1𝑜⟩ ↔ ((1st𝐴) ·N (2nd ‘⟨((1st𝐴) +N 1𝑜), 1𝑜⟩)) <N ((1st ‘⟨((1st𝐴) +N 1𝑜), 1𝑜⟩) ·N (2nd𝐴))))
3432, 33mpdan 705 . . . 4 (𝐴Q → (𝐴 <Q ⟨((1st𝐴) +N 1𝑜), 1𝑜⟩ ↔ ((1st𝐴) ·N (2nd ‘⟨((1st𝐴) +N 1𝑜), 1𝑜⟩)) <N ((1st ‘⟨((1st𝐴) +N 1𝑜), 1𝑜⟩) ·N (2nd𝐴))))
35 ovex 6841 . . . . . . . 8 ((1st𝐴) +N 1𝑜) ∈ V
364elexi 3353 . . . . . . . 8 1𝑜 ∈ V
3735, 36op2nd 7342 . . . . . . 7 (2nd ‘⟨((1st𝐴) +N 1𝑜), 1𝑜⟩) = 1𝑜
3837oveq2i 6824 . . . . . 6 ((1st𝐴) ·N (2nd ‘⟨((1st𝐴) +N 1𝑜), 1𝑜⟩)) = ((1st𝐴) ·N 1𝑜)
39 mulidpi 9900 . . . . . . 7 ((1st𝐴) ∈ N → ((1st𝐴) ·N 1𝑜) = (1st𝐴))
403, 39syl 17 . . . . . 6 (𝐴Q → ((1st𝐴) ·N 1𝑜) = (1st𝐴))
4138, 40syl5eq 2806 . . . . 5 (𝐴Q → ((1st𝐴) ·N (2nd ‘⟨((1st𝐴) +N 1𝑜), 1𝑜⟩)) = (1st𝐴))
4235, 36op1st 7341 . . . . . . 7 (1st ‘⟨((1st𝐴) +N 1𝑜), 1𝑜⟩) = ((1st𝐴) +N 1𝑜)
4342oveq1i 6823 . . . . . 6 ((1st ‘⟨((1st𝐴) +N 1𝑜), 1𝑜⟩) ·N (2nd𝐴)) = (((1st𝐴) +N 1𝑜) ·N (2nd𝐴))
4443a1i 11 . . . . 5 (𝐴Q → ((1st ‘⟨((1st𝐴) +N 1𝑜), 1𝑜⟩) ·N (2nd𝐴)) = (((1st𝐴) +N 1𝑜) ·N (2nd𝐴)))
4541, 44breq12d 4817 . . . 4 (𝐴Q → (((1st𝐴) ·N (2nd ‘⟨((1st𝐴) +N 1𝑜), 1𝑜⟩)) <N ((1st ‘⟨((1st𝐴) +N 1𝑜), 1𝑜⟩) ·N (2nd𝐴)) ↔ (1st𝐴) <N (((1st𝐴) +N 1𝑜) ·N (2nd𝐴))))
4634, 45bitrd 268 . . 3 (𝐴Q → (𝐴 <Q ⟨((1st𝐴) +N 1𝑜), 1𝑜⟩ ↔ (1st𝐴) <N (((1st𝐴) +N 1𝑜) ·N (2nd𝐴))))
4730, 46mpbird 247 . 2 (𝐴Q𝐴 <Q ⟨((1st𝐴) +N 1𝑜), 1𝑜⟩)
48 opeq1 4553 . . . 4 (𝑥 = ((1st𝐴) +N 1𝑜) → ⟨𝑥, 1𝑜⟩ = ⟨((1st𝐴) +N 1𝑜), 1𝑜⟩)
4948breq2d 4816 . . 3 (𝑥 = ((1st𝐴) +N 1𝑜) → (𝐴 <Q𝑥, 1𝑜⟩ ↔ 𝐴 <Q ⟨((1st𝐴) +N 1𝑜), 1𝑜⟩))
5049rspcev 3449 . 2 ((((1st𝐴) +N 1𝑜) ∈ N𝐴 <Q ⟨((1st𝐴) +N 1𝑜), 1𝑜⟩) → ∃𝑥N 𝐴 <Q𝑥, 1𝑜⟩)
516, 47, 50syl2anc 696 1 (𝐴Q → ∃𝑥N 𝐴 <Q𝑥, 1𝑜⟩)
 Colors of variables: wff setvar class Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 196   ∧ wa 383   = wceq 1632   ∈ wcel 2139  ∃wrex 3051  ⟨cop 4327   class class class wbr 4804   × cxp 5264  ‘cfv 6049  (class class class)co 6813  1st c1st 7331  2nd c2nd 7332  1𝑜c1o 7722  Ncnpi 9858   +N cpli 9859   ·N cmi 9860
 Copyright terms: Public domain W3C validator