MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  infxpenc2lem2 Structured version   Visualization version   GIF version
Theorem infxpenc2lem2 10015
Description: Lemma for infxpenc2 10017. (Contributed by Mario Carneiro, 30-May-2015.) (Revised by AV, 7-Jul-2019.)
Hypotheses
Ref Expression
infxpenc2.1 (πœ‘ β†’ 𝐴 ∈ On)
infxpenc2.2 (πœ‘ β†’ βˆ€π‘ ∈ 𝐴 (Ο‰ βŠ† 𝑏 β†’ βˆƒπ‘€ ∈ (On βˆ– 1o)(π‘›β€˜π‘):𝑏–1-1-ontoβ†’(Ο‰ ↑o 𝑀)))
infxpenc2.3 π‘Š = (β—‘(π‘₯ ∈ (On βˆ– 1o) ↦ (Ο‰ ↑o π‘₯))β€˜ran (π‘›β€˜π‘))
infxpenc2.4 (πœ‘ β†’ 𝐹:(Ο‰ ↑o 2o)–1-1-ontoβ†’Ο‰)
infxpenc2.5 (πœ‘ β†’ (πΉβ€˜βˆ…) = βˆ…)
infxpenc2.k 𝐾 = (𝑦 ∈ {π‘₯ ∈ ((Ο‰ ↑o 2o) ↑m π‘Š) ∣ π‘₯ finSupp βˆ…} ↦ (𝐹 ∘ (𝑦 ∘ β—‘( I β†Ύ π‘Š))))
infxpenc2.h 𝐻 = (((Ο‰ CNF π‘Š) ∘ 𝐾) ∘ β—‘((Ο‰ ↑o 2o) CNF π‘Š))
infxpenc2.l 𝐿 = (𝑦 ∈ {π‘₯ ∈ (Ο‰ ↑m (π‘Š Β·o 2o)) ∣ π‘₯ finSupp βˆ…} ↦ (( I β†Ύ Ο‰) ∘ (𝑦 ∘ β—‘(π‘Œ ∘ ◑𝑋))))
infxpenc2.x 𝑋 = (𝑧 ∈ 2o, 𝑀 ∈ π‘Š ↦ ((π‘Š Β·o 𝑧) +o 𝑀))
infxpenc2.y π‘Œ = (𝑧 ∈ 2o, 𝑀 ∈ π‘Š ↦ ((2o Β·o 𝑀) +o 𝑧))
infxpenc2.j 𝐽 = (((Ο‰ CNF (2o Β·o π‘Š)) ∘ 𝐿) ∘ β—‘(Ο‰ CNF (π‘Š Β·o 2o)))
infxpenc2.z 𝑍 = (π‘₯ ∈ (Ο‰ ↑o π‘Š), 𝑦 ∈ (Ο‰ ↑o π‘Š) ↦ (((Ο‰ ↑o π‘Š) Β·o π‘₯) +o 𝑦))
infxpenc2.t 𝑇 = (π‘₯ ∈ 𝑏, 𝑦 ∈ 𝑏 ↦ ⟨((π‘›β€˜π‘)β€˜π‘₯), ((π‘›β€˜π‘)β€˜π‘¦)⟩)
infxpenc2.g 𝐺 = (β—‘(π‘›β€˜π‘) ∘ (((𝐻 ∘ 𝐽) ∘ 𝑍) ∘ 𝑇))
Assertion
Ref Expression
infxpenc2lem2 (πœ‘ β†’ βˆƒπ‘”βˆ€π‘ ∈ 𝐴 (Ο‰ βŠ† 𝑏 β†’ (π‘”β€˜π‘):(𝑏 Γ— 𝑏)–1-1-onto→𝑏))
Distinct variable groups:   𝑔,𝑏,𝑛,𝑀,π‘₯,𝑦,𝐴   πœ‘,𝑏,𝑀,π‘₯,𝑦   𝑧,𝑔,π‘Š,𝑀,π‘₯,𝑦   𝑔,𝐹,π‘₯,𝑦   𝑔,𝐺   π‘₯,𝑋,𝑦   π‘₯,π‘Œ,𝑦
Allowed substitution hints:   πœ‘(𝑧,𝑔,𝑛)   𝐴(𝑧)   𝑇(π‘₯,𝑦,𝑧,𝑀,𝑔,𝑛,𝑏)   𝐹(𝑧,𝑀,𝑛,𝑏)   𝐺(π‘₯,𝑦,𝑧,𝑀,𝑛,𝑏)   𝐻(π‘₯,𝑦,𝑧,𝑀,𝑔,𝑛,𝑏)   𝐽(π‘₯,𝑦,𝑧,𝑀,𝑔,𝑛,𝑏)   𝐾(π‘₯,𝑦,𝑧,𝑀,𝑔,𝑛,𝑏)   𝐿(π‘₯,𝑦,𝑧,𝑀,𝑔,𝑛,𝑏)   π‘Š(𝑛,𝑏)   𝑋(𝑧,𝑀,𝑔,𝑛,𝑏)   π‘Œ(𝑧,𝑀,𝑔,𝑛,𝑏)   𝑍(π‘₯,𝑦,𝑧,𝑀,𝑔,𝑛,𝑏)
Proof of Theorem infxpenc2lem2
StepHypRef Expression
1 infxpenc2.1 . . 3 (πœ‘ β†’ 𝐴 ∈ On)
21mptexd 7226 . 2 (πœ‘ β†’ (𝑏 ∈ 𝐴 ↦ 𝐺) ∈ V)
31adantr 482 . . . . . . 7 ((πœ‘ ∧ (𝑏 ∈ 𝐴 ∧ Ο‰ βŠ† 𝑏)) β†’ 𝐴 ∈ On)
4 simprl 770 . . . . . . 7 ((πœ‘ ∧ (𝑏 ∈ 𝐴 ∧ Ο‰ βŠ† 𝑏)) β†’ 𝑏 ∈ 𝐴)
5 onelon 6390 . . . . . . 7 ((𝐴 ∈ On ∧ 𝑏 ∈ 𝐴) β†’ 𝑏 ∈ On)
63, 4, 5syl2anc 585 . . . . . 6 ((πœ‘ ∧ (𝑏 ∈ 𝐴 ∧ Ο‰ βŠ† 𝑏)) β†’ 𝑏 ∈ On)
7 simprr 772 . . . . . 6 ((πœ‘ ∧ (𝑏 ∈ 𝐴 ∧ Ο‰ βŠ† 𝑏)) β†’ Ο‰ βŠ† 𝑏)
8 infxpenc2.2 . . . . . . . 8 (πœ‘ β†’ βˆ€π‘ ∈ 𝐴 (Ο‰ βŠ† 𝑏 β†’ βˆƒπ‘€ ∈ (On βˆ– 1o)(π‘›β€˜π‘):𝑏–1-1-ontoβ†’(Ο‰ ↑o 𝑀)))
9 infxpenc2.3 . . . . . . . 8 π‘Š = (β—‘(π‘₯ ∈ (On βˆ– 1o) ↦ (Ο‰ ↑o π‘₯))β€˜ran (π‘›β€˜π‘))
101, 8, 9infxpenc2lem1 10014 . . . . . . 7 ((πœ‘ ∧ (𝑏 ∈ 𝐴 ∧ Ο‰ βŠ† 𝑏)) β†’ (π‘Š ∈ (On βˆ– 1o) ∧ (π‘›β€˜π‘):𝑏–1-1-ontoβ†’(Ο‰ ↑o π‘Š)))
1110simpld 496 . . . . . 6 ((πœ‘ ∧ (𝑏 ∈ 𝐴 ∧ Ο‰ βŠ† 𝑏)) β†’ π‘Š ∈ (On βˆ– 1o))
12 infxpenc2.4 . . . . . . 7 (πœ‘ β†’ 𝐹:(Ο‰ ↑o 2o)–1-1-ontoβ†’Ο‰)
1312adantr 482 . . . . . 6 ((πœ‘ ∧ (𝑏 ∈ 𝐴 ∧ Ο‰ βŠ† 𝑏)) β†’ 𝐹:(Ο‰ ↑o 2o)–1-1-ontoβ†’Ο‰)
14 infxpenc2.5 . . . . . . 7 (πœ‘ β†’ (πΉβ€˜βˆ…) = βˆ…)
1514adantr 482 . . . . . 6 ((πœ‘ ∧ (𝑏 ∈ 𝐴 ∧ Ο‰ βŠ† 𝑏)) β†’ (πΉβ€˜βˆ…) = βˆ…)
1610simprd 497 . . . . . 6 ((πœ‘ ∧ (𝑏 ∈ 𝐴 ∧ Ο‰ βŠ† 𝑏)) β†’ (π‘›β€˜π‘):𝑏–1-1-ontoβ†’(Ο‰ ↑o π‘Š))
17 infxpenc2.k . . . . . 6 𝐾 = (𝑦 ∈ {π‘₯ ∈ ((Ο‰ ↑o 2o) ↑m π‘Š) ∣ π‘₯ finSupp βˆ…} ↦ (𝐹 ∘ (𝑦 ∘ β—‘( I β†Ύ π‘Š))))
18 infxpenc2.h . . . . . 6 𝐻 = (((Ο‰ CNF π‘Š) ∘ 𝐾) ∘ β—‘((Ο‰ ↑o 2o) CNF π‘Š))
19 infxpenc2.l . . . . . 6 𝐿 = (𝑦 ∈ {π‘₯ ∈ (Ο‰ ↑m (π‘Š Β·o 2o)) ∣ π‘₯ finSupp βˆ…} ↦ (( I β†Ύ Ο‰) ∘ (𝑦 ∘ β—‘(π‘Œ ∘ ◑𝑋))))
20 infxpenc2.x . . . . . 6 𝑋 = (𝑧 ∈ 2o, 𝑀 ∈ π‘Š ↦ ((π‘Š Β·o 𝑧) +o 𝑀))
21 infxpenc2.y . . . . . 6 π‘Œ = (𝑧 ∈ 2o, 𝑀 ∈ π‘Š ↦ ((2o Β·o 𝑀) +o 𝑧))
22 infxpenc2.j . . . . . 6 𝐽 = (((Ο‰ CNF (2o Β·o π‘Š)) ∘ 𝐿) ∘ β—‘(Ο‰ CNF (π‘Š Β·o 2o)))
23 infxpenc2.z . . . . . 6 𝑍 = (π‘₯ ∈ (Ο‰ ↑o π‘Š), 𝑦 ∈ (Ο‰ ↑o π‘Š) ↦ (((Ο‰ ↑o π‘Š) Β·o π‘₯) +o 𝑦))
24 infxpenc2.t . . . . . 6 𝑇 = (π‘₯ ∈ 𝑏, 𝑦 ∈ 𝑏 ↦ ⟨((π‘›β€˜π‘)β€˜π‘₯), ((π‘›β€˜π‘)β€˜π‘¦)⟩)
25 infxpenc2.g . . . . . 6 𝐺 = (β—‘(π‘›β€˜π‘) ∘ (((𝐻 ∘ 𝐽) ∘ 𝑍) ∘ 𝑇))
266, 7, 11, 13, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25infxpenc 10013 . . . . 5 ((πœ‘ ∧ (𝑏 ∈ 𝐴 ∧ Ο‰ βŠ† 𝑏)) β†’ 𝐺:(𝑏 Γ— 𝑏)–1-1-onto→𝑏)
27 f1of 6834 . . . . . . . . 9 (𝐺:(𝑏 Γ— 𝑏)–1-1-onto→𝑏 β†’ 𝐺:(𝑏 Γ— 𝑏)βŸΆπ‘)
2826, 27syl 17 . . . . . . . 8 ((πœ‘ ∧ (𝑏 ∈ 𝐴 ∧ Ο‰ βŠ† 𝑏)) β†’ 𝐺:(𝑏 Γ— 𝑏)βŸΆπ‘)
29 vex 3479 . . . . . . . . 9 𝑏 ∈ V
3029, 29xpex 7740 . . . . . . . 8 (𝑏 Γ— 𝑏) ∈ V
31 fex 7228 . . . . . . . 8 ((𝐺:(𝑏 Γ— 𝑏)βŸΆπ‘ ∧ (𝑏 Γ— 𝑏) ∈ V) β†’ 𝐺 ∈ V)
3228, 30, 31sylancl 587 . . . . . . 7 ((πœ‘ ∧ (𝑏 ∈ 𝐴 ∧ Ο‰ βŠ† 𝑏)) β†’ 𝐺 ∈ V)
33 eqid 2733 . . . . . . . 8 (𝑏 ∈ 𝐴 ↦ 𝐺) = (𝑏 ∈ 𝐴 ↦ 𝐺)
3433fvmpt2 7010 . . . . . . 7 ((𝑏 ∈ 𝐴 ∧ 𝐺 ∈ V) β†’ ((𝑏 ∈ 𝐴 ↦ 𝐺)β€˜π‘) = 𝐺)
354, 32, 34syl2anc 585 . . . . . 6 ((πœ‘ ∧ (𝑏 ∈ 𝐴 ∧ Ο‰ βŠ† 𝑏)) β†’ ((𝑏 ∈ 𝐴 ↦ 𝐺)β€˜π‘) = 𝐺)
3635f1oeq1d 6829 . . . . 5 ((πœ‘ ∧ (𝑏 ∈ 𝐴 ∧ Ο‰ βŠ† 𝑏)) β†’ (((𝑏 ∈ 𝐴 ↦ 𝐺)β€˜π‘):(𝑏 Γ— 𝑏)–1-1-onto→𝑏 ↔ 𝐺:(𝑏 Γ— 𝑏)–1-1-onto→𝑏))
3726, 36mpbird 257 . . . 4 ((πœ‘ ∧ (𝑏 ∈ 𝐴 ∧ Ο‰ βŠ† 𝑏)) β†’ ((𝑏 ∈ 𝐴 ↦ 𝐺)β€˜π‘):(𝑏 Γ— 𝑏)–1-1-onto→𝑏)
3837expr 458 . . 3 ((πœ‘ ∧ 𝑏 ∈ 𝐴) β†’ (Ο‰ βŠ† 𝑏 β†’ ((𝑏 ∈ 𝐴 ↦ 𝐺)β€˜π‘):(𝑏 Γ— 𝑏)–1-1-onto→𝑏))
3938ralrimiva 3147 . 2 (πœ‘ β†’ βˆ€π‘ ∈ 𝐴 (Ο‰ βŠ† 𝑏 β†’ ((𝑏 ∈ 𝐴 ↦ 𝐺)β€˜π‘):(𝑏 Γ— 𝑏)–1-1-onto→𝑏))
40 nfmpt1 5257 . . . 4 Ⅎ𝑏(𝑏 ∈ 𝐴 ↦ 𝐺)
4140nfeq2 2921 . . 3 Ⅎ𝑏 𝑔 = (𝑏 ∈ 𝐴 ↦ 𝐺)
42 fveq1 6891 . . . . 5 (𝑔 = (𝑏 ∈ 𝐴 ↦ 𝐺) β†’ (π‘”β€˜π‘) = ((𝑏 ∈ 𝐴 ↦ 𝐺)β€˜π‘))
4342f1oeq1d 6829 . . . 4 (𝑔 = (𝑏 ∈ 𝐴 ↦ 𝐺) β†’ ((π‘”β€˜π‘):(𝑏 Γ— 𝑏)–1-1-onto→𝑏 ↔ ((𝑏 ∈ 𝐴 ↦ 𝐺)β€˜π‘):(𝑏 Γ— 𝑏)–1-1-onto→𝑏))
4443imbi2d 341 . . 3 (𝑔 = (𝑏 ∈ 𝐴 ↦ 𝐺) β†’ ((Ο‰ βŠ† 𝑏 β†’ (π‘”β€˜π‘):(𝑏 Γ— 𝑏)–1-1-onto→𝑏) ↔ (Ο‰ βŠ† 𝑏 β†’ ((𝑏 ∈ 𝐴 ↦ 𝐺)β€˜π‘):(𝑏 Γ— 𝑏)–1-1-onto→𝑏)))
4541, 44ralbid 3271 . 2 (𝑔 = (𝑏 ∈ 𝐴 ↦ 𝐺) β†’ (βˆ€π‘ ∈ 𝐴 (Ο‰ βŠ† 𝑏 β†’ (π‘”β€˜π‘):(𝑏 Γ— 𝑏)–1-1-onto→𝑏) ↔ βˆ€π‘ ∈ 𝐴 (Ο‰ βŠ† 𝑏 β†’ ((𝑏 ∈ 𝐴 ↦ 𝐺)β€˜π‘):(𝑏 Γ— 𝑏)–1-1-onto→𝑏)))
462, 39, 45spcedv 3589 1 (πœ‘ β†’ βˆƒπ‘”βˆ€π‘ ∈ 𝐴 (Ο‰ βŠ† 𝑏 β†’ (π‘”β€˜π‘):(𝑏 Γ— 𝑏)–1-1-onto→𝑏))
Colors of variables: wff setvar class
Syntax hints:   β†’ wi 4   ∧ wa 397   = wceq 1542  βˆƒwex 1782   ∈ wcel 2107  βˆ€wral 3062  βˆƒwrex 3071  {crab 3433  Vcvv 3475   βˆ– cdif 3946   βŠ† wss 3949  βˆ…c0 4323  βŸ¨cop 4635   class class class wbr 5149   ↦ cmpt 5232   I cid 5574   Γ— cxp 5675  β—‘ccnv 5676  ran crn 5678   β†Ύ cres 5679   ∘ ccom 5681  Oncon0 6365  βŸΆwf 6540  β€“1-1-ontoβ†’wf1o 6543  β€˜cfv 6544  (class class class)co 7409   ∈ cmpo 7411  Ο‰com 7855  1oc1o 8459  2oc2o 8460   +o coa 8463   Β·o comu 8464   ↑o coe 8465   ↑m cmap 8820   finSupp cfsupp 9361   CNF ccnf 9656
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2704  ax-rep 5286  ax-sep 5300  ax-nul 5307  ax-pow 5364  ax-pr 5428  ax-un 7725  ax-inf2 9636
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2535  df-eu 2564  df-clab 2711  df-cleq 2725  df-clel 2811  df-nfc 2886  df-ne 2942  df-ral 3063  df-rex 3072  df-rmo 3377  df-reu 3378  df-rab 3434  df-v 3477  df-sbc 3779  df-csb 3895  df-dif 3952  df-un 3954  df-in 3956  df-ss 3966  df-pss 3968  df-nul 4324  df-if 4530  df-pw 4605  df-sn 4630  df-pr 4632  df-op 4636  df-uni 4910  df-int 4952  df-iun 5000  df-br 5150  df-opab 5212  df-mpt 5233  df-tr 5267  df-id 5575  df-eprel 5581  df-po 5589  df-so 5590  df-fr 5632  df-se 5633  df-we 5634  df-xp 5683  df-rel 5684  df-cnv 5685  df-co 5686  df-dm 5687  df-rn 5688  df-res 5689  df-ima 5690  df-pred 6301  df-ord 6368  df-on 6369  df-lim 6370  df-suc 6371  df-iota 6496  df-fun 6546  df-fn 6547  df-f 6548  df-f1 6549  df-fo 6550  df-f1o 6551  df-fv 6552  df-isom 6553  df-riota 7365  df-ov 7412  df-oprab 7413  df-mpo 7414  df-om 7856  df-1st 7975  df-2nd 7976  df-supp 8147  df-frecs 8266  df-wrecs 8297  df-recs 8371  df-rdg 8410  df-seqom 8448  df-1o 8466  df-2o 8467  df-oadd 8470  df-omul 8471  df-oexp 8472  df-er 8703  df-map 8822  df-en 8940  df-dom 8941  df-sdom 8942  df-fin 8943  df-fsupp 9362  df-oi 9505  df-cnf 9657
This theorem is referenced by:  infxpenc2lem3  10016
  Copyright terms: Public domain W3C validator