ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  axarch GIF version

Theorem axarch 7626
Description: Archimedean axiom. The Archimedean property is more naturally stated once we have defined . Unless we find another way to state it, we'll just use the right hand side of dfnn2 8632 in stating what we mean by "natural number" in the context of this axiom.

This construction-dependent theorem should not be referenced directly; instead, use ax-arch 7664. (Contributed by Jim Kingdon, 22-Apr-2020.) (New usage is discouraged.)

Assertion
Ref Expression
axarch (𝐴 ∈ ℝ → ∃𝑛 {𝑥 ∣ (1 ∈ 𝑥 ∧ ∀𝑦𝑥 (𝑦 + 1) ∈ 𝑥)}𝐴 < 𝑛)
Distinct variable group:   𝐴,𝑛,𝑥,𝑦

Proof of Theorem axarch
Dummy variables 𝑙 𝑢 𝑤 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 elreal 7563 . . 3 (𝐴 ∈ ℝ ↔ ∃𝑧R𝑧, 0R⟩ = 𝐴)
21biimpi 119 . 2 (𝐴 ∈ ℝ → ∃𝑧R𝑧, 0R⟩ = 𝐴)
3 archsr 7524 . . . 4 (𝑧R → ∃𝑤N 𝑧 <R [⟨(⟨{𝑙𝑙 <Q [⟨𝑤, 1o⟩] ~Q }, {𝑢 ∣ [⟨𝑤, 1o⟩] ~Q <Q 𝑢}⟩ +P 1P), 1P⟩] ~R )
43ad2antrl 479 . . 3 ((𝐴 ∈ ℝ ∧ (𝑧R ∧ ⟨𝑧, 0R⟩ = 𝐴)) → ∃𝑤N 𝑧 <R [⟨(⟨{𝑙𝑙 <Q [⟨𝑤, 1o⟩] ~Q }, {𝑢 ∣ [⟨𝑤, 1o⟩] ~Q <Q 𝑢}⟩ +P 1P), 1P⟩] ~R )
5 simplrr 508 . . . . 5 (((𝐴 ∈ ℝ ∧ (𝑧R ∧ ⟨𝑧, 0R⟩ = 𝐴)) ∧ (𝑤N𝑧 <R [⟨(⟨{𝑙𝑙 <Q [⟨𝑤, 1o⟩] ~Q }, {𝑢 ∣ [⟨𝑤, 1o⟩] ~Q <Q 𝑢}⟩ +P 1P), 1P⟩] ~R )) → ⟨𝑧, 0R⟩ = 𝐴)
6 simprr 504 . . . . . 6 (((𝐴 ∈ ℝ ∧ (𝑧R ∧ ⟨𝑧, 0R⟩ = 𝐴)) ∧ (𝑤N𝑧 <R [⟨(⟨{𝑙𝑙 <Q [⟨𝑤, 1o⟩] ~Q }, {𝑢 ∣ [⟨𝑤, 1o⟩] ~Q <Q 𝑢}⟩ +P 1P), 1P⟩] ~R )) → 𝑧 <R [⟨(⟨{𝑙𝑙 <Q [⟨𝑤, 1o⟩] ~Q }, {𝑢 ∣ [⟨𝑤, 1o⟩] ~Q <Q 𝑢}⟩ +P 1P), 1P⟩] ~R )
7 ltresr 7574 . . . . . 6 (⟨𝑧, 0R⟩ < ⟨[⟨(⟨{𝑙𝑙 <Q [⟨𝑤, 1o⟩] ~Q }, {𝑢 ∣ [⟨𝑤, 1o⟩] ~Q <Q 𝑢}⟩ +P 1P), 1P⟩] ~R , 0R⟩ ↔ 𝑧 <R [⟨(⟨{𝑙𝑙 <Q [⟨𝑤, 1o⟩] ~Q }, {𝑢 ∣ [⟨𝑤, 1o⟩] ~Q <Q 𝑢}⟩ +P 1P), 1P⟩] ~R )
86, 7sylibr 133 . . . . 5 (((𝐴 ∈ ℝ ∧ (𝑧R ∧ ⟨𝑧, 0R⟩ = 𝐴)) ∧ (𝑤N𝑧 <R [⟨(⟨{𝑙𝑙 <Q [⟨𝑤, 1o⟩] ~Q }, {𝑢 ∣ [⟨𝑤, 1o⟩] ~Q <Q 𝑢}⟩ +P 1P), 1P⟩] ~R )) → ⟨𝑧, 0R⟩ < ⟨[⟨(⟨{𝑙𝑙 <Q [⟨𝑤, 1o⟩] ~Q }, {𝑢 ∣ [⟨𝑤, 1o⟩] ~Q <Q 𝑢}⟩ +P 1P), 1P⟩] ~R , 0R⟩)
95, 8eqbrtrrd 3917 . . . 4 (((𝐴 ∈ ℝ ∧ (𝑧R ∧ ⟨𝑧, 0R⟩ = 𝐴)) ∧ (𝑤N𝑧 <R [⟨(⟨{𝑙𝑙 <Q [⟨𝑤, 1o⟩] ~Q }, {𝑢 ∣ [⟨𝑤, 1o⟩] ~Q <Q 𝑢}⟩ +P 1P), 1P⟩] ~R )) → 𝐴 < ⟨[⟨(⟨{𝑙𝑙 <Q [⟨𝑤, 1o⟩] ~Q }, {𝑢 ∣ [⟨𝑤, 1o⟩] ~Q <Q 𝑢}⟩ +P 1P), 1P⟩] ~R , 0R⟩)
10 pitonn 7583 . . . . . 6 (𝑤N → ⟨[⟨(⟨{𝑙𝑙 <Q [⟨𝑤, 1o⟩] ~Q }, {𝑢 ∣ [⟨𝑤, 1o⟩] ~Q <Q 𝑢}⟩ +P 1P), 1P⟩] ~R , 0R⟩ ∈ {𝑥 ∣ (1 ∈ 𝑥 ∧ ∀𝑦𝑥 (𝑦 + 1) ∈ 𝑥)})
1110ad2antrl 479 . . . . 5 (((𝐴 ∈ ℝ ∧ (𝑧R ∧ ⟨𝑧, 0R⟩ = 𝐴)) ∧ (𝑤N𝑧 <R [⟨(⟨{𝑙𝑙 <Q [⟨𝑤, 1o⟩] ~Q }, {𝑢 ∣ [⟨𝑤, 1o⟩] ~Q <Q 𝑢}⟩ +P 1P), 1P⟩] ~R )) → ⟨[⟨(⟨{𝑙𝑙 <Q [⟨𝑤, 1o⟩] ~Q }, {𝑢 ∣ [⟨𝑤, 1o⟩] ~Q <Q 𝑢}⟩ +P 1P), 1P⟩] ~R , 0R⟩ ∈ {𝑥 ∣ (1 ∈ 𝑥 ∧ ∀𝑦𝑥 (𝑦 + 1) ∈ 𝑥)})
12 simpr 109 . . . . . 6 ((((𝐴 ∈ ℝ ∧ (𝑧R ∧ ⟨𝑧, 0R⟩ = 𝐴)) ∧ (𝑤N𝑧 <R [⟨(⟨{𝑙𝑙 <Q [⟨𝑤, 1o⟩] ~Q }, {𝑢 ∣ [⟨𝑤, 1o⟩] ~Q <Q 𝑢}⟩ +P 1P), 1P⟩] ~R )) ∧ 𝑛 = ⟨[⟨(⟨{𝑙𝑙 <Q [⟨𝑤, 1o⟩] ~Q }, {𝑢 ∣ [⟨𝑤, 1o⟩] ~Q <Q 𝑢}⟩ +P 1P), 1P⟩] ~R , 0R⟩) → 𝑛 = ⟨[⟨(⟨{𝑙𝑙 <Q [⟨𝑤, 1o⟩] ~Q }, {𝑢 ∣ [⟨𝑤, 1o⟩] ~Q <Q 𝑢}⟩ +P 1P), 1P⟩] ~R , 0R⟩)
1312breq2d 3907 . . . . 5 ((((𝐴 ∈ ℝ ∧ (𝑧R ∧ ⟨𝑧, 0R⟩ = 𝐴)) ∧ (𝑤N𝑧 <R [⟨(⟨{𝑙𝑙 <Q [⟨𝑤, 1o⟩] ~Q }, {𝑢 ∣ [⟨𝑤, 1o⟩] ~Q <Q 𝑢}⟩ +P 1P), 1P⟩] ~R )) ∧ 𝑛 = ⟨[⟨(⟨{𝑙𝑙 <Q [⟨𝑤, 1o⟩] ~Q }, {𝑢 ∣ [⟨𝑤, 1o⟩] ~Q <Q 𝑢}⟩ +P 1P), 1P⟩] ~R , 0R⟩) → (𝐴 < 𝑛𝐴 < ⟨[⟨(⟨{𝑙𝑙 <Q [⟨𝑤, 1o⟩] ~Q }, {𝑢 ∣ [⟨𝑤, 1o⟩] ~Q <Q 𝑢}⟩ +P 1P), 1P⟩] ~R , 0R⟩))
1411, 13rspcedv 2764 . . . 4 (((𝐴 ∈ ℝ ∧ (𝑧R ∧ ⟨𝑧, 0R⟩ = 𝐴)) ∧ (𝑤N𝑧 <R [⟨(⟨{𝑙𝑙 <Q [⟨𝑤, 1o⟩] ~Q }, {𝑢 ∣ [⟨𝑤, 1o⟩] ~Q <Q 𝑢}⟩ +P 1P), 1P⟩] ~R )) → (𝐴 < ⟨[⟨(⟨{𝑙𝑙 <Q [⟨𝑤, 1o⟩] ~Q }, {𝑢 ∣ [⟨𝑤, 1o⟩] ~Q <Q 𝑢}⟩ +P 1P), 1P⟩] ~R , 0R⟩ → ∃𝑛 {𝑥 ∣ (1 ∈ 𝑥 ∧ ∀𝑦𝑥 (𝑦 + 1) ∈ 𝑥)}𝐴 < 𝑛))
159, 14mpd 13 . . 3 (((𝐴 ∈ ℝ ∧ (𝑧R ∧ ⟨𝑧, 0R⟩ = 𝐴)) ∧ (𝑤N𝑧 <R [⟨(⟨{𝑙𝑙 <Q [⟨𝑤, 1o⟩] ~Q }, {𝑢 ∣ [⟨𝑤, 1o⟩] ~Q <Q 𝑢}⟩ +P 1P), 1P⟩] ~R )) → ∃𝑛 {𝑥 ∣ (1 ∈ 𝑥 ∧ ∀𝑦𝑥 (𝑦 + 1) ∈ 𝑥)}𝐴 < 𝑛)
164, 15rexlimddv 2528 . 2 ((𝐴 ∈ ℝ ∧ (𝑧R ∧ ⟨𝑧, 0R⟩ = 𝐴)) → ∃𝑛 {𝑥 ∣ (1 ∈ 𝑥 ∧ ∀𝑦𝑥 (𝑦 + 1) ∈ 𝑥)}𝐴 < 𝑛)
172, 16rexlimddv 2528 1 (𝐴 ∈ ℝ → ∃𝑛 {𝑥 ∣ (1 ∈ 𝑥 ∧ ∀𝑦𝑥 (𝑦 + 1) ∈ 𝑥)}𝐴 < 𝑛)
Colors of variables: wff set class
Syntax hints:  wi 4  wa 103   = wceq 1314  wcel 1463  {cab 2101  wral 2390  wrex 2391  cop 3496   cint 3737   class class class wbr 3895  (class class class)co 5728  1oc1o 6260  [cec 6381  Ncnpi 7028   ~Q ceq 7035   <Q cltq 7041  1Pc1p 7048   +P cpp 7049   ~R cer 7052  Rcnr 7053  0Rc0r 7054   <R cltr 7059  cr 7546  1c1 7548   + caddc 7550   < cltrr 7551
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 105  ax-ia2 106  ax-ia3 107  ax-in1 586  ax-in2 587  ax-io 681  ax-5 1406  ax-7 1407  ax-gen 1408  ax-ie1 1452  ax-ie2 1453  ax-8 1465  ax-10 1466  ax-11 1467  ax-i12 1468  ax-bndl 1469  ax-4 1470  ax-13 1474  ax-14 1475  ax-17 1489  ax-i9 1493  ax-ial 1497  ax-i5r 1498  ax-ext 2097  ax-coll 4003  ax-sep 4006  ax-nul 4014  ax-pow 4058  ax-pr 4091  ax-un 4315  ax-setind 4412  ax-iinf 4462
This theorem depends on definitions:  df-bi 116  df-dc 803  df-3or 946  df-3an 947  df-tru 1317  df-fal 1320  df-nf 1420  df-sb 1719  df-eu 1978  df-mo 1979  df-clab 2102  df-cleq 2108  df-clel 2111  df-nfc 2244  df-ne 2283  df-ral 2395  df-rex 2396  df-reu 2397  df-rab 2399  df-v 2659  df-sbc 2879  df-csb 2972  df-dif 3039  df-un 3041  df-in 3043  df-ss 3050  df-nul 3330  df-pw 3478  df-sn 3499  df-pr 3500  df-op 3502  df-uni 3703  df-int 3738  df-iun 3781  df-br 3896  df-opab 3950  df-mpt 3951  df-tr 3987  df-eprel 4171  df-id 4175  df-po 4178  df-iso 4179  df-iord 4248  df-on 4250  df-suc 4253  df-iom 4465  df-xp 4505  df-rel 4506  df-cnv 4507  df-co 4508  df-dm 4509  df-rn 4510  df-res 4511  df-ima 4512  df-iota 5046  df-fun 5083  df-fn 5084  df-f 5085  df-f1 5086  df-fo 5087  df-f1o 5088  df-fv 5089  df-ov 5731  df-oprab 5732  df-mpo 5733  df-1st 5992  df-2nd 5993  df-recs 6156  df-irdg 6221  df-1o 6267  df-2o 6268  df-oadd 6271  df-omul 6272  df-er 6383  df-ec 6385  df-qs 6389  df-ni 7060  df-pli 7061  df-mi 7062  df-lti 7063  df-plpq 7100  df-mpq 7101  df-enq 7103  df-nqqs 7104  df-plqqs 7105  df-mqqs 7106  df-1nqqs 7107  df-rq 7108  df-ltnqqs 7109  df-enq0 7180  df-nq0 7181  df-0nq0 7182  df-plq0 7183  df-mq0 7184  df-inp 7222  df-i1p 7223  df-iplp 7224  df-iltp 7226  df-enr 7469  df-nr 7470  df-plr 7471  df-ltr 7473  df-0r 7474  df-1r 7475  df-c 7553  df-1 7555  df-r 7557  df-add 7558  df-lt 7560
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator