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

Theorem cantnf 9694
Description: The Cantor Normal Form theorem. The function (𝐴 CNF 𝐵), which maps a finitely supported function from 𝐵 to 𝐴 to the sum ((𝐴o 𝑓(𝑎1)) ∘ 𝑎1) +o ((𝐴o 𝑓(𝑎2)) ∘ 𝑎2) +o ... over all indices 𝑎 < 𝐵 such that 𝑓(𝑎) is nonzero, is an order isomorphism from the ordering 𝑇 of finitely supported functions to the set (𝐴o 𝐵) under the natural order. Setting 𝐴 = ω and letting 𝐵 be arbitrarily large, the surjectivity of this function implies that every ordinal has a Cantor normal form (and injectivity, together with coherence cantnfres 9678, implies that such a representation is unique). (Contributed by Mario Carneiro, 28-May-2015.)
Hypotheses
Ref Expression
cantnfs.s 𝑆 = dom (𝐴 CNF 𝐵)
cantnfs.a (𝜑𝐴 ∈ On)
cantnfs.b (𝜑𝐵 ∈ On)
oemapval.t 𝑇 = {⟨𝑥, 𝑦⟩ ∣ ∃𝑧𝐵 ((𝑥𝑧) ∈ (𝑦𝑧) ∧ ∀𝑤𝐵 (𝑧𝑤 → (𝑥𝑤) = (𝑦𝑤)))}
Assertion
Ref Expression
cantnf (𝜑 → (𝐴 CNF 𝐵) Isom 𝑇, E (𝑆, (𝐴o 𝐵)))
Distinct variable groups:   𝑥,𝑤,𝑦,𝑧,𝐵   𝑤,𝐴,𝑥,𝑦,𝑧   𝑥,𝑆,𝑦,𝑧   𝜑,𝑥,𝑦,𝑧
Allowed substitution hints:   𝜑(𝑤)   𝑆(𝑤)   𝑇(𝑥,𝑦,𝑧,𝑤)

