Users' Mathboxes Mathbox for Mario Carneiro < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  erdsze2lem1 Structured version   Visualization version   GIF version

Theorem erdsze2lem1 32563
Description: Lemma for erdsze2 32565. (Contributed by Mario Carneiro, 22-Jan-2015.)
Hypotheses
Ref Expression
erdsze2.r (𝜑𝑅 ∈ ℕ)
erdsze2.s (𝜑𝑆 ∈ ℕ)
erdsze2.f (𝜑𝐹:𝐴1-1→ℝ)
erdsze2.a (𝜑𝐴 ⊆ ℝ)
erdsze2lem.n 𝑁 = ((𝑅 − 1) · (𝑆 − 1))
erdsze2lem.l (𝜑𝑁 < (♯‘𝐴))
Assertion
Ref Expression
erdsze2lem1 (𝜑 → ∃𝑓(𝑓:(1...(𝑁 + 1))–1-1𝐴𝑓 Isom < , < ((1...(𝑁 + 1)), ran 𝑓)))
Distinct variable groups:   𝐴,𝑓   𝑓,𝐹   𝑅,𝑓   𝑆,𝑓   𝑓,𝑁   𝜑,𝑓

Proof of Theorem erdsze2lem1
Dummy variable 𝑠 is distinct from all other variables.
StepHypRef Expression
1 erdsze2lem.n . . . . . . . . 9 𝑁 = ((𝑅 − 1) · (𝑆 − 1))
2 erdsze2.r . . . . . . . . . . 11 (𝜑𝑅 ∈ ℕ)
3 nnm1nn0 11926 . . . . . . . . . . 11 (𝑅 ∈ ℕ → (𝑅 − 1) ∈ ℕ0)
42, 3syl 17 . . . . . . . . . 10 (𝜑 → (𝑅 − 1) ∈ ℕ0)
5 erdsze2.s . . . . . . . . . . 11 (𝜑𝑆 ∈ ℕ)
6 nnm1nn0 11926 . . . . . . . . . . 11 (𝑆 ∈ ℕ → (𝑆 − 1) ∈ ℕ0)
75, 6syl 17 . . . . . . . . . 10 (𝜑 → (𝑆 − 1) ∈ ℕ0)
84, 7nn0mulcld 11948 . . . . . . . . 9 (𝜑 → ((𝑅 − 1) · (𝑆 − 1)) ∈ ℕ0)
91, 8eqeltrid 2894 . . . . . . . 8 (𝜑𝑁 ∈ ℕ0)
10 peano2nn0 11925 . . . . . . . 8 (𝑁 ∈ ℕ0 → (𝑁 + 1) ∈ ℕ0)
11 hashfz1 13702 . . . . . . . 8 ((𝑁 + 1) ∈ ℕ0 → (♯‘(1...(𝑁 + 1))) = (𝑁 + 1))
129, 10, 113syl 18 . . . . . . 7 (𝜑 → (♯‘(1...(𝑁 + 1))) = (𝑁 + 1))
1312adantr 484 . . . . . 6 ((𝜑𝐴 ∈ Fin) → (♯‘(1...(𝑁 + 1))) = (𝑁 + 1))
14 erdsze2lem.l . . . . . . . 8 (𝜑𝑁 < (♯‘𝐴))
1514adantr 484 . . . . . . 7 ((𝜑𝐴 ∈ Fin) → 𝑁 < (♯‘𝐴))
16 hashcl 13713 . . . . . . . 8 (𝐴 ∈ Fin → (♯‘𝐴) ∈ ℕ0)
17 nn0ltp1le 12028 . . . . . . . 8 ((𝑁 ∈ ℕ0 ∧ (♯‘𝐴) ∈ ℕ0) → (𝑁 < (♯‘𝐴) ↔ (𝑁 + 1) ≤ (♯‘𝐴)))
189, 16, 17syl2an 598 . . . . . . 7 ((𝜑𝐴 ∈ Fin) → (𝑁 < (♯‘𝐴) ↔ (𝑁 + 1) ≤ (♯‘𝐴)))
1915, 18mpbid 235 . . . . . 6 ((𝜑𝐴 ∈ Fin) → (𝑁 + 1) ≤ (♯‘𝐴))
2013, 19eqbrtrd 5052 . . . . 5 ((𝜑𝐴 ∈ Fin) → (♯‘(1...(𝑁 + 1))) ≤ (♯‘𝐴))
21 fzfid 13336 . . . . . 6 ((𝜑𝐴 ∈ Fin) → (1...(𝑁 + 1)) ∈ Fin)
22 simpr 488 . . . . . 6 ((𝜑𝐴 ∈ Fin) → 𝐴 ∈ Fin)
23 hashdom 13736 . . . . . 6 (((1...(𝑁 + 1)) ∈ Fin ∧ 𝐴 ∈ Fin) → ((♯‘(1...(𝑁 + 1))) ≤ (♯‘𝐴) ↔ (1...(𝑁 + 1)) ≼ 𝐴))
2421, 22, 23syl2anc 587 . . . . 5 ((𝜑𝐴 ∈ Fin) → ((♯‘(1...(𝑁 + 1))) ≤ (♯‘𝐴) ↔ (1...(𝑁 + 1)) ≼ 𝐴))
2520, 24mpbid 235 . . . 4 ((𝜑𝐴 ∈ Fin) → (1...(𝑁 + 1)) ≼ 𝐴)
26 simpr 488 . . . . . 6 ((𝜑 ∧ ¬ 𝐴 ∈ Fin) → ¬ 𝐴 ∈ Fin)
27 fzfid 13336 . . . . . 6 ((𝜑 ∧ ¬ 𝐴 ∈ Fin) → (1...(𝑁 + 1)) ∈ Fin)
28 isinffi 9405 . . . . . 6 ((¬ 𝐴 ∈ Fin ∧ (1...(𝑁 + 1)) ∈ Fin) → ∃𝑓 𝑓:(1...(𝑁 + 1))–1-1𝐴)
2926, 27, 28syl2anc 587 . . . . 5 ((𝜑 ∧ ¬ 𝐴 ∈ Fin) → ∃𝑓 𝑓:(1...(𝑁 + 1))–1-1𝐴)
30 erdsze2.a . . . . . . . 8 (𝜑𝐴 ⊆ ℝ)
31 reex 10617 . . . . . . . 8 ℝ ∈ V
32 ssexg 5191 . . . . . . . 8 ((𝐴 ⊆ ℝ ∧ ℝ ∈ V) → 𝐴 ∈ V)
3330, 31, 32sylancl 589 . . . . . . 7 (𝜑𝐴 ∈ V)
3433adantr 484 . . . . . 6 ((𝜑 ∧ ¬ 𝐴 ∈ Fin) → 𝐴 ∈ V)
35 brdomg 8502 . . . . . 6 (𝐴 ∈ V → ((1...(𝑁 + 1)) ≼ 𝐴 ↔ ∃𝑓 𝑓:(1...(𝑁 + 1))–1-1𝐴))
3634, 35syl 17 . . . . 5 ((𝜑 ∧ ¬ 𝐴 ∈ Fin) → ((1...(𝑁 + 1)) ≼ 𝐴 ↔ ∃𝑓 𝑓:(1...(𝑁 + 1))–1-1𝐴))
3729, 36mpbird 260 . . . 4 ((𝜑 ∧ ¬ 𝐴 ∈ Fin) → (1...(𝑁 + 1)) ≼ 𝐴)
3825, 37pm2.61dan 812 . . 3 (𝜑 → (1...(𝑁 + 1)) ≼ 𝐴)
39 domeng 8506 . . . 4 (𝐴 ∈ V → ((1...(𝑁 + 1)) ≼ 𝐴 ↔ ∃𝑠((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)))
4033, 39syl 17 . . 3 (𝜑 → ((1...(𝑁 + 1)) ≼ 𝐴 ↔ ∃𝑠((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)))
4138, 40mpbid 235 . 2 (𝜑 → ∃𝑠((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴))
42 simprr 772 . . . . . 6 ((𝜑 ∧ ((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)) → 𝑠𝐴)
4330adantr 484 . . . . . 6 ((𝜑 ∧ ((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)) → 𝐴 ⊆ ℝ)
4442, 43sstrd 3925 . . . . 5 ((𝜑 ∧ ((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)) → 𝑠 ⊆ ℝ)
45 ltso 10710 . . . . 5 < Or ℝ
46 soss 5457 . . . . 5 (𝑠 ⊆ ℝ → ( < Or ℝ → < Or 𝑠))
4744, 45, 46mpisyl 21 . . . 4 ((𝜑 ∧ ((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)) → < Or 𝑠)
48 fzfid 13336 . . . . 5 ((𝜑 ∧ ((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)) → (1...(𝑁 + 1)) ∈ Fin)
49 simprl 770 . . . . . 6 ((𝜑 ∧ ((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)) → (1...(𝑁 + 1)) ≈ 𝑠)
50 enfi 8718 . . . . . 6 ((1...(𝑁 + 1)) ≈ 𝑠 → ((1...(𝑁 + 1)) ∈ Fin ↔ 𝑠 ∈ Fin))
5149, 50syl 17 . . . . 5 ((𝜑 ∧ ((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)) → ((1...(𝑁 + 1)) ∈ Fin ↔ 𝑠 ∈ Fin))
5248, 51mpbid 235 . . . 4 ((𝜑 ∧ ((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)) → 𝑠 ∈ Fin)
53 fz1iso 13816 . . . 4 (( < Or 𝑠𝑠 ∈ Fin) → ∃𝑓 𝑓 Isom < , < ((1...(♯‘𝑠)), 𝑠))
5447, 52, 53syl2anc 587 . . 3 ((𝜑 ∧ ((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)) → ∃𝑓 𝑓 Isom < , < ((1...(♯‘𝑠)), 𝑠))
55 isof1o 7055 . . . . . . . . . 10 (𝑓 Isom < , < ((1...(♯‘𝑠)), 𝑠) → 𝑓:(1...(♯‘𝑠))–1-1-onto𝑠)
5655adantl 485 . . . . . . . . 9 (((𝜑 ∧ ((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)) ∧ 𝑓 Isom < , < ((1...(♯‘𝑠)), 𝑠)) → 𝑓:(1...(♯‘𝑠))–1-1-onto𝑠)
57 hashen 13703 . . . . . . . . . . . . . . 15 (((1...(𝑁 + 1)) ∈ Fin ∧ 𝑠 ∈ Fin) → ((♯‘(1...(𝑁 + 1))) = (♯‘𝑠) ↔ (1...(𝑁 + 1)) ≈ 𝑠))
5848, 52, 57syl2anc 587 . . . . . . . . . . . . . 14 ((𝜑 ∧ ((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)) → ((♯‘(1...(𝑁 + 1))) = (♯‘𝑠) ↔ (1...(𝑁 + 1)) ≈ 𝑠))
5949, 58mpbird 260 . . . . . . . . . . . . 13 ((𝜑 ∧ ((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)) → (♯‘(1...(𝑁 + 1))) = (♯‘𝑠))
6012adantr 484 . . . . . . . . . . . . 13 ((𝜑 ∧ ((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)) → (♯‘(1...(𝑁 + 1))) = (𝑁 + 1))
6159, 60eqtr3d 2835 . . . . . . . . . . . 12 ((𝜑 ∧ ((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)) → (♯‘𝑠) = (𝑁 + 1))
6261adantr 484 . . . . . . . . . . 11 (((𝜑 ∧ ((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)) ∧ 𝑓 Isom < , < ((1...(♯‘𝑠)), 𝑠)) → (♯‘𝑠) = (𝑁 + 1))
6362oveq2d 7151 . . . . . . . . . 10 (((𝜑 ∧ ((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)) ∧ 𝑓 Isom < , < ((1...(♯‘𝑠)), 𝑠)) → (1...(♯‘𝑠)) = (1...(𝑁 + 1)))
6463f1oeq2d 6586 . . . . . . . . 9 (((𝜑 ∧ ((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)) ∧ 𝑓 Isom < , < ((1...(♯‘𝑠)), 𝑠)) → (𝑓:(1...(♯‘𝑠))–1-1-onto𝑠𝑓:(1...(𝑁 + 1))–1-1-onto𝑠))
6556, 64mpbid 235 . . . . . . . 8 (((𝜑 ∧ ((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)) ∧ 𝑓 Isom < , < ((1...(♯‘𝑠)), 𝑠)) → 𝑓:(1...(𝑁 + 1))–1-1-onto𝑠)
66 f1of1 6589 . . . . . . . 8 (𝑓:(1...(𝑁 + 1))–1-1-onto𝑠𝑓:(1...(𝑁 + 1))–1-1𝑠)
6765, 66syl 17 . . . . . . 7 (((𝜑 ∧ ((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)) ∧ 𝑓 Isom < , < ((1...(♯‘𝑠)), 𝑠)) → 𝑓:(1...(𝑁 + 1))–1-1𝑠)
68 simplrr 777 . . . . . . 7 (((𝜑 ∧ ((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)) ∧ 𝑓 Isom < , < ((1...(♯‘𝑠)), 𝑠)) → 𝑠𝐴)
69 f1ss 6555 . . . . . . 7 ((𝑓:(1...(𝑁 + 1))–1-1𝑠𝑠𝐴) → 𝑓:(1...(𝑁 + 1))–1-1𝐴)
7067, 68, 69syl2anc 587 . . . . . 6 (((𝜑 ∧ ((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)) ∧ 𝑓 Isom < , < ((1...(♯‘𝑠)), 𝑠)) → 𝑓:(1...(𝑁 + 1))–1-1𝐴)
71 simpr 488 . . . . . . . 8 (((𝜑 ∧ ((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)) ∧ 𝑓 Isom < , < ((1...(♯‘𝑠)), 𝑠)) → 𝑓 Isom < , < ((1...(♯‘𝑠)), 𝑠))
72 f1ofo 6597 . . . . . . . . 9 (𝑓:(1...(♯‘𝑠))–1-1-onto𝑠𝑓:(1...(♯‘𝑠))–onto𝑠)
73 forn 6568 . . . . . . . . 9 (𝑓:(1...(♯‘𝑠))–onto𝑠 → ran 𝑓 = 𝑠)
74 isoeq5 7053 . . . . . . . . 9 (ran 𝑓 = 𝑠 → (𝑓 Isom < , < ((1...(♯‘𝑠)), ran 𝑓) ↔ 𝑓 Isom < , < ((1...(♯‘𝑠)), 𝑠)))
7556, 72, 73, 744syl 19 . . . . . . . 8 (((𝜑 ∧ ((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)) ∧ 𝑓 Isom < , < ((1...(♯‘𝑠)), 𝑠)) → (𝑓 Isom < , < ((1...(♯‘𝑠)), ran 𝑓) ↔ 𝑓 Isom < , < ((1...(♯‘𝑠)), 𝑠)))
7671, 75mpbird 260 . . . . . . 7 (((𝜑 ∧ ((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)) ∧ 𝑓 Isom < , < ((1...(♯‘𝑠)), 𝑠)) → 𝑓 Isom < , < ((1...(♯‘𝑠)), ran 𝑓))
77 isoeq4 7052 . . . . . . . 8 ((1...(♯‘𝑠)) = (1...(𝑁 + 1)) → (𝑓 Isom < , < ((1...(♯‘𝑠)), ran 𝑓) ↔ 𝑓 Isom < , < ((1...(𝑁 + 1)), ran 𝑓)))
7863, 77syl 17 . . . . . . 7 (((𝜑 ∧ ((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)) ∧ 𝑓 Isom < , < ((1...(♯‘𝑠)), 𝑠)) → (𝑓 Isom < , < ((1...(♯‘𝑠)), ran 𝑓) ↔ 𝑓 Isom < , < ((1...(𝑁 + 1)), ran 𝑓)))
7976, 78mpbid 235 . . . . . 6 (((𝜑 ∧ ((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)) ∧ 𝑓 Isom < , < ((1...(♯‘𝑠)), 𝑠)) → 𝑓 Isom < , < ((1...(𝑁 + 1)), ran 𝑓))
8070, 79jca 515 . . . . 5 (((𝜑 ∧ ((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)) ∧ 𝑓 Isom < , < ((1...(♯‘𝑠)), 𝑠)) → (𝑓:(1...(𝑁 + 1))–1-1𝐴𝑓 Isom < , < ((1...(𝑁 + 1)), ran 𝑓)))
8180ex 416 . . . 4 ((𝜑 ∧ ((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)) → (𝑓 Isom < , < ((1...(♯‘𝑠)), 𝑠) → (𝑓:(1...(𝑁 + 1))–1-1𝐴𝑓 Isom < , < ((1...(𝑁 + 1)), ran 𝑓))))
8281eximdv 1918 . . 3 ((𝜑 ∧ ((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)) → (∃𝑓 𝑓 Isom < , < ((1...(♯‘𝑠)), 𝑠) → ∃𝑓(𝑓:(1...(𝑁 + 1))–1-1𝐴𝑓 Isom < , < ((1...(𝑁 + 1)), ran 𝑓))))
8354, 82mpd 15 . 2 ((𝜑 ∧ ((1...(𝑁 + 1)) ≈ 𝑠𝑠𝐴)) → ∃𝑓(𝑓:(1...(𝑁 + 1))–1-1𝐴𝑓 Isom < , < ((1...(𝑁 + 1)), ran 𝑓)))
8441, 83exlimddv 1936 1 (𝜑 → ∃𝑓(𝑓:(1...(𝑁 + 1))–1-1𝐴𝑓 Isom < , < ((1...(𝑁 + 1)), ran 𝑓)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 209  wa 399   = wceq 1538  wex 1781  wcel 2111  Vcvv 3441  wss 3881   class class class wbr 5030   Or wor 5437  ran crn 5520  1-1wf1 6321  ontowfo 6322  1-1-ontowf1o 6323  cfv 6324   Isom wiso 6325  (class class class)co 7135  cen 8489  cdom 8490  Fincfn 8492  cr 10525  1c1 10527   + caddc 10529   · cmul 10531   < clt 10664  cle 10665  cmin 10859  cn 11625  0cn0 11885  ...cfz 12885  chash 13686
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-rep 5154  ax-sep 5167  ax-nul 5174  ax-pow 5231  ax-pr 5295  ax-un 7441  ax-cnex 10582  ax-resscn 10583  ax-1cn 10584  ax-icn 10585  ax-addcl 10586  ax-addrcl 10587  ax-mulcl 10588  ax-mulrcl 10589  ax-mulcom 10590  ax-addass 10591  ax-mulass 10592  ax-distr 10593  ax-i2m1 10594  ax-1ne0 10595  ax-1rid 10596  ax-rnegex 10597  ax-rrecex 10598  ax-cnre 10599  ax-pre-lttri 10600  ax-pre-lttrn 10601  ax-pre-ltadd 10602  ax-pre-mulgt0 10603
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-nel 3092  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-se 5479  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-isom 6333  df-riota 7093  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-er 8272  df-en 8493  df-dom 8494  df-sdom 8495  df-fin 8496  df-oi 8958  df-card 9352  df-pnf 10666  df-mnf 10667  df-xr 10668  df-ltxr 10669  df-le 10670  df-sub 10861  df-neg 10862  df-nn 11626  df-n0 11886  df-xnn0 11956  df-z 11970  df-uz 12232  df-fz 12886  df-hash 13687
This theorem is referenced by:  erdsze2  32565
  Copyright terms: Public domain W3C validator