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

Theorem iunfictbso 8820
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 8423 . . . . 5 ω ∈ V
210dom 7975 . . . 4 ∅ ≼ ω
3 breq1 4586 . . . 4 ( 𝐴 = ∅ → ( 𝐴 ≼ ω ↔ ∅ ≼ ω))
42, 3mpbiri 247 . . 3 ( 𝐴 = ∅ → 𝐴 ≼ ω)
54a1d 25 . 2 ( 𝐴 = ∅ → ((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) → 𝐴 ≼ ω))
6 n0 3890 . . 3 ( 𝐴 ≠ ∅ ↔ ∃𝑎 𝑎 𝐴)
7 ne0i 3880 . . . . . . . . . 10 (𝑎 𝐴 𝐴 ≠ ∅)
8 unieq 4380 . . . . . . . . . . . 12 (𝐴 = ∅ → 𝐴 = ∅)
9 uni0 4401 . . . . . . . . . . . 12 ∅ = ∅
108, 9syl6eq 2660 . . . . . . . . . . 11 (𝐴 = ∅ → 𝐴 = ∅)
1110necon3i 2814 . . . . . . . . . 10 ( 𝐴 ≠ ∅ → 𝐴 ≠ ∅)
127, 11syl 17 . . . . . . . . 9 (𝑎 𝐴𝐴 ≠ ∅)
1312adantl 481 . . . . . . . 8 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ 𝑎 𝐴) → 𝐴 ≠ ∅)
14 simpl1 1057 . . . . . . . . 9 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ 𝑎 𝐴) → 𝐴 ≼ ω)
15 reldom 7847 . . . . . . . . . 10 Rel ≼
1615brrelexi 5082 . . . . . . . . 9 (𝐴 ≼ ω → 𝐴 ∈ V)
17 0sdomg 7974 . . . . . . . . 9 (𝐴 ∈ V → (∅ ≺ 𝐴𝐴 ≠ ∅))
1814, 16, 173syl 18 . . . . . . . 8 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ 𝑎 𝐴) → (∅ ≺ 𝐴𝐴 ≠ ∅))
1913, 18mpbird 246 . . . . . . 7 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ 𝑎 𝐴) → ∅ ≺ 𝐴)
20 fodomr 7996 . . . . . . 7 ((∅ ≺ 𝐴𝐴 ≼ ω) → ∃𝑏 𝑏:ω–onto𝐴)
2119, 14, 20syl2anc 691 . . . . . 6 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ 𝑎 𝐴) → ∃𝑏 𝑏:ω–onto𝐴)
22 omelon 8426 . . . . . . . . . . . 12 ω ∈ On
23 onenon 8658 . . . . . . . . . . . 12 (ω ∈ On → ω ∈ dom card)
2422, 23ax-mp 5 . . . . . . . . . . 11 ω ∈ dom card
25 xpnum 8660 . . . . . . . . . . 11 ((ω ∈ dom card ∧ ω ∈ dom card) → (ω × ω) ∈ dom card)
2624, 24, 25mp2an 704 . . . . . . . . . 10 (ω × ω) ∈ dom card
27 simplrr 797 . . . . . . . . . . . . . . . . . . 19 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → 𝑏:ω–onto𝐴)
28 fof 6028 . . . . . . . . . . . . . . . . . . 19 (𝑏:ω–onto𝐴𝑏:ω⟶𝐴)
2927, 28syl 17 . . . . . . . . . . . . . . . . . 18 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → 𝑏:ω⟶𝐴)
30 simprl 790 . . . . . . . . . . . . . . . . . 18 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → 𝑓 ∈ ω)
3129, 30ffvelrnd 6268 . . . . . . . . . . . . . . . . 17 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → (𝑏𝑓) ∈ 𝐴)
3231adantr 480 . . . . . . . . . . . . . . . 16 (((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) ∧ 𝑔 ∈ (card‘(𝑏𝑓))) → (𝑏𝑓) ∈ 𝐴)
33 elssuni 4403 . . . . . . . . . . . . . . . 16 ((𝑏𝑓) ∈ 𝐴 → (𝑏𝑓) ⊆ 𝐴)
3432, 33syl 17 . . . . . . . . . . . . . . 15 (((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) ∧ 𝑔 ∈ (card‘(𝑏𝑓))) → (𝑏𝑓) ⊆ 𝐴)
3531, 33syl 17 . . . . . . . . . . . . . . . . . . . . 21 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → (𝑏𝑓) ⊆ 𝐴)
36 simpll3 1095 . . . . . . . . . . . . . . . . . . . . 21 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → 𝐵 Or 𝐴)
37 soss 4977 . . . . . . . . . . . . . . . . . . . . 21 ((𝑏𝑓) ⊆ 𝐴 → (𝐵 Or 𝐴𝐵 Or (𝑏𝑓)))
3835, 36, 37sylc 63 . . . . . . . . . . . . . . . . . . . 20 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → 𝐵 Or (𝑏𝑓))
39 simpll2 1094 . . . . . . . . . . . . . . . . . . . . 21 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → 𝐴 ⊆ Fin)
4039, 31sseldd 3569 . . . . . . . . . . . . . . . . . . . 20 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → (𝑏𝑓) ∈ Fin)
41 finnisoeu 8819 . . . . . . . . . . . . . . . . . . . 20 ((𝐵 Or (𝑏𝑓) ∧ (𝑏𝑓) ∈ Fin) → ∃! Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))
4238, 40, 41syl2anc 691 . . . . . . . . . . . . . . . . . . 19 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → ∃! Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))
43 iotacl 5791 . . . . . . . . . . . . . . . . . . 19 (∃! Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))) ∈ { Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))})
4442, 43syl 17 . . . . . . . . . . . . . . . . . 18 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))) ∈ { Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))})
45 iotaex 5785 . . . . . . . . . . . . . . . . . . 19 (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))) ∈ V
46 isoeq1 6467 . . . . . . . . . . . . . . . . . . 19 (𝑎 = (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))) → (𝑎 Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)) ↔ (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))) Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))))
47 isoeq1 6467 . . . . . . . . . . . . . . . . . . . 20 ( = 𝑎 → ( Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)) ↔ 𝑎 Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))))
4847cbvabv 2734 . . . . . . . . . . . . . . . . . . 19 { Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))} = {𝑎𝑎 Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))}
4945, 46, 48elab2 3323 . . . . . . . . . . . . . . . . . 18 ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))) ∈ { Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))} ↔ (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))) Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))
5044, 49sylib 207 . . . . . . . . . . . . . . . . 17 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))) Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))
51 isof1o 6473 . . . . . . . . . . . . . . . . 17 ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))) Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))):(card‘(𝑏𝑓))–1-1-onto→(𝑏𝑓))
52 f1of 6050 . . . . . . . . . . . . . . . . 17 ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))):(card‘(𝑏𝑓))–1-1-onto→(𝑏𝑓) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))):(card‘(𝑏𝑓))⟶(𝑏𝑓))
5350, 51, 523syl 18 . . . . . . . . . . . . . . . 16 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))):(card‘(𝑏𝑓))⟶(𝑏𝑓))
5453ffvelrnda 6267 . . . . . . . . . . . . . . 15 (((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) ∧ 𝑔 ∈ (card‘(𝑏𝑓))) → ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔) ∈ (𝑏𝑓))
5534, 54sseldd 3569 . . . . . . . . . . . . . 14 (((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) ∧ 𝑔 ∈ (card‘(𝑏𝑓))) → ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔) ∈ 𝐴)
56 simprl 790 . . . . . . . . . . . . . . 15 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) → 𝑎 𝐴)
5756ad2antrr 758 . . . . . . . . . . . . . 14 (((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) ∧ ¬ 𝑔 ∈ (card‘(𝑏𝑓))) → 𝑎 𝐴)
5855, 57ifclda 4070 . . . . . . . . . . . . 13 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑓 ∈ ω ∧ 𝑔 ∈ ω)) → if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎) ∈ 𝐴)
5958ralrimivva 2954 . . . . . . . . . . . 12 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) → ∀𝑓 ∈ ω ∀𝑔 ∈ ω if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎) ∈ 𝐴)
60 eqid 2610 . . . . . . . . . . . . 13 (𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎)) = (𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))
6160fmpt2 7126 . . . . . . . . . . . 12 (∀𝑓 ∈ ω ∀𝑔 ∈ ω if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎) ∈ 𝐴 ↔ (𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎)):(ω × ω)⟶ 𝐴)
6259, 61sylib 207 . . . . . . . . . . 11 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) → (𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎)):(ω × ω)⟶ 𝐴)
63 eluni 4375 . . . . . . . . . . . . 13 (𝑐 𝐴 ↔ ∃𝑖(𝑐𝑖𝑖𝐴))
64 simplrr 797 . . . . . . . . . . . . . . . . 17 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑐𝑖𝑖𝐴)) → 𝑏:ω–onto𝐴)
65 simprr 792 . . . . . . . . . . . . . . . . 17 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑐𝑖𝑖𝐴)) → 𝑖𝐴)
66 foelrn 6286 . . . . . . . . . . . . . . . . 17 ((𝑏:ω–onto𝐴𝑖𝐴) → ∃𝑗 ∈ ω 𝑖 = (𝑏𝑗))
6764, 65, 66syl2anc 691 . . . . . . . . . . . . . . . 16 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑐𝑖𝑖𝐴)) → ∃𝑗 ∈ ω 𝑖 = (𝑏𝑗))
68 simprrl 800 . . . . . . . . . . . . . . . . . . . 20 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → 𝑗 ∈ ω)
69 ordom 6966 . . . . . . . . . . . . . . . . . . . . . 22 Ord ω
70 simpll2 1094 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → 𝐴 ⊆ Fin)
71 simplrr 797 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → 𝑏:ω–onto𝐴)
7271, 28syl 17 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → 𝑏:ω⟶𝐴)
7372, 68ffvelrnd 6268 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → (𝑏𝑗) ∈ 𝐴)
7470, 73sseldd 3569 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → (𝑏𝑗) ∈ Fin)
75 ficardom 8670 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑏𝑗) ∈ Fin → (card‘(𝑏𝑗)) ∈ ω)
7674, 75syl 17 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → (card‘(𝑏𝑗)) ∈ ω)
77 ordelss 5656 . . . . . . . . . . . . . . . . . . . . . 22 ((Ord ω ∧ (card‘(𝑏𝑗)) ∈ ω) → (card‘(𝑏𝑗)) ⊆ ω)
7869, 76, 77sylancr 694 . . . . . . . . . . . . . . . . . . . . 21 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → (card‘(𝑏𝑗)) ⊆ ω)
79 elssuni 4403 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑏𝑗) ∈ 𝐴 → (𝑏𝑗) ⊆ 𝐴)
8073, 79syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → (𝑏𝑗) ⊆ 𝐴)
81 simpll3 1095 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → 𝐵 Or 𝐴)
82 soss 4977 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑏𝑗) ⊆ 𝐴 → (𝐵 Or 𝐴𝐵 Or (𝑏𝑗)))
8380, 81, 82sylc 63 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → 𝐵 Or (𝑏𝑗))
84 finnisoeu 8819 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝐵 Or (𝑏𝑗) ∧ (𝑏𝑗) ∈ Fin) → ∃! Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))
8583, 74, 84syl2anc 691 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → ∃! Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))
86 iotacl 5791 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (∃! Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))) ∈ { Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))})
8785, 86syl 17 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))) ∈ { Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))})
88 iotaex 5785 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))) ∈ V
89 isoeq1 6467 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑎 = (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))) → (𝑎 Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)) ↔ (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))) Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))))
90 isoeq1 6467 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ( = 𝑎 → ( Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)) ↔ 𝑎 Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))))
9190cbvabv 2734 . . . . . . . . . . . . . . . . . . . . . . . . . 26 { Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))} = {𝑎𝑎 Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))}
9288, 89, 91elab2 3323 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))) ∈ { Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))} ↔ (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))) Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))
9387, 92sylib 207 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))) Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))
94 isof1o 6473 . . . . . . . . . . . . . . . . . . . . . . . 24 ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))) Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))):(card‘(𝑏𝑗))–1-1-onto→(𝑏𝑗))
9593, 94syl 17 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))):(card‘(𝑏𝑗))–1-1-onto→(𝑏𝑗))
96 f1ocnv 6062 . . . . . . . . . . . . . . . . . . . . . . 23 ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))):(card‘(𝑏𝑗))–1-1-onto→(𝑏𝑗) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))):(𝑏𝑗)–1-1-onto→(card‘(𝑏𝑗)))
97 f1of 6050 . . . . . . . . . . . . . . . . . . . . . . 23 ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))):(𝑏𝑗)–1-1-onto→(card‘(𝑏𝑗)) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))):(𝑏𝑗)⟶(card‘(𝑏𝑗)))
9895, 96, 973syl 18 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))):(𝑏𝑗)⟶(card‘(𝑏𝑗)))
99 simprll 798 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → 𝑐𝑖)
100 simprrr 801 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → 𝑖 = (𝑏𝑗))
10199, 100eleqtrd 2690 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → 𝑐 ∈ (𝑏𝑗))
10298, 101ffvelrnd 6268 . . . . . . . . . . . . . . . . . . . . 21 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) ∈ (card‘(𝑏𝑗)))
10378, 102sseldd 3569 . . . . . . . . . . . . . . . . . . . 20 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) ∈ ω)
104 fveq2 6103 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑓 = 𝑗 → (𝑏𝑓) = (𝑏𝑗))
105104fveq2d 6107 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑓 = 𝑗 → (card‘(𝑏𝑓)) = (card‘(𝑏𝑗)))
106105eleq2d 2673 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑓 = 𝑗 → (𝑔 ∈ (card‘(𝑏𝑓)) ↔ 𝑔 ∈ (card‘(𝑏𝑗))))
107 isoeq4 6470 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((card‘(𝑏𝑓)) = (card‘(𝑏𝑗)) → ( Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)) ↔ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑓))))
108105, 107syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑓 = 𝑗 → ( Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)) ↔ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑓))))
109 isoeq5 6471 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑏𝑓) = (𝑏𝑗) → ( Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑓)) ↔ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))))
110104, 109syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑓 = 𝑗 → ( Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑓)) ↔ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))))
111108, 110bitrd 267 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑓 = 𝑗 → ( Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)) ↔ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))))
112111iotabidv 5789 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑓 = 𝑗 → (℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓))) = (℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))))
113112fveq1d 6105 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑓 = 𝑗 → ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔) = ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑔))
114106, 113ifbieq1d 4059 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑓 = 𝑗 → if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎) = if(𝑔 ∈ (card‘(𝑏𝑗)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑔), 𝑎))
115 eleq1 2676 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑔 = ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) → (𝑔 ∈ (card‘(𝑏𝑗)) ↔ ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) ∈ (card‘(𝑏𝑗))))
116 fveq2 6103 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑔 = ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) → ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑔) = ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)))
117115, 116ifbieq1d 4059 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑔 = ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) → if(𝑔 ∈ (card‘(𝑏𝑗)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑔), 𝑎) = if(((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) ∈ (card‘(𝑏𝑗)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)), 𝑎))
118 fvex 6113 . . . . . . . . . . . . . . . . . . . . . . . 24 ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)) ∈ V
119 vex 3176 . . . . . . . . . . . . . . . . . . . . . . . 24 𝑎 ∈ V
120118, 119ifex 4106 . . . . . . . . . . . . . . . . . . . . . . 23 if(((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) ∈ (card‘(𝑏𝑗)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)), 𝑎) ∈ V
121114, 117, 60, 120ovmpt2 6694 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑗 ∈ ω ∧ ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) ∈ ω) → (𝑗(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)) = if(((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) ∈ (card‘(𝑏𝑗)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)), 𝑎))
12268, 103, 121syl2anc 691 . . . . . . . . . . . . . . . . . . . . 21 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → (𝑗(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)) = if(((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) ∈ (card‘(𝑏𝑗)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)), 𝑎))
123102iftrued 4044 . . . . . . . . . . . . . . . . . . . . 21 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → if(((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) ∈ (card‘(𝑏𝑗)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)), 𝑎) = ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)))
124 f1ocnvfv2 6433 . . . . . . . . . . . . . . . . . . . . . 22 (((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗))):(card‘(𝑏𝑗))–1-1-onto→(𝑏𝑗) ∧ 𝑐 ∈ (𝑏𝑗)) → ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)) = 𝑐)
12595, 101, 124syl2anc 691 . . . . . . . . . . . . . . . . . . . . 21 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)) = 𝑐)
126122, 123, 1253eqtrrd 2649 . . . . . . . . . . . . . . . . . . . 20 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → 𝑐 = (𝑗(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐)))
127 rspceov 6590 . . . . . . . . . . . . . . . . . . . 20 ((𝑗 ∈ ω ∧ ((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐) ∈ ω ∧ 𝑐 = (𝑗(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))((℩ Isom E , 𝐵 ((card‘(𝑏𝑗)), (𝑏𝑗)))‘𝑐))) → ∃𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒))
12868, 103, 126, 127syl3anc 1318 . . . . . . . . . . . . . . . . . . 19 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ ((𝑐𝑖𝑖𝐴) ∧ (𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)))) → ∃𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒))
129128expr 641 . . . . . . . . . . . . . . . . . 18 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑐𝑖𝑖𝐴)) → ((𝑗 ∈ ω ∧ 𝑖 = (𝑏𝑗)) → ∃𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒)))
130129expd 451 . . . . . . . . . . . . . . . . 17 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑐𝑖𝑖𝐴)) → (𝑗 ∈ ω → (𝑖 = (𝑏𝑗) → ∃𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒))))
131130rexlimdv 3012 . . . . . . . . . . . . . . . 16 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑐𝑖𝑖𝐴)) → (∃𝑗 ∈ ω 𝑖 = (𝑏𝑗) → ∃𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒)))
13267, 131mpd 15 . . . . . . . . . . . . . . 15 ((((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) ∧ (𝑐𝑖𝑖𝐴)) → ∃𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒))
133132ex 449 . . . . . . . . . . . . . 14 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) → ((𝑐𝑖𝑖𝐴) → ∃𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒)))
134133exlimdv 1848 . . . . . . . . . . . . 13 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) → (∃𝑖(𝑐𝑖𝑖𝐴) → ∃𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒)))
13563, 134syl5bi 231 . . . . . . . . . . . 12 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) → (𝑐 𝐴 → ∃𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒)))
136135ralrimiv 2948 . . . . . . . . . . 11 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) → ∀𝑐 𝐴𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒))
137 foov 6706 . . . . . . . . . . 11 ((𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎)):(ω × ω)–onto 𝐴 ↔ ((𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎)):(ω × ω)⟶ 𝐴 ∧ ∀𝑐 𝐴𝑑 ∈ ω ∃𝑒 ∈ ω 𝑐 = (𝑑(𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎))𝑒)))
13862, 136, 137sylanbrc 695 . . . . . . . . . 10 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) → (𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎)):(ω × ω)–onto 𝐴)
139 fodomnum 8763 . . . . . . . . . 10 ((ω × ω) ∈ dom card → ((𝑓 ∈ ω, 𝑔 ∈ ω ↦ if(𝑔 ∈ (card‘(𝑏𝑓)), ((℩ Isom E , 𝐵 ((card‘(𝑏𝑓)), (𝑏𝑓)))‘𝑔), 𝑎)):(ω × ω)–onto 𝐴 𝐴 ≼ (ω × ω)))
14026, 138, 139mpsyl 66 . . . . . . . . 9 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) → 𝐴 ≼ (ω × ω))
141 xpomen 8721 . . . . . . . . 9 (ω × ω) ≈ ω
142 domentr 7901 . . . . . . . . 9 (( 𝐴 ≼ (ω × ω) ∧ (ω × ω) ≈ ω) → 𝐴 ≼ ω)
143140, 141, 142sylancl 693 . . . . . . . 8 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ (𝑎 𝐴𝑏:ω–onto𝐴)) → 𝐴 ≼ ω)
144143expr 641 . . . . . . 7 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ 𝑎 𝐴) → (𝑏:ω–onto𝐴 𝐴 ≼ ω))
145144exlimdv 1848 . . . . . 6 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ 𝑎 𝐴) → (∃𝑏 𝑏:ω–onto𝐴 𝐴 ≼ ω))
14621, 145mpd 15 . . . . 5 (((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) ∧ 𝑎 𝐴) → 𝐴 ≼ ω)
147146expcom 450 . . . 4 (𝑎 𝐴 → ((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) → 𝐴 ≼ ω))
148147exlimiv 1845 . . 3 (∃𝑎 𝑎 𝐴 → ((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) → 𝐴 ≼ ω))
1496, 148sylbi 206 . 2 ( 𝐴 ≠ ∅ → ((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) → 𝐴 ≼ ω))
1505, 149pm2.61ine 2865 1 ((𝐴 ≼ ω ∧ 𝐴 ⊆ Fin ∧ 𝐵 Or 𝐴) → 𝐴 ≼ ω)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 195  wa 383  w3a 1031   = wceq 1475  wex 1695  wcel 1977  ∃!weu 2458  {cab 2596  wne 2780  wral 2896  wrex 2897  Vcvv 3173  wss 3540  c0 3874  ifcif 4036   cuni 4372   class class class wbr 4583   E cep 4947   Or wor 4958   × cxp 5036  ccnv 5037  dom cdm 5038  Ord word 5639  Oncon0 5640  cio 5766  wf 5800  ontowfo 5802  1-1-ontowf1o 5803  cfv 5804   Isom wiso 5805  (class class class)co 6549  cmpt2 6551  ωcom 6957  cen 7838  cdom 7839  csdm 7840  Fincfn 7841  cardccrd 8644
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1713  ax-4 1728  ax-5 1827  ax-6 1875  ax-7 1922  ax-8 1979  ax-9 1986  ax-10 2006  ax-11 2021  ax-12 2034  ax-13 2234  ax-ext 2590  ax-rep 4699  ax-sep 4709  ax-nul 4717  ax-pow 4769  ax-pr 4833  ax-un 6847  ax-inf2 8421
This theorem depends on definitions:  df-bi 196  df-or 384  df-an 385  df-3or 1032  df-3an 1033  df-tru 1478  df-ex 1696  df-nf 1701  df-sb 1868  df-eu 2462  df-mo 2463  df-clab 2597  df-cleq 2603  df-clel 2606  df-nfc 2740  df-ne 2782  df-ral 2901  df-rex 2902  df-reu 2903  df-rmo 2904  df-rab 2905  df-v 3175  df-sbc 3403  df-csb 3500  df-dif 3543  df-un 3545  df-in 3547  df-ss 3554  df-pss 3556  df-nul 3875  df-if 4037  df-pw 4110  df-sn 4126  df-pr 4128  df-tp 4130  df-op 4132  df-uni 4373  df-int 4411  df-iun 4457  df-br 4584  df-opab 4644  df-mpt 4645  df-tr 4681  df-eprel 4949  df-id 4953  df-po 4959  df-so 4960  df-fr 4997  df-se 4998  df-we 4999  df-xp 5044  df-rel 5045  df-cnv 5046  df-co 5047  df-dm 5048  df-rn 5049  df-res 5050  df-ima 5051  df-pred 5597  df-ord 5643  df-on 5644  df-lim 5645  df-suc 5646  df-iota 5768  df-fun 5806  df-fn 5807  df-f 5808  df-f1 5809  df-fo 5810  df-f1o 5811  df-fv 5812  df-isom 5813  df-riota 6511  df-ov 6552  df-oprab 6553  df-mpt2 6554  df-om 6958  df-1st 7059  df-2nd 7060  df-wrecs 7294  df-recs 7355  df-rdg 7393  df-1o 7447  df-oadd 7451  df-omul 7452  df-er 7629  df-map 7746  df-en 7842  df-dom 7843  df-sdom 7844  df-fin 7845  df-oi 8298  df-card 8648  df-acn 8651
This theorem is referenced by:  aannenlem3  23889
  Copyright terms: Public domain W3C validator