MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  infxpenc2lem2 Structured version   Visualization version   GIF version
Theorem infxpenc2lem2 10035
Description: Lemma for infxpenc2 10037. (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 7230 . 2 (πœ‘ β†’ (𝑏 ∈ 𝐴 ↦ 𝐺) ∈ V)
31adantr 480 . . . . . . 7 ((πœ‘ ∧ (𝑏 ∈ 𝐴 ∧ Ο‰ βŠ† 𝑏)) β†’ 𝐴 ∈ On)
4 simprl 770 . . . . . . 7 ((πœ‘ ∧ (𝑏 ∈ 𝐴 ∧ Ο‰ βŠ† 𝑏)) β†’ 𝑏 ∈ 𝐴)
5 onelon 6388 . . . . . . 7 ((𝐴 ∈ On ∧ 𝑏 ∈ 𝐴) β†’ 𝑏 ∈ On)
63, 4, 5syl2anc 583 . . . . . 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 10034 . . . . . . 7 ((πœ‘ ∧ (𝑏 ∈ 𝐴 ∧ Ο‰ βŠ† 𝑏)) β†’ (π‘Š ∈ (On βˆ– 1o) ∧ (π‘›β€˜π‘):𝑏–1-1-ontoβ†’(Ο‰ ↑o π‘Š)))
1110simpld 494 . . . . . 6 ((πœ‘ ∧ (𝑏 ∈ 𝐴 ∧ Ο‰ βŠ† 𝑏)) β†’ π‘Š ∈ (On βˆ– 1o))
12 infxpenc2.4 . . . . . . 7 (πœ‘ β†’ 𝐹:(Ο‰ ↑o 2o)–1-1-ontoβ†’Ο‰)
1312adantr 480 . . . . . 6 ((πœ‘ ∧ (𝑏 ∈ 𝐴 ∧ Ο‰ βŠ† 𝑏)) β†’ 𝐹:(Ο‰ ↑o 2o)–1-1-ontoβ†’Ο‰)
14 infxpenc2.5 . . . . . . 7 (πœ‘ β†’ (πΉβ€˜βˆ…) = βˆ…)
1514adantr 480 . . . . . 6 ((πœ‘ ∧ (𝑏 ∈ 𝐴 ∧ Ο‰ βŠ† 𝑏)) β†’ (πΉβ€˜βˆ…) = βˆ…)
1610simprd 495 . . . . . 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 10033 . . . . 5 ((πœ‘ ∧ (𝑏 ∈ 𝐴 ∧ Ο‰ βŠ† 𝑏)) β†’ 𝐺:(𝑏 Γ— 𝑏)–1-1-onto→𝑏)
27 f1of 6833 . . . . . . . . 9 (𝐺:(𝑏 Γ— 𝑏)–1-1-onto→𝑏 β†’ 𝐺:(𝑏 Γ— 𝑏)βŸΆπ‘)
2826, 27syl 17 . . . . . . . 8 ((πœ‘ ∧ (𝑏 ∈ 𝐴 ∧ Ο‰ βŠ† 𝑏)) β†’ 𝐺:(𝑏 Γ— 𝑏)βŸΆπ‘)
29 vex 3473 . . . . . . . . 9 𝑏 ∈ V
3029, 29xpex 7749 . . . . . . . 8 (𝑏 Γ— 𝑏) ∈ V
31 fex 7232 . . . . . . . 8 ((𝐺:(𝑏 Γ— 𝑏)βŸΆπ‘ ∧ (𝑏 Γ— 𝑏) ∈ V) β†’ 𝐺 ∈ V)
3228, 30, 31sylancl 585 . . . . . . 7 ((πœ‘ ∧ (𝑏 ∈ 𝐴 ∧ Ο‰ βŠ† 𝑏)) β†’ 𝐺 ∈ V)
33 eqid 2727 . . . . . . . 8 (𝑏 ∈ 𝐴 ↦ 𝐺) = (𝑏 ∈ 𝐴 ↦ 𝐺)
3433fvmpt2 7010 . . . . . . 7 ((𝑏 ∈ 𝐴 ∧ 𝐺 ∈ V) β†’ ((𝑏 ∈ 𝐴 ↦ 𝐺)β€˜π‘) = 𝐺)
354, 32, 34syl2anc 583 . . . . . 6 ((πœ‘ ∧ (𝑏 ∈ 𝐴 ∧ Ο‰ βŠ† 𝑏)) β†’ ((𝑏 ∈ 𝐴 ↦ 𝐺)β€˜π‘) = 𝐺)
3635f1oeq1d 6828 . . . . 5 ((πœ‘ ∧ (𝑏 ∈ 𝐴 ∧ Ο‰ βŠ† 𝑏)) β†’ (((𝑏 ∈ 𝐴 ↦ 𝐺)β€˜π‘):(𝑏 Γ— 𝑏)–1-1-onto→𝑏 ↔ 𝐺:(𝑏 Γ— 𝑏)–1-1-onto→𝑏))
3726, 36mpbird 257 . . . 4 ((πœ‘ ∧ (𝑏 ∈ 𝐴 ∧ Ο‰ βŠ† 𝑏)) β†’ ((𝑏 ∈ 𝐴 ↦ 𝐺)β€˜π‘):(𝑏 Γ— 𝑏)–1-1-onto→𝑏)
3837expr 456 . . 3 ((πœ‘ ∧ 𝑏 ∈ 𝐴) β†’ (Ο‰ βŠ† 𝑏 β†’ ((𝑏 ∈ 𝐴 ↦ 𝐺)β€˜π‘):(𝑏 Γ— 𝑏)–1-1-onto→𝑏))
3938ralrimiva 3141 . 2 (πœ‘ β†’ βˆ€π‘ ∈ 𝐴 (Ο‰ βŠ† 𝑏 β†’ ((𝑏 ∈ 𝐴 ↦ 𝐺)β€˜π‘):(𝑏 Γ— 𝑏)–1-1-onto→𝑏))
40 nfmpt1 5250 . . . 4 Ⅎ𝑏(𝑏 ∈ 𝐴 ↦ 𝐺)
4140nfeq2 2915 . . 3 Ⅎ𝑏 𝑔 = (𝑏 ∈ 𝐴 ↦ 𝐺)
42 fveq1 6890 . . . . 5 (𝑔 = (𝑏 ∈ 𝐴 ↦ 𝐺) β†’ (π‘”β€˜π‘) = ((𝑏 ∈ 𝐴 ↦ 𝐺)β€˜π‘))
4342f1oeq1d 6828 . . . 4 (𝑔 = (𝑏 ∈ 𝐴 ↦ 𝐺) β†’ ((π‘”β€˜π‘):(𝑏 Γ— 𝑏)–1-1-onto→𝑏 ↔ ((𝑏 ∈ 𝐴 ↦ 𝐺)β€˜π‘):(𝑏 Γ— 𝑏)–1-1-onto→𝑏))
4443imbi2d 340 . . 3 (𝑔 = (𝑏 ∈ 𝐴 ↦ 𝐺) β†’ ((Ο‰ βŠ† 𝑏 β†’ (π‘”β€˜π‘):(𝑏 Γ— 𝑏)–1-1-onto→𝑏) ↔ (Ο‰ βŠ† 𝑏 β†’ ((𝑏 ∈ 𝐴 ↦ 𝐺)β€˜π‘):(𝑏 Γ— 𝑏)–1-1-onto→𝑏)))
4541, 44ralbid 3265 . 2 (𝑔 = (𝑏 ∈ 𝐴 ↦ 𝐺) β†’ (βˆ€π‘ ∈ 𝐴 (Ο‰ βŠ† 𝑏 β†’ (π‘”β€˜π‘):(𝑏 Γ— 𝑏)–1-1-onto→𝑏) ↔ βˆ€π‘ ∈ 𝐴 (Ο‰ βŠ† 𝑏 β†’ ((𝑏 ∈ 𝐴 ↦ 𝐺)β€˜π‘):(𝑏 Γ— 𝑏)–1-1-onto→𝑏)))
462, 39, 45spcedv 3583 1 (πœ‘ β†’ βˆƒπ‘”βˆ€π‘ ∈ 𝐴 (Ο‰ βŠ† 𝑏 β†’ (π‘”β€˜π‘):(𝑏 Γ— 𝑏)–1-1-onto→𝑏))
Colors of variables: wff setvar class
Syntax hints:   β†’ wi 4   ∧ wa 395   = wceq 1534  βˆƒwex 1774   ∈ wcel 2099  βˆ€wral 3056  βˆƒwrex 3065  {crab 3427  Vcvv 3469   βˆ– cdif 3941   βŠ† wss 3944  βˆ…c0 4318  βŸ¨cop 4630   class class class wbr 5142   ↦ cmpt 5225   I cid 5569   Γ— cxp 5670  β—‘ccnv 5671  ran crn 5673   β†Ύ cres 5674   ∘ ccom 5676  Oncon0 6363  βŸΆwf 6538  β€“1-1-ontoβ†’wf1o 6541  β€˜cfv 6542  (class class class)co 7414   ∈ cmpo 7416  Ο‰com 7864  1oc1o 8473  2oc2o 8474   +o coa 8477   Β·o comu 8478   ↑o coe 8479   ↑m cmap 8836   finSupp cfsupp 9377   CNF ccnf 9676
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1790  ax-4 1804  ax-5 1906  ax-6 1964  ax-7 2004  ax-8 2101  ax-9 2109  ax-10 2130  ax-11 2147  ax-12 2164  ax-ext 2698  ax-rep 5279  ax-sep 5293  ax-nul 5300  ax-pow 5359  ax-pr 5423  ax-un 7734  ax-inf2 9656
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 847  df-3or 1086  df-3an 1087  df-tru 1537  df-fal 1547  df-ex 1775  df-nf 1779  df-sb 2061  df-mo 2529  df-eu 2558  df-clab 2705  df-cleq 2719  df-clel 2805  df-nfc 2880  df-ne 2936  df-ral 3057  df-rex 3066  df-rmo 3371  df-reu 3372  df-rab 3428  df-v 3471  df-sbc 3775  df-csb 3890  df-dif 3947  df-un 3949  df-in 3951  df-ss 3961  df-pss 3963  df-nul 4319  df-if 4525  df-pw 4600  df-sn 4625  df-pr 4627  df-op 4631  df-uni 4904  df-int 4945  df-iun 4993  df-br 5143  df-opab 5205  df-mpt 5226  df-tr 5260  df-id 5570  df-eprel 5576  df-po 5584  df-so 5585  df-fr 5627  df-se 5628  df-we 5629  df-xp 5678  df-rel 5679  df-cnv 5680  df-co 5681  df-dm 5682  df-rn 5683  df-res 5684  df-ima 5685  df-pred 6299  df-ord 6366  df-on 6367  df-lim 6368  df-suc 6369  df-iota 6494  df-fun 6544  df-fn 6545  df-f 6546  df-f1 6547  df-fo 6548  df-f1o 6549  df-fv 6550  df-isom 6551  df-riota 7370  df-ov 7417  df-oprab 7418  df-mpo 7419  df-om 7865  df-1st 7987  df-2nd 7988  df-supp 8160  df-frecs 8280  df-wrecs 8311  df-recs 8385  df-rdg 8424  df-seqom 8462  df-1o 8480  df-2o 8481  df-oadd 8484  df-omul 8485  df-oexp 8486  df-er 8718  df-map 8838  df-en 8956  df-dom 8957  df-sdom 8958  df-fin 8959  df-fsupp 9378  df-oi 9525  df-cnf 9677
This theorem is referenced by:  infxpenc2lem3  10036
  Copyright terms: Public domain W3C validator