Proof of Theorem cantnf
Dummy variables 𝑓 𝑐 𝑔 𝑘 𝑡 𝑢 𝑣 𝑎 𝑏 𝑑 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 cantnfs.s . . 3 𝑆 = dom (𝐴 CNF 𝐵)
2 cantnfs.a . . 3 (𝜑𝐴 ∈ On)
3 cantnfs.b . . 3 (𝜑𝐵 ∈ On)
4 oemapval.t . . 3 𝑇 = {⟨𝑥, 𝑦⟩ ∣ ∃𝑧𝐵 ((𝑥𝑧) ∈ (𝑦𝑧) ∧ ∀𝑤𝐵 (𝑧𝑤 → (𝑥𝑤) = (𝑦𝑤)))}
51, 2, 3, 4oemapso 9683 . 2 (𝜑𝑇 Or 𝑆)
6 oecl 8543 . . . . 5 ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (𝐴o 𝐵) ∈ On)
72, 3, 6syl2anc 583 . . . 4 (𝜑 → (𝐴o 𝐵) ∈ On)
8 eloni 6374 . . . 4 ((𝐴o 𝐵) ∈ On → Ord (𝐴o 𝐵))
97, 8syl 17 . . 3 (𝜑 → Ord (𝐴o 𝐵))
10 ordwe 6377 . . 3 (Ord (𝐴o 𝐵) → E We (𝐴o 𝐵))
11 weso 5667 . . 3 ( E We (𝐴o 𝐵) → E Or (𝐴o 𝐵))
12 sopo 5607 . . 3 ( E Or (𝐴o 𝐵) → E Po (𝐴o 𝐵))
139, 10, 11, 124syl 19 . 2 (𝜑 → E Po (𝐴o 𝐵))
141, 2, 3cantnff 9675 . . 3 (𝜑 → (𝐴 CNF 𝐵):𝑆⟶(𝐴o 𝐵))
1514frnd 6725 . . . 4 (𝜑 → ran (𝐴 CNF 𝐵) ⊆ (𝐴o 𝐵))
16 onss 7776 . . . . . . . 8 ((𝐴o 𝐵) ∈ On → (𝐴o 𝐵) ⊆ On)
177, 16syl 17 . . . . . . 7 (𝜑 → (𝐴o 𝐵) ⊆ On)
1817sseld 3981 . . . . . 6 (𝜑 → (𝑡 ∈ (𝐴o 𝐵) → 𝑡 ∈ On))
19 eleq1w 2815 . . . . . . . . . 10 (𝑡 = 𝑦 → (𝑡 ∈ (𝐴o 𝐵) ↔ 𝑦 ∈ (𝐴o 𝐵)))
20 eleq1w 2815 . . . . . . . . . 10 (𝑡 = 𝑦 → (𝑡 ∈ ran (𝐴 CNF 𝐵) ↔ 𝑦 ∈ ran (𝐴 CNF 𝐵)))
2119, 20imbi12d 344 . . . . . . . . 9 (𝑡 = 𝑦 → ((𝑡 ∈ (𝐴o 𝐵) → 𝑡 ∈ ran (𝐴 CNF 𝐵)) ↔ (𝑦 ∈ (𝐴o 𝐵) → 𝑦 ∈ ran (𝐴 CNF 𝐵))))
2221imbi2d 340 . . . . . . . 8 (𝑡 = 𝑦 → ((𝜑 → (𝑡 ∈ (𝐴o 𝐵) → 𝑡 ∈ ran (𝐴 CNF 𝐵))) ↔ (𝜑 → (𝑦 ∈ (𝐴o 𝐵) → 𝑦 ∈ ran (𝐴 CNF 𝐵)))))
23 r19.21v 3178 . . . . . . . . 9 (∀𝑦𝑡 (𝜑 → (𝑦 ∈ (𝐴o 𝐵) → 𝑦 ∈ ran (𝐴 CNF 𝐵))) ↔ (𝜑 → ∀𝑦𝑡 (𝑦 ∈ (𝐴o 𝐵) → 𝑦 ∈ ran (𝐴 CNF 𝐵))))
24 ordelss 6380 . . . . . . . . . . . . . . . . . . 19 ((Ord (𝐴o 𝐵) ∧ 𝑡 ∈ (𝐴o 𝐵)) → 𝑡 ⊆ (𝐴o 𝐵))
259, 24sylan 579 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑡 ∈ (𝐴o 𝐵)) → 𝑡 ⊆ (𝐴o 𝐵))
2625sselda 3982 . . . . . . . . . . . . . . . . 17 (((𝜑𝑡 ∈ (𝐴o 𝐵)) ∧ 𝑦𝑡) → 𝑦 ∈ (𝐴o 𝐵))
27 pm5.5 361 . . . . . . . . . . . . . . . . 17 (𝑦 ∈ (𝐴o 𝐵) → ((𝑦 ∈ (𝐴o 𝐵) → 𝑦 ∈ ran (𝐴 CNF 𝐵)) ↔ 𝑦 ∈ ran (𝐴 CNF 𝐵)))
2826, 27syl 17 . . . . . . . . . . . . . . . 16 (((𝜑𝑡 ∈ (𝐴o 𝐵)) ∧ 𝑦𝑡) → ((𝑦 ∈ (𝐴o 𝐵) → 𝑦 ∈ ran (𝐴 CNF 𝐵)) ↔ 𝑦 ∈ ran (𝐴 CNF 𝐵)))
2928ralbidva 3174 . . . . . . . . . . . . . . 15 ((𝜑𝑡 ∈ (𝐴o 𝐵)) → (∀𝑦𝑡 (𝑦 ∈ (𝐴o 𝐵) → 𝑦 ∈ ran (𝐴 CNF 𝐵)) ↔ ∀𝑦𝑡 𝑦 ∈ ran (𝐴 CNF 𝐵)))
30 dfss3 3970 . . . . . . . . . . . . . . 15 (𝑡 ⊆ ran (𝐴 CNF 𝐵) ↔ ∀𝑦𝑡 𝑦 ∈ ran (𝐴 CNF 𝐵))
3129, 30bitr4di 289 . . . . . . . . . . . . . 14 ((𝜑𝑡 ∈ (𝐴o 𝐵)) → (∀𝑦𝑡 (𝑦 ∈ (𝐴o 𝐵) → 𝑦 ∈ ran (𝐴 CNF 𝐵)) ↔ 𝑡 ⊆ ran (𝐴 CNF 𝐵)))
32 eleq1 2820 . . . . . . . . . . . . . . . 16 (𝑡 = ∅ → (𝑡 ∈ ran (𝐴 CNF 𝐵) ↔ ∅ ∈ ran (𝐴 CNF 𝐵)))
332adantr 480 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑡 ∈ (𝐴o 𝐵) ∧ 𝑡 ⊆ ran (𝐴 CNF 𝐵))) → 𝐴 ∈ On)
3433adantr 480 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑡 ∈ (𝐴o 𝐵) ∧ 𝑡 ⊆ ran (𝐴 CNF 𝐵))) ∧ 𝑡 ≠ ∅) → 𝐴 ∈ On)
353adantr 480 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑡 ∈ (𝐴o 𝐵) ∧ 𝑡 ⊆ ran (𝐴 CNF 𝐵))) → 𝐵 ∈ On)
3635adantr 480 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑡 ∈ (𝐴o 𝐵) ∧ 𝑡 ⊆ ran (𝐴 CNF 𝐵))) ∧ 𝑡 ≠ ∅) → 𝐵 ∈ On)
37 simplrl 774 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑡 ∈ (𝐴o 𝐵) ∧ 𝑡 ⊆ ran (𝐴 CNF 𝐵))) ∧ 𝑡 ≠ ∅) → 𝑡 ∈ (𝐴o 𝐵))
38 simplrr 775 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑡 ∈ (𝐴o 𝐵) ∧ 𝑡 ⊆ ran (𝐴 CNF 𝐵))) ∧ 𝑡 ≠ ∅) → 𝑡 ⊆ ran (𝐴 CNF 𝐵))
397adantr 480 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑡 ∈ (𝐴o 𝐵) ∧ 𝑡 ⊆ ran (𝐴 CNF 𝐵))) → (𝐴o 𝐵) ∈ On)
40 simprl 768 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑡 ∈ (𝐴o 𝐵) ∧ 𝑡 ⊆ ran (𝐴 CNF 𝐵))) → 𝑡 ∈ (𝐴o 𝐵))
41 onelon 6389 . . . . . . . . . . . . . . . . . . . 20 (((𝐴o 𝐵) ∈ On ∧ 𝑡 ∈ (𝐴o 𝐵)) → 𝑡 ∈ On)
4239, 40, 41syl2anc 583 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ (𝑡 ∈ (𝐴o 𝐵) ∧ 𝑡 ⊆ ran (𝐴 CNF 𝐵))) → 𝑡 ∈ On)
43 on0eln0 6420 . . . . . . . . . . . . . . . . . . 19 (𝑡 ∈ On → (∅ ∈ 𝑡𝑡 ≠ ∅))
4442, 43syl 17 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑡 ∈ (𝐴o 𝐵) ∧ 𝑡 ⊆ ran (𝐴 CNF 𝐵))) → (∅ ∈ 𝑡𝑡 ≠ ∅))
4544biimpar 477 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑡 ∈ (𝐴o 𝐵) ∧ 𝑡 ⊆ ran (𝐴 CNF 𝐵))) ∧ 𝑡 ≠ ∅) → ∅ ∈ 𝑡)
46 eqid 2731 . . . . . . . . . . . . . . . . 17 {𝑐 ∈ On ∣ 𝑡 ∈ (𝐴o 𝑐)} = {𝑐 ∈ On ∣ 𝑡 ∈ (𝐴o 𝑐)}
47 eqid 2731 . . . . . . . . . . . . . . . . 17 (℩𝑑𝑎 ∈ On ∃𝑏 ∈ (𝐴o {𝑐 ∈ On ∣ 𝑡 ∈ (𝐴o 𝑐)})(𝑑 = ⟨𝑎, 𝑏⟩ ∧ (((𝐴o {𝑐 ∈ On ∣ 𝑡 ∈ (𝐴o 𝑐)}) ·o 𝑎) +o 𝑏) = 𝑡)) = (℩𝑑𝑎 ∈ On ∃𝑏 ∈ (𝐴o {𝑐 ∈ On ∣ 𝑡 ∈ (𝐴o 𝑐)})(𝑑 = ⟨𝑎, 𝑏⟩ ∧ (((𝐴o {𝑐 ∈ On ∣ 𝑡 ∈ (𝐴o 𝑐)}) ·o 𝑎) +o 𝑏) = 𝑡))
48 eqid 2731 . . . . . . . . . . . . . . . . 17 (1st ‘(℩𝑑𝑎 ∈ On ∃𝑏 ∈ (𝐴o {𝑐 ∈ On ∣ 𝑡 ∈ (𝐴o 𝑐)})(𝑑 = ⟨𝑎, 𝑏⟩ ∧ (((𝐴o {𝑐 ∈ On ∣ 𝑡 ∈ (𝐴o 𝑐)}) ·o 𝑎) +o 𝑏) = 𝑡))) = (1st ‘(℩𝑑𝑎 ∈ On ∃𝑏 ∈ (𝐴o {𝑐 ∈ On ∣ 𝑡 ∈ (𝐴o 𝑐)})(𝑑 = ⟨𝑎, 𝑏⟩ ∧ (((𝐴o {𝑐 ∈ On ∣ 𝑡 ∈ (𝐴o 𝑐)}) ·o 𝑎) +o 𝑏) = 𝑡)))
49 eqid 2731 . . . . . . . . . . . . . . . . 17 (2nd ‘(℩𝑑𝑎 ∈ On ∃𝑏 ∈ (𝐴o {𝑐 ∈ On ∣ 𝑡 ∈ (𝐴o 𝑐)})(𝑑 = ⟨𝑎, 𝑏⟩ ∧ (((𝐴o {𝑐 ∈ On ∣ 𝑡 ∈ (𝐴o 𝑐)}) ·o 𝑎) +o 𝑏) = 𝑡))) = (2nd ‘(℩𝑑𝑎 ∈ On ∃𝑏 ∈ (𝐴o {𝑐 ∈ On ∣ 𝑡 ∈ (𝐴o 𝑐)})(𝑑 = ⟨𝑎, 𝑏⟩ ∧ (((𝐴o {𝑐 ∈ On ∣ 𝑡 ∈ (𝐴o 𝑐)}) ·o 𝑎) +o 𝑏) = 𝑡)))
501, 34, 36, 4, 37, 38, 45, 46, 47, 48, 49cantnflem4 9693 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑡 ∈ (𝐴o 𝐵) ∧ 𝑡 ⊆ ran (𝐴 CNF 𝐵))) ∧ 𝑡 ≠ ∅) → 𝑡 ∈ ran (𝐴 CNF 𝐵))
51 fczsupp0 8183 . . . . . . . . . . . . . . . . . . . . 21 ((𝐵 × {∅}) supp ∅) = ∅
5251eqcomi 2740 . . . . . . . . . . . . . . . . . . . 20 ∅ = ((𝐵 × {∅}) supp ∅)
53 oieq2 9514 . . . . . . . . . . . . . . . . . . . 20 (∅ = ((𝐵 × {∅}) supp ∅) → OrdIso( E , ∅) = OrdIso( E , ((𝐵 × {∅}) supp ∅)))
5452, 53ax-mp 5 . . . . . . . . . . . . . . . . . . 19 OrdIso( E , ∅) = OrdIso( E , ((𝐵 × {∅}) supp ∅))
55 ne0i 4334 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑡 ∈ (𝐴o 𝐵) → (𝐴o 𝐵) ≠ ∅)
5655ad2antrl 725 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑 ∧ (𝑡 ∈ (𝐴o 𝐵) ∧ 𝑡 ⊆ ran (𝐴 CNF 𝐵))) → (𝐴o 𝐵) ≠ ∅)
57 oveq1 7419 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝐴 = ∅ → (𝐴o 𝐵) = (∅ ↑o 𝐵))
5857neeq1d 2999 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝐴 = ∅ → ((𝐴o 𝐵) ≠ ∅ ↔ (∅ ↑o 𝐵) ≠ ∅))
5956, 58syl5ibcom 244 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ (𝑡 ∈ (𝐴o 𝐵) ∧ 𝑡 ⊆ ran (𝐴 CNF 𝐵))) → (𝐴 = ∅ → (∅ ↑o 𝐵) ≠ ∅))
6059necon2d 2962 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ (𝑡 ∈ (𝐴o 𝐵) ∧ 𝑡 ⊆ ran (𝐴 CNF 𝐵))) → ((∅ ↑o 𝐵) = ∅ → 𝐴 ≠ ∅))
61 on0eln0 6420 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝐵 ∈ On → (∅ ∈ 𝐵𝐵 ≠ ∅))
62 oe0m1 8527 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝐵 ∈ On → (∅ ∈ 𝐵 ↔ (∅ ↑o 𝐵) = ∅))
6361, 62bitr3d 281 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝐵 ∈ On → (𝐵 ≠ ∅ ↔ (∅ ↑o 𝐵) = ∅))
6435, 63syl 17 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ (𝑡 ∈ (𝐴o 𝐵) ∧ 𝑡 ⊆ ran (𝐴 CNF 𝐵))) → (𝐵 ≠ ∅ ↔ (∅ ↑o 𝐵) = ∅))
65 on0eln0 6420 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝐴 ∈ On → (∅ ∈ 𝐴𝐴 ≠ ∅))
6633, 65syl 17 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ (𝑡 ∈ (𝐴o 𝐵) ∧ 𝑡 ⊆ ran (𝐴 CNF 𝐵))) → (∅ ∈ 𝐴𝐴 ≠ ∅))
6760, 64, 663imtr4d 294 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ (𝑡 ∈ (𝐴o 𝐵) ∧ 𝑡 ⊆ ran (𝐴 CNF 𝐵))) → (𝐵 ≠ ∅ → ∅ ∈ 𝐴))
68 ne0i 4334 . . . . . . . . . . . . . . . . . . . . . 22 (𝑦𝐵𝐵 ≠ ∅)
6967, 68impel 505 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ (𝑡 ∈ (𝐴o 𝐵) ∧ 𝑡 ⊆ ran (𝐴 CNF 𝐵))) ∧ 𝑦𝐵) → ∅ ∈ 𝐴)
70 fconstmpt 5738 . . . . . . . . . . . . . . . . . . . . 21 (𝐵 × {∅}) = (𝑦𝐵 ↦ ∅)
7169, 70fmptd 7115 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑡 ∈ (𝐴o 𝐵) ∧ 𝑡 ⊆ ran (𝐴 CNF 𝐵))) → (𝐵 × {∅}):𝐵𝐴)
72 0ex 5307 . . . . . . . . . . . . . . . . . . . . . . 23 ∅ ∈ V
7372a1i 11 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → ∅ ∈ V)
743, 73fczfsuppd 9387 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (𝐵 × {∅}) finSupp ∅)
7574adantr 480 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑡 ∈ (𝐴o 𝐵) ∧ 𝑡 ⊆ ran (𝐴 CNF 𝐵))) → (𝐵 × {∅}) finSupp ∅)
761, 2, 3cantnfs 9667 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → ((𝐵 × {∅}) ∈ 𝑆 ↔ ((𝐵 × {∅}):𝐵𝐴 ∧ (𝐵 × {∅}) finSupp ∅)))
7776adantr 480 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑡 ∈ (𝐴o 𝐵) ∧ 𝑡 ⊆ ran (𝐴 CNF 𝐵))) → ((𝐵 × {∅}) ∈ 𝑆 ↔ ((𝐵 × {∅}):𝐵𝐴 ∧ (𝐵 × {∅}) finSupp ∅)))
7871, 75, 77mpbir2and 710 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ (𝑡 ∈ (𝐴o 𝐵) ∧ 𝑡 ⊆ ran (𝐴 CNF 𝐵))) → (𝐵 × {∅}) ∈ 𝑆)
79 eqid 2731 . . . . . . . . . . . . . . . . . . 19 seqω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴o (OrdIso( E , ∅)‘𝑘)) ·o ((𝐵 × {∅})‘(OrdIso( E , ∅)‘𝑘))) +o 𝑧)), ∅) = seqω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴o (OrdIso( E , ∅)‘𝑘)) ·o ((𝐵 × {∅})‘(OrdIso( E , ∅)‘𝑘))) +o 𝑧)), ∅)
801, 33, 35, 54, 78, 79cantnfval 9669 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑡 ∈ (𝐴o 𝐵) ∧ 𝑡 ⊆ ran (𝐴 CNF 𝐵))) → ((𝐴 CNF 𝐵)‘(𝐵 × {∅})) = (seqω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴o (OrdIso( E , ∅)‘𝑘)) ·o ((𝐵 × {∅})‘(OrdIso( E , ∅)‘𝑘))) +o 𝑧)), ∅)‘dom OrdIso( E , ∅)))
81 we0 5671 . . . . . . . . . . . . . . . . . . . . . 22 E We ∅
82 eqid 2731 . . . . . . . . . . . . . . . . . . . . . . 23 OrdIso( E , ∅) = OrdIso( E , ∅)
8382oien 9539 . . . . . . . . . . . . . . . . . . . . . 22 ((∅ ∈ V ∧ E We ∅) → dom OrdIso( E , ∅) ≈ ∅)
8472, 81, 83mp2an 689 . . . . . . . . . . . . . . . . . . . . 21 dom OrdIso( E , ∅) ≈ ∅
85 en0 9019 . . . . . . . . . . . . . . . . . . . . 21 (dom OrdIso( E , ∅) ≈ ∅ ↔ dom OrdIso( E , ∅) = ∅)
8684, 85mpbi 229 . . . . . . . . . . . . . . . . . . . 20 dom OrdIso( E , ∅) = ∅
8786fveq2i 6894 . . . . . . . . . . . . . . . . . . 19 (seqω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴o (OrdIso( E , ∅)‘𝑘)) ·o ((𝐵 × {∅})‘(OrdIso( E , ∅)‘𝑘))) +o 𝑧)), ∅)‘dom OrdIso( E , ∅)) = (seqω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴o (OrdIso( E , ∅)‘𝑘)) ·o ((𝐵 × {∅})‘(OrdIso( E , ∅)‘𝑘))) +o 𝑧)), ∅)‘∅)
8879seqom0g 8462 . . . . . . . . . . . . . . . . . . . 20 (∅ ∈ V → (seqω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴o (OrdIso( E , ∅)‘𝑘)) ·o ((𝐵 × {∅})‘(OrdIso( E , ∅)‘𝑘))) +o 𝑧)), ∅)‘∅) = ∅)
8972, 88ax-mp 5 . . . . . . . . . . . . . . . . . . 19 (seqω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴o (OrdIso( E , ∅)‘𝑘)) ·o ((𝐵 × {∅})‘(OrdIso( E , ∅)‘𝑘))) +o 𝑧)), ∅)‘∅) = ∅
9087, 89eqtri 2759 . . . . . . . . . . . . . . . . . 18 (seqω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴o (OrdIso( E , ∅)‘𝑘)) ·o ((𝐵 × {∅})‘(OrdIso( E , ∅)‘𝑘))) +o 𝑧)), ∅)‘dom OrdIso( E , ∅)) = ∅
9180, 90eqtrdi 2787 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑡 ∈ (𝐴o 𝐵) ∧ 𝑡 ⊆ ran (𝐴 CNF 𝐵))) → ((𝐴 CNF 𝐵)‘(𝐵 × {∅})) = ∅)
9214adantr 480 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ (𝑡 ∈ (𝐴o 𝐵) ∧ 𝑡 ⊆ ran (𝐴 CNF 𝐵))) → (𝐴 CNF 𝐵):𝑆⟶(𝐴o 𝐵))
9392ffnd 6718 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑡 ∈ (𝐴o 𝐵) ∧ 𝑡 ⊆ ran (𝐴 CNF 𝐵))) → (𝐴 CNF 𝐵) Fn 𝑆)
94 fnfvelrn 7082 . . . . . . . . . . . . . . . . . 18 (((𝐴 CNF 𝐵) Fn 𝑆 ∧ (𝐵 × {∅}) ∈ 𝑆) → ((𝐴 CNF 𝐵)‘(𝐵 × {∅})) ∈ ran (𝐴 CNF 𝐵))
9593, 78, 94syl2anc 583 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑡 ∈ (𝐴o 𝐵) ∧ 𝑡 ⊆ ran (𝐴 CNF 𝐵))) → ((𝐴 CNF 𝐵)‘(𝐵 × {∅})) ∈ ran (𝐴 CNF 𝐵))
9691, 95eqeltrrd 2833 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑡 ∈ (𝐴o 𝐵) ∧ 𝑡 ⊆ ran (𝐴 CNF 𝐵))) → ∅ ∈ ran (𝐴 CNF 𝐵))
9732, 50, 96pm2.61ne 3026 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑡 ∈ (𝐴o 𝐵) ∧ 𝑡 ⊆ ran (𝐴 CNF 𝐵))) → 𝑡 ∈ ran (𝐴 CNF 𝐵))
9897expr 456 . . . . . . . . . . . . . 14 ((𝜑𝑡 ∈ (𝐴o 𝐵)) → (𝑡 ⊆ ran (𝐴 CNF 𝐵) → 𝑡 ∈ ran (𝐴 CNF 𝐵)))
9931, 98sylbid 239 . . . . . . . . . . . . 13 ((𝜑𝑡 ∈ (𝐴o 𝐵)) → (∀𝑦𝑡 (𝑦 ∈ (𝐴o 𝐵) → 𝑦 ∈ ran (𝐴 CNF 𝐵)) → 𝑡 ∈ ran (𝐴 CNF 𝐵)))
10099ex 412 . . . . . . . . . . . 12 (𝜑 → (𝑡 ∈ (𝐴o 𝐵) → (∀𝑦𝑡 (𝑦 ∈ (𝐴o 𝐵) → 𝑦 ∈ ran (𝐴 CNF 𝐵)) → 𝑡 ∈ ran (𝐴 CNF 𝐵))))
101100com23 86 . . . . . . . . . . 11 (𝜑 → (∀𝑦𝑡 (𝑦 ∈ (𝐴o 𝐵) → 𝑦 ∈ ran (𝐴 CNF 𝐵)) → (𝑡 ∈ (𝐴o 𝐵) → 𝑡 ∈ ran (𝐴 CNF 𝐵))))
102101a2i 14 . . . . . . . . . 10 ((𝜑 → ∀𝑦𝑡 (𝑦 ∈ (𝐴o 𝐵) → 𝑦 ∈ ran (𝐴 CNF 𝐵))) → (𝜑 → (𝑡 ∈ (𝐴o 𝐵) → 𝑡 ∈ ran (𝐴 CNF 𝐵))))
103102a1i 11 . . . . . . . . 9 (𝑡 ∈ On → ((𝜑 → ∀𝑦𝑡 (𝑦 ∈ (𝐴o 𝐵) → 𝑦 ∈ ran (𝐴 CNF 𝐵))) → (𝜑 → (𝑡 ∈ (𝐴o 𝐵) → 𝑡 ∈ ran (𝐴 CNF 𝐵)))))
10423, 103biimtrid 241 . . . . . . . 8 (𝑡 ∈ On → (∀𝑦𝑡 (𝜑 → (𝑦 ∈ (𝐴o 𝐵) → 𝑦 ∈ ran (𝐴 CNF 𝐵))) → (𝜑 → (𝑡 ∈ (𝐴o 𝐵) → 𝑡 ∈ ran (𝐴 CNF 𝐵)))))
10522, 104tfis2 7850 . . . . . . 7 (𝑡 ∈ On → (𝜑 → (𝑡 ∈ (𝐴o 𝐵) → 𝑡 ∈ ran (𝐴 CNF 𝐵))))
106105com3l 89 . . . . . 6 (𝜑 → (𝑡 ∈ (𝐴o 𝐵) → (𝑡 ∈ On → 𝑡 ∈ ran (𝐴 CNF 𝐵))))
10718, 106mpdd 43 . . . . 5 (𝜑 → (𝑡 ∈ (𝐴o 𝐵) → 𝑡 ∈ ran (𝐴 CNF 𝐵)))
108107ssrdv 3988 . . . 4 (𝜑 → (𝐴o 𝐵) ⊆ ran (𝐴 CNF 𝐵))
10915, 108eqssd 3999 . . 3 (𝜑 → ran (𝐴 CNF 𝐵) = (𝐴o 𝐵))
110 dffo2 6809 . . 3 ((𝐴 CNF 𝐵):𝑆onto→(𝐴o 𝐵) ↔ ((𝐴 CNF 𝐵):𝑆⟶(𝐴o 𝐵) ∧ ran (𝐴 CNF 𝐵) = (𝐴o 𝐵)))
11114, 109, 110sylanbrc 582 . 2 (𝜑 → (𝐴 CNF 𝐵):𝑆onto→(𝐴o 𝐵))
1122adantr 480 . . . . . 6 ((𝜑 ∧ ((𝑓𝑆𝑔𝑆) ∧ 𝑓𝑇𝑔)) → 𝐴 ∈ On)
1133adantr 480 . . . . . 6 ((𝜑 ∧ ((𝑓𝑆𝑔𝑆) ∧ 𝑓𝑇𝑔)) → 𝐵 ∈ On)
114 fveq2 6891 . . . . . . . . . . . 12 (𝑧 = 𝑡 → (𝑥𝑧) = (𝑥𝑡))
115 fveq2 6891 . . . . . . . . . . . 12 (𝑧 = 𝑡 → (𝑦𝑧) = (𝑦𝑡))
116114, 115eleq12d 2826 . . . . . . . . . . 11 (𝑧 = 𝑡 → ((𝑥𝑧) ∈ (𝑦𝑧) ↔ (𝑥𝑡) ∈ (𝑦𝑡)))
117 eleq1w 2815 . . . . . . . . . . . . 13 (𝑧 = 𝑡 → (𝑧𝑤𝑡𝑤))
118117imbi1d 341 . . . . . . . . . . . 12 (𝑧 = 𝑡 → ((𝑧𝑤 → (𝑥𝑤) = (𝑦𝑤)) ↔ (𝑡𝑤 → (𝑥𝑤) = (𝑦𝑤))))
119118ralbidv 3176 . . . . . . . . . . 11 (𝑧 = 𝑡 → (∀𝑤𝐵 (𝑧𝑤 → (𝑥𝑤) = (𝑦𝑤)) ↔ ∀𝑤𝐵 (𝑡𝑤 → (𝑥𝑤) = (𝑦𝑤))))
120116, 119anbi12d 630 . . . . . . . . . 10 (𝑧 = 𝑡 → (((𝑥𝑧) ∈ (𝑦𝑧) ∧ ∀𝑤𝐵 (𝑧𝑤 → (𝑥𝑤) = (𝑦𝑤))) ↔ ((𝑥𝑡) ∈ (𝑦𝑡) ∧ ∀𝑤𝐵 (𝑡𝑤 → (𝑥𝑤) = (𝑦𝑤)))))
121120cbvrexvw 3234 . . . . . . . . 9 (∃𝑧𝐵 ((𝑥𝑧) ∈ (𝑦𝑧) ∧ ∀𝑤𝐵 (𝑧𝑤 → (𝑥𝑤) = (𝑦𝑤))) ↔ ∃𝑡𝐵 ((𝑥𝑡) ∈ (𝑦𝑡) ∧ ∀𝑤𝐵 (𝑡𝑤 → (𝑥𝑤) = (𝑦𝑤))))
122 fveq1 6890 . . . . . . . . . . . 12 (𝑥 = 𝑢 → (𝑥𝑡) = (𝑢𝑡))
123 fveq1 6890 . . . . . . . . . . . 12 (𝑦 = 𝑣 → (𝑦𝑡) = (𝑣𝑡))
124 eleq12 2822 . . . . . . . . . . . 12 (((𝑥𝑡) = (𝑢𝑡) ∧ (𝑦𝑡) = (𝑣𝑡)) → ((𝑥𝑡) ∈ (𝑦𝑡) ↔ (𝑢𝑡) ∈ (𝑣𝑡)))
125122, 123, 124syl2an 595 . . . . . . . . . . 11 ((𝑥 = 𝑢𝑦 = 𝑣) → ((𝑥𝑡) ∈ (𝑦𝑡) ↔ (𝑢𝑡) ∈ (𝑣𝑡)))
126 fveq1 6890 . . . . . . . . . . . . . 14 (𝑥 = 𝑢 → (𝑥𝑤) = (𝑢𝑤))
127 fveq1 6890 . . . . . . . . . . . . . 14 (𝑦 = 𝑣 → (𝑦𝑤) = (𝑣𝑤))
128126, 127eqeqan12d 2745 . . . . . . . . . . . . 13 ((𝑥 = 𝑢𝑦 = 𝑣) → ((𝑥𝑤) = (𝑦𝑤) ↔ (𝑢𝑤) = (𝑣𝑤)))
129128imbi2d 340 . . . . . . . . . . . 12 ((𝑥 = 𝑢𝑦 = 𝑣) → ((𝑡𝑤 → (𝑥𝑤) = (𝑦𝑤)) ↔ (𝑡𝑤 → (𝑢𝑤) = (𝑣𝑤))))
130129ralbidv 3176 . . . . . . . . . . 11 ((𝑥 = 𝑢𝑦 = 𝑣) → (∀𝑤𝐵 (𝑡𝑤 → (𝑥𝑤) = (𝑦𝑤)) ↔ ∀𝑤𝐵 (𝑡𝑤 → (𝑢𝑤) = (𝑣𝑤))))
131125, 130anbi12d 630 . . . . . . . . . 10 ((𝑥 = 𝑢𝑦 = 𝑣) → (((𝑥𝑡) ∈ (𝑦𝑡) ∧ ∀𝑤𝐵 (𝑡𝑤 → (𝑥𝑤) = (𝑦𝑤))) ↔ ((𝑢𝑡) ∈ (𝑣𝑡) ∧ ∀𝑤𝐵 (𝑡𝑤 → (𝑢𝑤) = (𝑣𝑤)))))
132131rexbidv 3177 . . . . . . . . 9 ((𝑥 = 𝑢𝑦 = 𝑣) → (∃𝑡𝐵 ((𝑥𝑡) ∈ (𝑦𝑡) ∧ ∀𝑤𝐵 (𝑡𝑤 → (𝑥𝑤) = (𝑦𝑤))) ↔ ∃𝑡𝐵 ((𝑢𝑡) ∈ (𝑣𝑡) ∧ ∀𝑤𝐵 (𝑡𝑤 → (𝑢𝑤) = (𝑣𝑤)))))
133121, 132bitrid 283 . . . . . . . 8 ((𝑥 = 𝑢𝑦 = 𝑣) → (∃𝑧𝐵 ((𝑥𝑧) ∈ (𝑦𝑧) ∧ ∀𝑤𝐵 (𝑧𝑤 → (𝑥𝑤) = (𝑦𝑤))) ↔ ∃𝑡𝐵 ((𝑢𝑡) ∈ (𝑣𝑡) ∧ ∀𝑤𝐵 (𝑡𝑤 → (𝑢𝑤) = (𝑣𝑤)))))
134133cbvopabv 5221 . . . . . . 7 {⟨𝑥, 𝑦⟩ ∣ ∃𝑧𝐵 ((𝑥𝑧) ∈ (𝑦𝑧) ∧ ∀𝑤𝐵 (𝑧𝑤 → (𝑥𝑤) = (𝑦𝑤)))} = {⟨𝑢, 𝑣⟩ ∣ ∃𝑡𝐵 ((𝑢𝑡) ∈ (𝑣𝑡) ∧ ∀𝑤𝐵 (𝑡𝑤 → (𝑢𝑤) = (𝑣𝑤)))}
1354, 134eqtri 2759 . . . . . 6 𝑇 = {⟨𝑢, 𝑣⟩ ∣ ∃𝑡𝐵 ((𝑢𝑡) ∈ (𝑣𝑡) ∧ ∀𝑤𝐵 (𝑡𝑤 → (𝑢𝑤) = (𝑣𝑤)))}
136 simprll 776 . . . . . 6 ((𝜑 ∧ ((𝑓𝑆𝑔𝑆) ∧ 𝑓𝑇𝑔)) → 𝑓𝑆)
137 simprlr 777 . . . . . 6 ((𝜑 ∧ ((𝑓𝑆𝑔𝑆) ∧ 𝑓𝑇𝑔)) → 𝑔𝑆)
138 simprr 770 . . . . . 6 ((𝜑 ∧ ((𝑓𝑆𝑔𝑆) ∧ 𝑓𝑇𝑔)) → 𝑓𝑇𝑔)
139 eqid 2731 . . . . . 6 {𝑐𝐵 ∣ (𝑓𝑐) ∈ (𝑔𝑐)} = {𝑐𝐵 ∣ (𝑓𝑐) ∈ (𝑔𝑐)}
140 eqid 2731 . . . . . 6 OrdIso( E , (𝑔 supp ∅)) = OrdIso( E , (𝑔 supp ∅))
141 eqid 2731 . . . . . 6 seqω((𝑘 ∈ V, 𝑡 ∈ V ↦ (((𝐴o (OrdIso( E , (𝑔 supp ∅))‘𝑘)) ·o (𝑔‘(OrdIso( E , (𝑔 supp ∅))‘𝑘))) +o 𝑡)), ∅) = seqω((𝑘 ∈ V, 𝑡 ∈ V ↦ (((𝐴o (OrdIso( E , (𝑔 supp ∅))‘𝑘)) ·o (𝑔‘(OrdIso( E , (𝑔 supp ∅))‘𝑘))) +o 𝑡)), ∅)
1421, 112, 113, 135, 136, 137, 138, 139, 140, 141cantnflem1 9690 . . . . 5 ((𝜑 ∧ ((𝑓𝑆𝑔𝑆) ∧ 𝑓𝑇𝑔)) → ((𝐴 CNF 𝐵)‘𝑓) ∈ ((𝐴 CNF 𝐵)‘𝑔))
143 fvex 6904 . . . . . 6 ((𝐴 CNF 𝐵)‘𝑔) ∈ V
144143epeli 5582 . . . . 5 (((𝐴 CNF 𝐵)‘𝑓) E ((𝐴 CNF 𝐵)‘𝑔) ↔ ((𝐴 CNF 𝐵)‘𝑓) ∈ ((𝐴 CNF 𝐵)‘𝑔))
145142, 144sylibr 233 . . . 4 ((𝜑 ∧ ((𝑓𝑆𝑔𝑆) ∧ 𝑓𝑇𝑔)) → ((𝐴 CNF 𝐵)‘𝑓) E ((𝐴 CNF 𝐵)‘𝑔))
146145expr 456 . . 3 ((𝜑 ∧ (𝑓𝑆𝑔𝑆)) → (𝑓𝑇𝑔 → ((𝐴 CNF 𝐵)‘𝑓) E ((𝐴 CNF 𝐵)‘𝑔)))
147146ralrimivva 3199 . 2 (𝜑 → ∀𝑓𝑆𝑔𝑆 (𝑓𝑇𝑔 → ((𝐴 CNF 𝐵)‘𝑓) E ((𝐴 CNF 𝐵)‘𝑔)))
148 soisoi 7328 . 2 (((𝑇 Or 𝑆 ∧ E Po (𝐴o 𝐵)) ∧ ((𝐴 CNF 𝐵):𝑆onto→(𝐴o 𝐵) ∧ ∀𝑓𝑆𝑔𝑆 (𝑓𝑇𝑔 → ((𝐴 CNF 𝐵)‘𝑓) E ((𝐴 CNF 𝐵)‘𝑔)))) → (𝐴 CNF 𝐵) Isom 𝑇, E (𝑆, (𝐴o 𝐵)))
1495, 13, 111, 147, 148syl22anc 836 1 (𝜑 → (𝐴 CNF 𝐵) Isom 𝑇, E (𝑆, (𝐴o 𝐵)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 395   = wceq 1540  wcel 2105  wne 2939  wral 3060  wrex 3069  {crab 3431  Vcvv 3473  wss 3948  c0 4322  {csn 4628  cop 4634   cuni 4908   cint 4950   class class class wbr 5148  {copab 5210   E cep 5579   Po wpo 5586   Or wor 5587   We wwe 5630   × cxp 5674  dom cdm 5676  ran crn 5677  Ord word 6363  Oncon0 6364  cio 6493   Fn wfn 6538  wf 6539  ontowfo 6541  cfv 6543   Isom wiso 6544  (class class class)co 7412  cmpo 7414  1st c1st 7977  2nd c2nd 7978   supp csupp 8151  seqωcseqom 8453   +o coa 8469   ·o comu 8470  o coe 8471  cen 8942   finSupp cfsupp 9367  OrdIsocoi 9510   CNF ccnf 9662
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1912  ax-6 1970  ax-7 2010  ax-8 2107  ax-9 2115  ax-10 2136  ax-11 2153  ax-12 2170  ax-ext 2702  ax-rep 5285  ax-sep 5299  ax-nul 5306  ax-pow 5363  ax-pr 5427  ax-un 7729
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1781  df-nf 1785  df-sb 2067  df-mo 2533  df-eu 2562  df-clab 2709  df-cleq 2723  df-clel 2809  df-nfc 2884  df-ne 2940  df-ral 3061  df-rex 3070  df-rmo 3375  df-reu 3376  df-rab 3432  df-v 3475  df-sbc 3778  df-csb 3894  df-dif 3951  df-un 3953  df-in 3955  df-ss 3965  df-pss 3967  df-nul 4323  df-if 4529  df-pw 4604  df-sn 4629  df-pr 4631  df-op 4635  df-uni 4909  df-int 4951  df-iun 4999  df-br 5149  df-opab 5211  df-mpt 5232  df-tr 5266  df-id 5574  df-eprel 5580  df-po 5588  df-so 5589  df-fr 5631  df-se 5632  df-we 5633  df-xp 5682  df-rel 5683  df-cnv 5684  df-co 5685  df-dm 5686  df-rn 5687  df-res 5688  df-ima 5689  df-pred 6300  df-ord 6367  df-on 6368  df-lim 6369  df-suc 6370  df-iota 6495  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-isom 6552  df-riota 7368  df-ov 7415  df-oprab 7416  df-mpo 7417  df-om 7860  df-1st 7979  df-2nd 7980  df-supp 8152  df-frecs 8272  df-wrecs 8303  df-recs 8377  df-rdg 8416  df-seqom 8454  df-1o 8472  df-2o 8473  df-oadd 8476  df-omul 8477  df-oexp 8478  df-er 8709  df-map 8828  df-en 8946  df-dom 8947  df-sdom 8948  df-fin 8949  df-fsupp 9368  df-oi 9511  df-cnf 9663
This theorem is referenced by:  oemapwe  9695  cantnffval2  9696  cantnff1o  9697  cantnfresb  42537
  Copyright terms: Public domain W3C validator