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

Theorem iunfictbso 10120
Description: Countability of a countable union of finite sets with a strict (not globally well) order fulfilling the choice role. (Contributed by Stefan O'Rear, 16-Nov-2014.)
Assertion
Ref Expression
iunfictbso ((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) → 𝐴 ≼ ω)

Proof of Theorem iunfictbso
Dummy variables 𝑎 𝑏 𝑐 𝑑 𝑒 𝑓 𝑔 𝑖 𝑗 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 omex 9625 . . . . 5 ω ∈ V
210dom 9108 . . . 4 ∅ ≼ ω
3 breq1 5110 . . . 4 ( 𝐴 = ∅ → ( 𝐴 ≼ ω ↔ ∅ ≼ ω))
42, 3mpbiri 261 . . 3 ( 𝐴 = ∅ → 𝐴 ≼ ω)
54a1d 26 . 2 ( 𝐴 = ∅ → ((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) → 𝐴 ≼ ω))
6 n0 4303 . . 3 ( 𝐴 ≠ ∅ ↔ ∃𝑎 𝑎 𝐴)
7 ne0i 4290 . . . . . . . . . 10 (𝑎 𝐴 𝐴 ≠ ∅)
8 unieq 4881 . . . . . . . . . . . 12 (𝐴 = ∅ → 𝐴 = ∅)
9 uni0 4899 . . . . . . . . . . . 12 ∅ = ∅
108, 9eqtrdi 2813 . . . . . . . . . . 11 (𝐴 = ∅ → 𝐴 = ∅)
1110necon3i 2989 . . . . . . . . . 10 ( 𝐴 ≠ ∅ → 𝐴 ≠ ∅)
127, 11syl 18 . . . . . . . . 9 (𝑎 𝐴𝐴 ≠ ∅)
1312adantl 487 . . . . . . . 8 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ 𝑎 𝐴) → 𝐴 ≠ ∅)
14 simpl1 1210 . . . . . . . . 9 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ 𝑎 𝐴) → 𝐴 ≼ ω)
15 ctex 8972 . . . . . . . . 9 (𝐴 ≼ ω → 𝐴 ∈ V)
16 0sdomg 9107 . . . . . . . . 9 (𝐴 ∈ V → (∅ ≺ 𝐴𝐴 ≠ ∅))
1714, 15, 163syl 19 . . . . . . . 8 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ 𝑎 𝐴) → (∅ ≺ 𝐴𝐴 ≠ ∅))
1813, 17mpbird 260 . . . . . . 7 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ 𝑎 𝐴) → ∅ ≺ 𝐴)
19 fodomr 9129 . . . . . . 7 ((∅ ≺ 𝐴𝐴 ≼ ω) → ∃𝑏 𝑏:ω–onto𝐴)
2018, 14, 19syl2anc 596 . . . . . 6 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ 𝑎 𝐴) → ∃𝑏 𝑏:ω–onto𝐴)
21 omelon 9628 . . . . . . . . . . . 12 ω ∈ On
22 onenon 9957 . . . . . . . . . . . 12 (ω ∈ On → ω ∈ dom card)
2321, 22ax-mp 5 . . . . . . . . . . 11 ω ∈ dom card
24 xpnum 9959 . . . . . . . . . . 11 ((ω ∈ dom card ∧ ω ∈ dom card) → (ω × ω) ∈ dom card)
2523, 23, 24mp2an 705 . . . . . . . . . 10 (ω × ω) ∈ dom card
26 simplrr 790 . . . . . . . . . . . . . . . . . . 19 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → 𝑏:ω–onto𝐴)
27 fof 6793 . . . . . . . . . . . . . . . . . . 19 (𝑏:ω–onto𝐴𝑏:ω⟶𝐴)
2826, 27syl 18 . . . . . . . . . . . . . . . . . 18 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → 𝑏:ω⟶𝐴)
29 simprl 783 . . . . . . . . . . . . . . . . . 18 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → 𝑓 ∈ ω)
3028, 29ffvelcdmd 7081 . . . . . . . . . . . . . . . . 17 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → (𝑏𝑓) ∈ 𝐴)
3130adantr 486 . . . . . . . . . . . . . . . 16 (((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) ∧ 𝑔 ∈ (card‘(𝑏𝑓))) → (𝑏𝑓) ∈ 𝐴)
32 elssuni 4902 . . . . . . . . . . . . . . . 16 ((𝑏𝑓) ∈ 𝐴 → (𝑏𝑓) ⊆ 𝐴)
3331, 32syl 18 . . . . . . . . . . . . . . 15 (((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) ∧ 𝑔 ∈ (card‘(𝑏𝑓))) → (𝑏𝑓) ⊆ 𝐴)
3430, 32syl 18 . . . . . . . . . . . . . . . . . . . . 21 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → (𝑏𝑓) ⊆ 𝐴)
35 simpll3 1233 . . . . . . . . . . . . . . . . . . . . 21 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → 𝐵 Or 𝐴)
36 soss 5587 . . . . . . . . . . . . . . . . . . . . 21 ((𝑏𝑓) ⊆ 𝐴 → (𝐵 Or 𝐴𝐵 Or (𝑏𝑓)))
3734, 35, 36sylc 66 . . . . . . . . . . . . . . . . . . . 20 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → 𝐵 Or (𝑏𝑓))
38 simpll2 1232 . . . . . . . . . . . . . . . . . . . . 21 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → 𝐴 ⊆ Fin)
3938, 30sseldd 3935 . . . . . . . . . . . . . . . . . . . 20 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → (𝑏𝑓) ∈ Fin)
40 finnisoeu 10119 . . . . . . . . . . . . . . . . . . . 20 ((𝐵 Or (𝑏𝑓) ∧ (𝑏𝑓) ∈ Fin) → ∃! Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))
4137, 39, 40syl2anc 596 . . . . . . . . . . . . . . . . . . 19 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → ∃! Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))
42 iotacl 6523 . . . . . . . . . . . . . . . . . . 19 (∃! Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))) ∈ { Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))})
4341, 42syl 18 . . . . . . . . . . . . . . . . . 18 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))) ∈ { Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))})
44 iotaex 6513 . . . . . . . . . . . . . . . . . . 19 (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))) ∈ V
45 isoeq1 7321 . . . . . . . . . . . . . . . . . . 19 (𝑎 = (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))) → (𝑎 Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)) ↔ (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))) Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))))
46 isoeq1 7321 . . . . . . . . . . . . . . . . . . . 20 ( = 𝑎 → ( Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)) ↔ 𝑎 Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))))
4746cbvabv 2832 . . . . . . . . . . . . . . . . . . 19 { Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))} = {𝑎𝑎 Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))}
4844, 45, 47elab2 3639 . . . . . . . . . . . . . . . . . 18 ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))) ∈ { Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))} ↔ (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))) Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))
4943, 48sylib 221 . . . . . . . . . . . . . . . . 17 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))) Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))
50 isof1o 7327 . . . . . . . . . . . . . . . . 17 ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))) Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))):(card‘(𝑏𝑓))–1-1-onto→(𝑏𝑓))
51 f1of 6821 . . . . . . . . . . . . . . . . 17 ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))):(card‘(𝑏𝑓))–1-1-onto→(𝑏𝑓) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))):(card‘(𝑏𝑓))⟶(𝑏𝑓))
5249, 50, 513syl 19 . . . . . . . . . . . . . . . 16 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))):(card‘(𝑏𝑓))⟶(𝑏𝑓))
5352ffvelcdmda 7080 . . . . . . . . . . . . . . 15 (((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) ∧ 𝑔 ∈ (card‘(𝑏𝑓))) → ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔) ∈ (𝑏𝑓))
5433, 53sseldd 3935 . . . . . . . . . . . . . 14 (((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) ∧ 𝑔 ∈ (card‘(𝑏𝑓))) → ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔) ∈ 𝐴)
55 simprl 783 . . . . . . . . . . . . . . 15 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) → 𝑎 𝐴)
5655ad2antrr 739 . . . . . . . . . . . . . 14 (((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) ∧ ¬ 𝑔 ∈ (card‘(𝑏𝑓))) → 𝑎 𝐴)
5754, 56ifclda 4521 . . . . . . . . . . . . 13 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎) ∈ 𝐴)
5857ralrimivva 3207 . . . . . . . . . . . 12 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) → ∀𝑓 ∈ ω ∀𝑔 ∈ ω if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎) ∈ 𝐴)
59 eqid 2762 . . . . . . . . . . . . 13 (𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎)) = (𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))
6059fmpo 8068 . . . . . . . . . . . 12 (∀𝑓 ∈ ω ∀𝑔 ∈ ω if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎) ∈ 𝐴 ↔ (𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎)):(ω × ω)⟶ 𝐴)
6158, 60sylib 221 . . . . . . . . . . 11 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) → (𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎)):(ω × ω)⟶ 𝐴)
62 eluni 4873 . . . . . . . . . . . . 13 (𝑐 𝐴 ↔ ∃𝑖(𝑐𝑖𝑖𝐴))
63 simplrr 790 . . . . . . . . . . . . . . . . 17 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑐𝑖𝑖𝐴)) → 𝑏:ω–onto𝐴)
64 simprr 785 . . . . . . . . . . . . . . . . 17 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑐𝑖𝑖𝐴)) → 𝑖𝐴)
65 foelrn 7103 . . . . . . . . . . . . . . . . 17 ((𝑏:ω–onto𝐴𝑖𝐴) → ∃𝑗 ∈ ω 𝑖 = (𝑏𝑗))
6663, 64, 65syl2anc 596 . . . . . . . . . . . . . . . 16 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑐𝑖𝑖𝐴)) → ∃𝑗 ∈ ω 𝑖 = (𝑏𝑗))
67 simprrl 793 . . . . . . . . . . . . . . . . . . . 20 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → 𝑗 ∈ ω)
68 ordom 7875 . . . . . . . . . . . . . . . . . . . . . 22 Ord ω
69 simpll2 1232 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → 𝐴 ⊆ Fin)
70 simplrr 790 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → 𝑏:ω–onto𝐴)
7170, 27syl 18 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → 𝑏:ω⟶𝐴)
7271, 67ffvelcdmd 7081 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → (𝑏𝑗) ∈ 𝐴)
7369, 72sseldd 3935 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → (𝑏𝑗) ∈ Fin)
74 ficardom 9969 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑏𝑗) ∈ Fin → (card‘(𝑏𝑗)) ∈ ω)
7573, 74syl 18 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → (card‘(𝑏𝑗)) ∈ ω)
76 ordelss 6377 . . . . . . . . . . . . . . . . . . . . . 22 ((Ord ω ∧ (card‘(𝑏𝑗)) ∈ ω) → (card‘(𝑏𝑗)) ⊆ ω)
7768, 75, 76sylancr 599 . . . . . . . . . . . . . . . . . . . . 21 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → (card‘(𝑏𝑗)) ⊆ ω)
78 elssuni 4902 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑏𝑗) ∈ 𝐴 → (𝑏𝑗) ⊆ 𝐴)
7972, 78syl 18 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → (𝑏𝑗) ⊆ 𝐴)
80 simpll3 1233 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → 𝐵 Or 𝐴)
81 soss 5587 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑏𝑗) ⊆ 𝐴 → (𝐵 Or 𝐴𝐵 Or (𝑏𝑗)))
8279, 80, 81sylc 66 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → 𝐵 Or (𝑏𝑗))
83 finnisoeu 10119 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝐵 Or (𝑏𝑗) ∧ (𝑏𝑗) ∈ Fin) → ∃! Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))
8482, 73, 83syl2anc 596 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → ∃! Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))
85 iotacl 6523 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (∃! Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))) ∈ { Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))})
8684, 85syl 18 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))) ∈ { Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))})
87 iotaex 6513 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))) ∈ V
88 isoeq1 7321 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑎 = (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))) → (𝑎 Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)) ↔ (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))) Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))))
89 isoeq1 7321 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ( = 𝑎 → ( Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)) ↔ 𝑎 Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))))
9089cbvabv 2832 . . . . . . . . . . . . . . . . . . . . . . . . . 26 { Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))} = {𝑎𝑎 Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))}
9187, 88, 90elab2 3639 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))) ∈ { Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))} ↔ (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))) Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))
9286, 91sylib 221 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))) Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))
93 isof1o 7327 . . . . . . . . . . . . . . . . . . . . . . . 24 ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))) Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))):(card‘(𝑏𝑗))–1-1-onto→(𝑏𝑗))
9492, 93syl 18 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))):(card‘(𝑏𝑗))–1-1-onto→(𝑏𝑗))
95 f1ocnv 6834 . . . . . . . . . . . . . . . . . . . . . . 23 ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))):(card‘(𝑏𝑗))–1-1-onto→(𝑏𝑗) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))):(𝑏𝑗)–1-1-onto→(card‘(𝑏𝑗)))
96 f1of 6821 . . . . . . . . . . . . . . . . . . . . . . 23 ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))):(𝑏𝑗)–1-1-onto→(card‘(𝑏𝑗)) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))):(𝑏𝑗)⟶(card‘(𝑏𝑗)))
9794, 95, 963syl 19 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))):(𝑏𝑗)⟶(card‘(𝑏𝑗)))
98 simprll 791 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → 𝑐𝑖)
99 simprrr 794 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → 𝑖 = (𝑏𝑗))
10098, 99eleqtrd 2864 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → 𝑐 ∈ (𝑏𝑗))
10197, 100ffvelcdmd 7081 . . . . . . . . . . . . . . . . . . . . 21 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) ∈ (card‘(𝑏𝑗)))
10277, 101sseldd 3935 . . . . . . . . . . . . . . . . . . . 20 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) ∈ ω)
103 2fveq3 6887 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑓 = 𝑗 → (card‘(𝑏𝑓)) = (card‘(𝑏𝑗)))
104103eleq2d 2848 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑓 = 𝑗 → (𝑔 ∈ (card‘(𝑏𝑓)) ↔ 𝑔 ∈ (card‘(𝑏𝑗))))
105 isoeq4 7324 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((card‘(𝑏𝑓)) = (card‘(𝑏𝑗)) → ( Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)) ↔ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑓))))
106103, 105syl 18 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑓 = 𝑗 → ( Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)) ↔ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑓))))
107 fveq2 6882 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑓 = 𝑗 → (𝑏𝑓) = (𝑏𝑗))
108 isoeq5 7325 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑏𝑓) = (𝑏𝑗) → ( Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑓)) ↔ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))))
109107, 108syl 18 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑓 = 𝑗 → ( Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑓)) ↔ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))))
110106, 109bitrd 282 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑓 = 𝑗 → ( Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)) ↔ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))))
111110iotabidv 6521 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑓 = 𝑗 → (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))) = (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))))
112111fveq1d 6884 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑓 = 𝑗 → ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔) = ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑔))
113104, 112ifbieq1d 4510 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑓 = 𝑗 → if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎) = if(𝑔 ∈ (card‘(𝑏𝑗)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑔), 𝑎))
114 eleq1 2850 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑔 = ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) → (𝑔 ∈ (card‘(𝑏𝑗)) ↔ ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) ∈ (card‘(𝑏𝑗))))
115 fveq2 6882 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑔 = ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) → ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑔) = ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)))
116114, 115ifbieq1d 4510 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑔 = ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) → if(𝑔 ∈ (card‘(𝑏𝑗)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑔), 𝑎) = if(((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) ∈ (card‘(𝑏𝑗)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)), 𝑎))
117 fvex 6895 . . . . . . . . . . . . . . . . . . . . . . . 24 ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)) ∈ V
118 vex 3457 . . . . . . . . . . . . . . . . . . . . . . . 24 𝑎 ∈ V
119117, 118ifex 4536 . . . . . . . . . . . . . . . . . . . . . . 23 if(((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) ∈ (card‘(𝑏𝑗)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)), 𝑎) ∈ V
120113, 116, 59, 119ovmpo 7576 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑗 ∈ ω ∧ ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) ∈ ω) → (𝑗(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)) = if(((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) ∈ (card‘(𝑏𝑗)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)), 𝑎))
12167, 102, 120syl2anc 596 . . . . . . . . . . . . . . . . . . . . 21 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → (𝑗(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)) = if(((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) ∈ (card‘(𝑏𝑗)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)), 𝑎))
122101iftrued 4493 . . . . . . . . . . . . . . . . . . . . 21 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → if(((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) ∈ (card‘(𝑏𝑗)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)), 𝑎) = ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)))
123 f1ocnvfv2 7281 . . . . . . . . . . . . . . . . . . . . . 22 (((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))):(card‘(𝑏𝑗))–1-1-onto→(𝑏𝑗) ∧ 𝑐 ∈ (𝑏𝑗)) → ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)) = 𝑐)
12494, 100, 123syl2anc 596 . . . . . . . . . . . . . . . . . . . . 21 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)) = 𝑐)
125121, 122, 1243eqtrrd 2802 . . . . . . . . . . . . . . . . . . . 20 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → 𝑐 = (𝑗(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)))
126 rspceov 7465 . . . . . . . . . . . . . . . . . . . 20 ((𝑗 ∈ ω ∧ ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) ∈ ω ∧ 𝑐 = (𝑗(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐))) → ∃𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒))
12767, 102, 125, 126syl3anc 1398 . . . . . . . . . . . . . . . . . . 19 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → ∃𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒))
128127expr 462 . . . . . . . . . . . . . . . . . 18 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑐𝑖𝑖𝐴)) → ((𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)) → ∃𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒)))
129128expd 421 . . . . . . . . . . . . . . . . 17 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑐𝑖𝑖𝐴)) → (𝑗 ∈ ω → (𝑖 = (𝑏𝑗) → ∃𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒))))
130129rexlimdv 3163 . . . . . . . . . . . . . . . 16 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑐𝑖𝑖𝐴)) → (∃𝑗 ∈ ω 𝑖 = (𝑏𝑗) → ∃𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒)))
13166, 130mpd 16 . . . . . . . . . . . . . . 15 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑐𝑖𝑖𝐴)) → ∃𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒))
132131ex 418 . . . . . . . . . . . . . 14 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) → ((𝑐𝑖𝑖𝐴) → ∃𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒)))
133132exlimdv 1966 . . . . . . . . . . . . 13 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) → (∃𝑖(𝑐𝑖𝑖𝐴) → ∃𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒)))
13462, 133biimtrid 245 . . . . . . . . . . . 12 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) → (𝑐 𝐴 → ∃𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒)))
135134ralrimiv 3155 . . . . . . . . . . 11 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) → ∀𝑐 𝐴𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒))
136 foov 7591 . . . . . . . . . . 11 ((𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎)):(ω × ω)–onto 𝐴 ↔ ((𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎)):(ω × ω)⟶ 𝐴 ∧ ∀𝑐 𝐴𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒)))
13761, 135, 136sylanbrc 595 . . . . . . . . . 10 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) → (𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎)):(ω × ω)–onto 𝐴)
138 fodomnum 10063 . . . . . . . . . 10 ((ω × ω) ∈ dom card → ((𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎)):(ω × ω)–onto 𝐴 𝐴 ≼ (ω × ω)))
13925, 137, 138mpsyl 69 . . . . . . . . 9 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) → 𝐴 ≼ (ω × ω))
140 xpomen 10021 . . . . . . . . 9 (ω × ω) ≈ ω
141 domentr 9022 . . . . . . . . 9 (( 𝐴 ≼ (ω × ω) ∧ (ω × ω) ≈ ω) → 𝐴 ≼ ω)
142139, 140, 141sylancl 598 . . . . . . . 8 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) → 𝐴 ≼ ω)
143142expr 462 . . . . . . 7 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ 𝑎 𝐴) → (𝑏:ω–onto𝐴 𝐴 ≼ ω))
144143exlimdv 1966 . . . . . 6 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ 𝑎 𝐴) → (∃𝑏 𝑏:ω–onto𝐴 𝐴 ≼ ω))
14520, 144mpd 16 . . . . 5 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ 𝑎 𝐴) → 𝐴 ≼ ω)
146145expcom 419 . . . 4 (𝑎 𝐴 → ((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) → 𝐴 ≼ ω))
147146exlimiv 1963 . . 3 (∃𝑎 𝑎 𝐴 → ((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) → 𝐴 ≼ ω))
1486, 147sylbi 220 . 2 ( 𝐴 ≠ ∅ → ((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) → 𝐴 ≼ ω))
1495, 148pm2.61ine 3040 1 ((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) → 𝐴 ≼ ω)
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3  wi 4  wb 209  wa 401  w3a 1103   = wceq 1570  wex 1812  wcel 2145  ∃!weu 2595  {cab 2740  wne 2957  wral 3078  wrex 3088  Vcvv 3453  wss 3902  c0 4282  ifcif 4485   cuni 4870   class class class wbr 5107   E cep 5558   Or wor 5566   × cxp 5657  ccnv 5658  dom cdm 5659  Ord word 6360  Oncon0 6361  cio 6491  wf 6533  ontowfo 6535  1-1-ontowf1o 6536  cfv 6537   Isom wiso 6538  (class class class)co 7416  cmpo 7418  ωcom 7865  cen 8952  cdom 8953  csdm 8954  Fincfn 8955  cardccrd 9943
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2215  ax-ext 2734  ax-rep 5236  ax-sep 5255  ax-nul 5267  ax-pow 5334  ax-pr 5402  ax-un 7739  ax-inf2 9623
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-ral 3079  df-rex 3089  df-rmo 3367  df-reu 3368  df-rab 3415  df-v 3455  df-sbc 3743  df-csb 3851  df-dif 3905  df-un 3907  df-in 3909  df-ss 3919  df-pss 3922  df-nul 4283  df-if 4486  df-pw 4562  df-sn 4588  df-pr 4590  df-op 4594  df-uni 4871  df-int 4911  df-iun 4956  df-br 5108  df-opab 5172  df-mpt 5191  df-tr 5217  df-id 5554  df-eprel 5559  df-po 5567  df-so 5568  df-fr 5612  df-se 5613  df-we 5614  df-xp 5665  df-rel 5666  df-cnv 5667  df-co 5668  df-dm 5669  df-rn 5670  df-res 5671  df-ima 5672  df-pred 6303  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-isom 6546  df-riota 7373  df-ov 7419  df-oprab 7420  df-mpo 7421  df-om 7866  df-1st 7989  df-2nd 7990  df-frecs 8283  df-wrecs 8314  df-recs 8363  df-rdg 8402  df-1o 8458  df-oadd 8462  df-omul 8463  df-er 8699  df-map 8831  df-en 8956  df-dom 8957  df-sdom 8958  df-fin 8959  df-oi 9485  df-card 9947  df-acn 9950
This theorem is used by:  aannenlem3  26563
  Copyright terms: Public domain W3C validator