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

Theorem cflecard 10165
Description: Cofinality is bounded by the cardinality of its argument. (Contributed by NM, 24-Apr-2004.) (Revised by Mario Carneiro, 15-Sep-2013.)
Assertion
Ref Expression
cflecard (cf‘𝐴) ⊆ (card‘𝐴)

Proof of Theorem cflecard
Dummy variables 𝑥 𝑦 𝑧 𝑤 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 cfval 10159 . . 3 (𝐴 ∈ On → (cf‘𝐴) = {𝑥 ∣ ∃𝑦(𝑥 = (card‘𝑦) ∧ (𝑦𝐴 ∧ ∀𝑧𝐴𝑤𝑦 𝑧𝑤))})
2 df-sn 4581 . . . . . 6 {(card‘𝐴)} = {𝑥𝑥 = (card‘𝐴)}
3 ssid 3956 . . . . . . . . 9 𝐴𝐴
4 ssid 3956 . . . . . . . . . . 11 𝑧𝑧
5 sseq2 3960 . . . . . . . . . . . 12 (𝑤 = 𝑧 → (𝑧𝑤𝑧𝑧))
65rspcev 3576 . . . . . . . . . . 11 ((𝑧𝐴𝑧𝑧) → ∃𝑤𝐴 𝑧𝑤)
74, 6mpan2 691 . . . . . . . . . 10 (𝑧𝐴 → ∃𝑤𝐴 𝑧𝑤)
87rgen 3053 . . . . . . . . 9 𝑧𝐴𝑤𝐴 𝑧𝑤
93, 8pm3.2i 470 . . . . . . . 8 (𝐴𝐴 ∧ ∀𝑧𝐴𝑤𝐴 𝑧𝑤)
10 fveq2 6834 . . . . . . . . . . 11 (𝑦 = 𝐴 → (card‘𝑦) = (card‘𝐴))
1110eqeq2d 2747 . . . . . . . . . 10 (𝑦 = 𝐴 → (𝑥 = (card‘𝑦) ↔ 𝑥 = (card‘𝐴)))
12 sseq1 3959 . . . . . . . . . . 11 (𝑦 = 𝐴 → (𝑦𝐴𝐴𝐴))
13 rexeq 3292 . . . . . . . . . . . 12 (𝑦 = 𝐴 → (∃𝑤𝑦 𝑧𝑤 ↔ ∃𝑤𝐴 𝑧𝑤))
1413ralbidv 3159 . . . . . . . . . . 11 (𝑦 = 𝐴 → (∀𝑧𝐴𝑤𝑦 𝑧𝑤 ↔ ∀𝑧𝐴𝑤𝐴 𝑧𝑤))
1512, 14anbi12d 632 . . . . . . . . . 10 (𝑦 = 𝐴 → ((𝑦𝐴 ∧ ∀𝑧𝐴𝑤𝑦 𝑧𝑤) ↔ (𝐴𝐴 ∧ ∀𝑧𝐴𝑤𝐴 𝑧𝑤)))
1611, 15anbi12d 632 . . . . . . . . 9 (𝑦 = 𝐴 → ((𝑥 = (card‘𝑦) ∧ (𝑦𝐴 ∧ ∀𝑧𝐴𝑤𝑦 𝑧𝑤)) ↔ (𝑥 = (card‘𝐴) ∧ (𝐴𝐴 ∧ ∀𝑧𝐴𝑤𝐴 𝑧𝑤))))
1716spcegv 3551 . . . . . . . 8 (𝐴 ∈ On → ((𝑥 = (card‘𝐴) ∧ (𝐴𝐴 ∧ ∀𝑧𝐴𝑤𝐴 𝑧𝑤)) → ∃𝑦(𝑥 = (card‘𝑦) ∧ (𝑦𝐴 ∧ ∀𝑧𝐴𝑤𝑦 𝑧𝑤))))
189, 17mpan2i 697 . . . . . . 7 (𝐴 ∈ On → (𝑥 = (card‘𝐴) → ∃𝑦(𝑥 = (card‘𝑦) ∧ (𝑦𝐴 ∧ ∀𝑧𝐴𝑤𝑦 𝑧𝑤))))
1918ss2abdv 4017 . . . . . 6 (𝐴 ∈ On → {𝑥𝑥 = (card‘𝐴)} ⊆ {𝑥 ∣ ∃𝑦(𝑥 = (card‘𝑦) ∧ (𝑦𝐴 ∧ ∀𝑧𝐴𝑤𝑦 𝑧𝑤))})
202, 19eqsstrid 3972 . . . . 5 (𝐴 ∈ On → {(card‘𝐴)} ⊆ {𝑥 ∣ ∃𝑦(𝑥 = (card‘𝑦) ∧ (𝑦𝐴 ∧ ∀𝑧𝐴𝑤𝑦 𝑧𝑤))})
21 intss 4924 . . . . 5 ({(card‘𝐴)} ⊆ {𝑥 ∣ ∃𝑦(𝑥 = (card‘𝑦) ∧ (𝑦𝐴 ∧ ∀𝑧𝐴𝑤𝑦 𝑧𝑤))} → {𝑥 ∣ ∃𝑦(𝑥 = (card‘𝑦) ∧ (𝑦𝐴 ∧ ∀𝑧𝐴𝑤𝑦 𝑧𝑤))} ⊆ {(card‘𝐴)})
2220, 21syl 17 . . . 4 (𝐴 ∈ On → {𝑥 ∣ ∃𝑦(𝑥 = (card‘𝑦) ∧ (𝑦𝐴 ∧ ∀𝑧𝐴𝑤𝑦 𝑧𝑤))} ⊆ {(card‘𝐴)})
23 fvex 6847 . . . . 5 (card‘𝐴) ∈ V
2423intsn 4939 . . . 4 {(card‘𝐴)} = (card‘𝐴)
2522, 24sseqtrdi 3974 . . 3 (𝐴 ∈ On → {𝑥 ∣ ∃𝑦(𝑥 = (card‘𝑦) ∧ (𝑦𝐴 ∧ ∀𝑧𝐴𝑤𝑦 𝑧𝑤))} ⊆ (card‘𝐴))
261, 25eqsstrd 3968 . 2 (𝐴 ∈ On → (cf‘𝐴) ⊆ (card‘𝐴))
27 cff 10160 . . . . . 6 cf:On⟶On
2827fdmi 6673 . . . . 5 dom cf = On
2928eleq2i 2828 . . . 4 (𝐴 ∈ dom cf ↔ 𝐴 ∈ On)
30 ndmfv 6866 . . . 4 𝐴 ∈ dom cf → (cf‘𝐴) = ∅)
3129, 30sylnbir 331 . . 3 𝐴 ∈ On → (cf‘𝐴) = ∅)
32 0ss 4352 . . 3 ∅ ⊆ (card‘𝐴)
3331, 32eqsstrdi 3978 . 2 𝐴 ∈ On → (cf‘𝐴) ⊆ (card‘𝐴))
3426, 33pm2.61i 182 1 (cf‘𝐴) ⊆ (card‘𝐴)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wa 395   = wceq 1541  wex 1780  wcel 2113  {cab 2714  wral 3051  wrex 3060  wss 3901  c0 4285  {csn 4580   cint 4902  dom cdm 5624  Oncon0 6317  cfv 6492  cardccrd 9849  cfccf 9851
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2115  ax-9 2123  ax-10 2146  ax-11 2162  ax-12 2184  ax-ext 2708  ax-sep 5241  ax-nul 5251  ax-pr 5377
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2539  df-eu 2569  df-clab 2715  df-cleq 2728  df-clel 2811  df-nfc 2885  df-ne 2933  df-ral 3052  df-rex 3061  df-rab 3400  df-v 3442  df-dif 3904  df-un 3906  df-in 3908  df-ss 3918  df-pss 3921  df-nul 4286  df-if 4480  df-pw 4556  df-sn 4581  df-pr 4583  df-op 4587  df-uni 4864  df-int 4903  df-br 5099  df-opab 5161  df-mpt 5180  df-tr 5206  df-id 5519  df-eprel 5524  df-po 5532  df-so 5533  df-fr 5577  df-we 5579  df-xp 5630  df-rel 5631  df-cnv 5632  df-co 5633  df-dm 5634  df-rn 5635  df-res 5636  df-ima 5637  df-ord 6320  df-on 6321  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-fv 6500  df-card 9853  df-cf 9855
This theorem is referenced by:  cfle  10166
  Copyright terms: Public domain W3C validator