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

Theorem iunfictbso 10031
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 9559 . . . . 5 ω ∈ V
210dom 9039 . . . 4 ∅ ≼ ω
3 breq1 5077 . . . 4 ( 𝐴 = ∅ → ( 𝐴 ≼ ω ↔ ∅ ≼ ω))
42, 3mpbiri 260 . . 3 ( 𝐴 = ∅ → 𝐴 ≼ ω)
54a1d 25 . 2 ( 𝐴 = ∅ → ((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) → 𝐴 ≼ ω))
6 n0 4283 . . 3 ( 𝐴 ≠ ∅ ↔ ∃𝑎 𝑎 𝐴)
7 ne0i 4271 . . . . . . . . . 10 (𝑎 𝐴 𝐴 ≠ ∅)
8 unieq 4851 . . . . . . . . . . . 12 (𝐴 = ∅ → 𝐴 = ∅)
9 uni0 4868 . . . . . . . . . . . 12 ∅ = ∅
108, 9eqtrdi 2792 . . . . . . . . . . 11 (𝐴 = ∅ → 𝐴 = ∅)
1110necon3i 2968 . . . . . . . . . 10 ( 𝐴 ≠ ∅ → 𝐴 ≠ ∅)
127, 11syl 17 . . . . . . . . 9 (𝑎 𝐴𝐴 ≠ ∅)
1312adantl 483 . . . . . . . 8 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ 𝑎 𝐴) → 𝐴 ≠ ∅)
14 simpl1 1199 . . . . . . . . 9 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ 𝑎 𝐴) → 𝐴 ≼ ω)
15 ctex 8904 . . . . . . . . 9 (𝐴 ≼ ω → 𝐴 ∈ V)
16 0sdomg 9038 . . . . . . . . 9 (𝐴 ∈ V → (∅ ≺ 𝐴𝐴 ≠ ∅))
1714, 15, 163syl 18 . . . . . . . 8 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ 𝑎 𝐴) → (∅ ≺ 𝐴𝐴 ≠ ∅))
1813, 17mpbird 259 . . . . . . 7 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ 𝑎 𝐴) → ∅ ≺ 𝐴)
19 fodomr 9060 . . . . . . 7 ((∅ ≺ 𝐴𝐴 ≼ ω) → ∃𝑏 𝑏:ω–onto𝐴)
2018, 14, 19syl2anc 591 . . . . . 6 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ 𝑎 𝐴) → ∃𝑏 𝑏:ω–onto𝐴)
21 omelon 9562 . . . . . . . . . . . 12 ω ∈ On
22 onenon 9868 . . . . . . . . . . . 12 (ω ∈ On → ω ∈ dom card)
2321, 22ax-mp 5 . . . . . . . . . . 11 ω ∈ dom card
24 xpnum 9870 . . . . . . . . . . 11 ((ω ∈ dom card ∧ ω ∈ dom card) → (ω × ω) ∈ dom card)
2523, 23, 24mp2an 699 . . . . . . . . . 10 (ω × ω) ∈ dom card
26 simplrr 784 . . . . . . . . . . . . . . . . . . 19 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → 𝑏:ω–onto𝐴)
27 fof 6742 . . . . . . . . . . . . . . . . . . 19 (𝑏:ω–onto𝐴𝑏:ω⟶𝐴)
2826, 27syl 17 . . . . . . . . . . . . . . . . . 18 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → 𝑏:ω⟶𝐴)
29 simprl 777 . . . . . . . . . . . . . . . . . 18 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → 𝑓 ∈ ω)
3028, 29ffvelcdmd 7029 . . . . . . . . . . . . . . . . 17 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → (𝑏𝑓) ∈ 𝐴)
3130adantr 482 . . . . . . . . . . . . . . . 16 (((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) ∧ 𝑔 ∈ (card‘(𝑏𝑓))) → (𝑏𝑓) ∈ 𝐴)
32 elssuni 4871 . . . . . . . . . . . . . . . 16 ((𝑏𝑓) ∈ 𝐴 → (𝑏𝑓) ⊆ 𝐴)
3331, 32syl 17 . . . . . . . . . . . . . . 15 (((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) ∧ 𝑔 ∈ (card‘(𝑏𝑓))) → (𝑏𝑓) ⊆ 𝐴)
3430, 32syl 17 . . . . . . . . . . . . . . . . . . . . 21 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → (𝑏𝑓) ⊆ 𝐴)
35 simpll3 1222 . . . . . . . . . . . . . . . . . . . . 21 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → 𝐵 Or 𝐴)
36 soss 5548 . . . . . . . . . . . . . . . . . . . . 21 ((𝑏𝑓) ⊆ 𝐴 → (𝐵 Or 𝐴𝐵 Or (𝑏𝑓)))
3734, 35, 36sylc 65 . . . . . . . . . . . . . . . . . . . 20 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → 𝐵 Or (𝑏𝑓))
38 simpll2 1221 . . . . . . . . . . . . . . . . . . . . 21 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → 𝐴 ⊆ Fin)
3938, 30sseldd 3917 . . . . . . . . . . . . . . . . . . . 20 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → (𝑏𝑓) ∈ Fin)
40 finnisoeu 10030 . . . . . . . . . . . . . . . . . . . 20 ((𝐵 Or (𝑏𝑓) ∧ (𝑏𝑓) ∈ Fin) → ∃! Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))
4137, 39, 40syl2anc 591 . . . . . . . . . . . . . . . . . . 19 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → ∃! Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))
42 iotacl 6474 . . . . . . . . . . . . . . . . . . 19 (∃! Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))) ∈ { Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))})
4341, 42syl 17 . . . . . . . . . . . . . . . . . 18 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))) ∈ { Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))})
44 iotaex 6464 . . . . . . . . . . . . . . . . . . 19 (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))) ∈ V
45 isoeq1 7264 . . . . . . . . . . . . . . . . . . 19 (𝑎 = (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))) → (𝑎 Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)) ↔ (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))) Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))))
46 isoeq1 7264 . . . . . . . . . . . . . . . . . . . 20 ( = 𝑎 → ( Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)) ↔ 𝑎 Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))))
4746cbvabv 2811 . . . . . . . . . . . . . . . . . . 19 { Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))} = {𝑎𝑎 Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))}
4844, 45, 47elab2 3621 . . . . . . . . . . . . . . . . . 18 ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))) ∈ { Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))} ↔ (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))) Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))
4943, 48sylib 220 . . . . . . . . . . . . . . . . 17 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))) Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))
50 isof1o 7270 . . . . . . . . . . . . . . . . 17 ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))) Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))):(card‘(𝑏𝑓))–1-1-onto→(𝑏𝑓))
51 f1of 6770 . . . . . . . . . . . . . . . . 17 ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))):(card‘(𝑏𝑓))–1-1-onto→(𝑏𝑓) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))):(card‘(𝑏𝑓))⟶(𝑏𝑓))
5249, 50, 513syl 18 . . . . . . . . . . . . . . . 16 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))):(card‘(𝑏𝑓))⟶(𝑏𝑓))
5352ffvelcdmda 7028 . . . . . . . . . . . . . . 15 (((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) ∧ 𝑔 ∈ (card‘(𝑏𝑓))) → ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔) ∈ (𝑏𝑓))
5433, 53sseldd 3917 . . . . . . . . . . . . . 14 (((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) ∧ 𝑔 ∈ (card‘(𝑏𝑓))) → ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔) ∈ 𝐴)
55 simprl 777 . . . . . . . . . . . . . . 15 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) → 𝑎 𝐴)
5655ad2antrr 733 . . . . . . . . . . . . . 14 (((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) ∧ ¬ 𝑔 ∈ (card‘(𝑏𝑓))) → 𝑎 𝐴)
5754, 56ifclda 4492 . . . . . . . . . . . . 13 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎) ∈ 𝐴)
5857ralrimivva 3184 . . . . . . . . . . . 12 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) → ∀𝑓 ∈ ω ∀𝑔 ∈ ω if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎) ∈ 𝐴)
59 eqid 2741 . . . . . . . . . . . . 13 (𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎)) = (𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))
6059fmpo 8012 . . . . . . . . . . . 12 (∀𝑓 ∈ ω ∀𝑔 ∈ ω if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎) ∈ 𝐴 ↔ (𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎)):(ω × ω)⟶ 𝐴)
6158, 60sylib 220 . . . . . . . . . . 11 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) → (𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎)):(ω × ω)⟶ 𝐴)
62 eluni 4843 . . . . . . . . . . . . 13 (𝑐 𝐴 ↔ ∃𝑖(𝑐𝑖𝑖𝐴))
63 simplrr 784 . . . . . . . . . . . . . . . . 17 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑐𝑖𝑖𝐴)) → 𝑏:ω–onto𝐴)
64 simprr 779 . . . . . . . . . . . . . . . . 17 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑐𝑖𝑖𝐴)) → 𝑖𝐴)
65 foelrn 7051 . . . . . . . . . . . . . . . . 17 ((𝑏:ω–onto𝐴𝑖𝐴) → ∃𝑗 ∈ ω 𝑖 = (𝑏𝑗))
6663, 64, 65syl2anc 591 . . . . . . . . . . . . . . . 16 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑐𝑖𝑖𝐴)) → ∃𝑗 ∈ ω 𝑖 = (𝑏𝑗))
67 simprrl 787 . . . . . . . . . . . . . . . . . . . 20 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → 𝑗 ∈ ω)
68 ordom 7819 . . . . . . . . . . . . . . . . . . . . . 22 Ord ω
69 simpll2 1221 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → 𝐴 ⊆ Fin)
70 simplrr 784 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → 𝑏:ω–onto𝐴)
7170, 27syl 17 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → 𝑏:ω⟶𝐴)
7271, 67ffvelcdmd 7029 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → (𝑏𝑗) ∈ 𝐴)
7369, 72sseldd 3917 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → (𝑏𝑗) ∈ Fin)
74 ficardom 9880 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑏𝑗) ∈ Fin → (card‘(𝑏𝑗)) ∈ ω)
7573, 74syl 17 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → (card‘(𝑏𝑗)) ∈ ω)
76 ordelss 6329 . . . . . . . . . . . . . . . . . . . . . 22 ((Ord ω ∧ (card‘(𝑏𝑗)) ∈ ω) → (card‘(𝑏𝑗)) ⊆ ω)
7768, 75, 76sylancr 594 . . . . . . . . . . . . . . . . . . . . 21 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → (card‘(𝑏𝑗)) ⊆ ω)
78 elssuni 4871 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑏𝑗) ∈ 𝐴 → (𝑏𝑗) ⊆ 𝐴)
7972, 78syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → (𝑏𝑗) ⊆ 𝐴)
80 simpll3 1222 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → 𝐵 Or 𝐴)
81 soss 5548 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑏𝑗) ⊆ 𝐴 → (𝐵 Or 𝐴𝐵 Or (𝑏𝑗)))
8279, 80, 81sylc 65 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → 𝐵 Or (𝑏𝑗))
83 finnisoeu 10030 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝐵 Or (𝑏𝑗) ∧ (𝑏𝑗) ∈ Fin) → ∃! Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))
8482, 73, 83syl2anc 591 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → ∃! Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))
85 iotacl 6474 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (∃! Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))) ∈ { Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))})
8684, 85syl 17 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))) ∈ { Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))})
87 iotaex 6464 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))) ∈ V
88 isoeq1 7264 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑎 = (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))) → (𝑎 Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)) ↔ (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))) Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))))
89 isoeq1 7264 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ( = 𝑎 → ( Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)) ↔ 𝑎 Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))))
9089cbvabv 2811 . . . . . . . . . . . . . . . . . . . . . . . . . 26 { Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))} = {𝑎𝑎 Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))}
9187, 88, 90elab2 3621 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))) ∈ { Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))} ↔ (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))) Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))
9286, 91sylib 220 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))) Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))
93 isof1o 7270 . . . . . . . . . . . . . . . . . . . . . . . 24 ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))) Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))):(card‘(𝑏𝑗))–1-1-onto→(𝑏𝑗))
9492, 93syl 17 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))):(card‘(𝑏𝑗))–1-1-onto→(𝑏𝑗))
95 f1ocnv 6782 . . . . . . . . . . . . . . . . . . . . . . 23 ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))):(card‘(𝑏𝑗))–1-1-onto→(𝑏𝑗) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))):(𝑏𝑗)–1-1-onto→(card‘(𝑏𝑗)))
96 f1of 6770 . . . . . . . . . . . . . . . . . . . . . . 23 ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))):(𝑏𝑗)–1-1-onto→(card‘(𝑏𝑗)) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))):(𝑏𝑗)⟶(card‘(𝑏𝑗)))
9794, 95, 963syl 18 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))):(𝑏𝑗)⟶(card‘(𝑏𝑗)))
98 simprll 785 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → 𝑐𝑖)
99 simprrr 788 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → 𝑖 = (𝑏𝑗))
10098, 99eleqtrd 2843 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → 𝑐 ∈ (𝑏𝑗))
10197, 100ffvelcdmd 7029 . . . . . . . . . . . . . . . . . . . . 21 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) ∈ (card‘(𝑏𝑗)))
10277, 101sseldd 3917 . . . . . . . . . . . . . . . . . . . 20 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) ∈ ω)
103 2fveq3 6835 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑓 = 𝑗 → (card‘(𝑏𝑓)) = (card‘(𝑏𝑗)))
104103eleq2d 2827 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑓 = 𝑗 → (𝑔 ∈ (card‘(𝑏𝑓)) ↔ 𝑔 ∈ (card‘(𝑏𝑗))))
105 isoeq4 7267 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((card‘(𝑏𝑓)) = (card‘(𝑏𝑗)) → ( Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)) ↔ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑓))))
106103, 105syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑓 = 𝑗 → ( Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)) ↔ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑓))))
107 fveq2 6830 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑓 = 𝑗 → (𝑏𝑓) = (𝑏𝑗))
108 isoeq5 7268 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑏𝑓) = (𝑏𝑗) → ( Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑓)) ↔ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))))
109107, 108syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑓 = 𝑗 → ( Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑓)) ↔ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))))
110106, 109bitrd 281 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑓 = 𝑗 → ( Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)) ↔ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))))
111110iotabidv 6472 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑓 = 𝑗 → (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))) = (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))))
112111fveq1d 6832 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑓 = 𝑗 → ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔) = ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑔))
113104, 112ifbieq1d 4481 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑓 = 𝑗 → if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎) = if(𝑔 ∈ (card‘(𝑏𝑗)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑔), 𝑎))
114 eleq1 2829 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑔 = ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) → (𝑔 ∈ (card‘(𝑏𝑗)) ↔ ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) ∈ (card‘(𝑏𝑗))))
115 fveq2 6830 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑔 = ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) → ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑔) = ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)))
116114, 115ifbieq1d 4481 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑔 = ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) → if(𝑔 ∈ (card‘(𝑏𝑗)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑔), 𝑎) = if(((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) ∈ (card‘(𝑏𝑗)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)), 𝑎))
117 fvex 6843 . . . . . . . . . . . . . . . . . . . . . . . 24 ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)) ∈ V
118 vex 3437 . . . . . . . . . . . . . . . . . . . . . . . 24 𝑎 ∈ V
119117, 118ifex 4507 . . . . . . . . . . . . . . . . . . . . . . 23 if(((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) ∈ (card‘(𝑏𝑗)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)), 𝑎) ∈ V
120113, 116, 59, 119ovmpo 7519 . . . . . . . . . . . . . . . . . . . . . 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 591 . . . . . . . . . . . . . . . . . . . . 21 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → (𝑗(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)) = if(((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) ∈ (card‘(𝑏𝑗)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)), 𝑎))
122101iftrued 4464 . . . . . . . . . . . . . . . . . . . . 21 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → if(((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) ∈ (card‘(𝑏𝑗)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)), 𝑎) = ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)))
123 f1ocnvfv2 7224 . . . . . . . . . . . . . . . . . . . . . 22 (((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))):(card‘(𝑏𝑗))–1-1-onto→(𝑏𝑗) ∧ 𝑐 ∈ (𝑏𝑗)) → ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)) = 𝑐)
12494, 100, 123syl2anc 591 . . . . . . . . . . . . . . . . . . . . 21 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)) = 𝑐)
125121, 122, 1243eqtrrd 2781 . . . . . . . . . . . . . . . . . . . 20 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → 𝑐 = (𝑗(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)))
126 rspceov 7408 . . . . . . . . . . . . . . . . . . . 20 ((𝑗 ∈ ω ∧ ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) ∈ ω ∧ 𝑐 = (𝑗(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐))) → ∃𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒))
12767, 102, 125, 126syl3anc 1380 . . . . . . . . . . . . . . . . . . 19 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → ∃𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒))
128127expr 458 . . . . . . . . . . . . . . . . . 18 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑐𝑖𝑖𝐴)) → ((𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)) → ∃𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒)))
129128expd 417 . . . . . . . . . . . . . . . . 17 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑐𝑖𝑖𝐴)) → (𝑗 ∈ ω → (𝑖 = (𝑏𝑗) → ∃𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒))))
130129rexlimdv 3140 . . . . . . . . . . . . . . . 16 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑐𝑖𝑖𝐴)) → (∃𝑗 ∈ ω 𝑖 = (𝑏𝑗) → ∃𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒)))
13166, 130mpd 15 . . . . . . . . . . . . . . 15 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑐𝑖𝑖𝐴)) → ∃𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒))
132131ex 414 . . . . . . . . . . . . . 14 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) → ((𝑐𝑖𝑖𝐴) → ∃𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒)))
133132exlimdv 1941 . . . . . . . . . . . . 13 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) → (∃𝑖(𝑐𝑖𝑖𝐴) → ∃𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒)))
13462, 133biimtrid 244 . . . . . . . . . . . 12 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) → (𝑐 𝐴 → ∃𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒)))
135134ralrimiv 3132 . . . . . . . . . . 11 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) → ∀𝑐 𝐴𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒))
136 foov 7533 . . . . . . . . . . 11 ((𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎)):(ω × ω)–onto 𝐴 ↔ ((𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎)):(ω × ω)⟶ 𝐴 ∧ ∀𝑐 𝐴𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒)))
13761, 135, 136sylanbrc 590 . . . . . . . . . 10 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) → (𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎)):(ω × ω)–onto 𝐴)
138 fodomnum 9974 . . . . . . . . . 10 ((ω × ω) ∈ dom card → ((𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎)):(ω × ω)–onto 𝐴 𝐴 ≼ (ω × ω)))
13925, 137, 138mpsyl 68 . . . . . . . . 9 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) → 𝐴 ≼ (ω × ω))
140 xpomen 9932 . . . . . . . . 9 (ω × ω) ≈ ω
141 domentr 8954 . . . . . . . . 9 (( 𝐴 ≼ (ω × ω) ∧ (ω × ω) ≈ ω) → 𝐴 ≼ ω)
142139, 140, 141sylancl 593 . . . . . . . 8 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) → 𝐴 ≼ ω)
143142expr 458 . . . . . . 7 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ 𝑎 𝐴) → (𝑏:ω–onto𝐴 𝐴 ≼ ω))
144143exlimdv 1941 . . . . . 6 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ 𝑎 𝐴) → (∃𝑏 𝑏:ω–onto𝐴 𝐴 ≼ ω))
14520, 144mpd 15 . . . . 5 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ 𝑎 𝐴) → 𝐴 ≼ ω)
146145expcom 415 . . . 4 (𝑎 𝐴 → ((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) → 𝐴 ≼ ω))
147146exlimiv 1938 . . 3 (∃𝑎 𝑎 𝐴 → ((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) → 𝐴 ≼ ω))
1486, 147sylbi 219 . 2 ( 𝐴 ≠ ∅ → ((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) → 𝐴 ≼ ω))
1495, 148pm2.61ine 3019 1 ((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) → 𝐴 ≼ ω)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 208  wa 397  w3a 1093   = wceq 1548  wex 1787  wcel 2121  ∃!weu 2574  {cab 2719  wne 2936  wral 3055  wrex 3065  Vcvv 3433  wss 3884  c0 4263  ifcif 4456   cuni 4840   class class class wbr 5074   E cep 5519   Or wor 5527   × cxp 5618  ccnv 5619  dom cdm 5620  Ord word 6312  Oncon0 6313  cio 6442  wf 6484  ontowfo 6486  1-1-ontowf1o 6487  cfv 6488   Isom wiso 6489  (class class class)co 7359  cmpo 7361  ωcom 7809  cen 8884  cdom 8885  csdm 8886  Fincfn 8887  cardccrd 9854
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1803  ax-4 1817  ax-5 1918  ax-6 1975  ax-7 2016  ax-8 2123  ax-9 2131  ax-10 2154  ax-11 2170  ax-12 2191  ax-ext 2713  ax-rep 5201  ax-sep 5220  ax-nul 5230  ax-pow 5296  ax-pr 5364  ax-un 7681  ax-inf2 9557
This theorem depends on definitions:  df-bi 209  df-an 398  df-or 855  df-3or 1094  df-3an 1095  df-tru 1551  df-fal 1561  df-ex 1788  df-nf 1792  df-sb 2075  df-mo 2545  df-eu 2575  df-clab 2720  df-cleq 2733  df-clel 2816  df-nfc 2890  df-ne 2937  df-ral 3056  df-rex 3066  df-rmo 3346  df-reu 3347  df-rab 3394  df-v 3435  df-sbc 3725  df-csb 3833  df-dif 3887  df-un 3889  df-in 3891  df-ss 3901  df-pss 3904  df-nul 4264  df-if 4457  df-pw 4533  df-sn 4558  df-pr 4560  df-op 4564  df-uni 4841  df-int 4880  df-iun 4925  df-br 5075  df-opab 5137  df-mpt 5156  df-tr 5182  df-id 5515  df-eprel 5520  df-po 5528  df-so 5529  df-fr 5573  df-se 5574  df-we 5575  df-xp 5626  df-rel 5627  df-cnv 5628  df-co 5629  df-dm 5630  df-rn 5631  df-res 5632  df-ima 5633  df-pred 6255  df-ord 6316  df-on 6317  df-lim 6318  df-suc 6319  df-iota 6444  df-fun 6490  df-fn 6491  df-f 6492  df-f1 6493  df-fo 6494  df-f1o 6495  df-fv 6496  df-isom 6497  df-riota 7316  df-ov 7362  df-oprab 7363  df-mpo 7364  df-om 7810  df-1st 7933  df-2nd 7934  df-frecs 8224  df-wrecs 8255  df-recs 8304  df-rdg 8343  df-1o 8399  df-oadd 8403  df-omul 8404  df-er 8637  df-map 8769  df-en 8888  df-dom 8889  df-sdom 8890  df-fin 8891  df-oi 9419  df-card 9858  df-acn 9861
This theorem is referenced by:  aannenlem3  26317
  Copyright terms: Public domain W3C validator