Theorem cantnff 9131

Description: The CNF function is a function from finitely supported functions from 𝐵 to 𝐴, to the ordinal exponential 𝐴 ↑_o 𝐵. (Contributed by Mario Carneiro, 28-May-2015.)

Hypotheses

Ref	Expression
cantnfs.s	⊢ 𝑆 = dom (𝐴 CNF 𝐵)
cantnfs.a	⊢ (𝜑 → 𝐴 ∈ On)
cantnfs.b	⊢ (𝜑 → 𝐵 ∈ On)

Assertion

Ref	Expression
cantnff	⊢ (𝜑 → (𝐴 CNF 𝐵):𝑆⟶(𝐴 ↑o 𝐵))

Proof of Theorem cantnff

Dummy variables 𝑓 𝑔 ℎ 𝑘 𝑥 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		fvex 6677	. . . 4 ⊢ (seqω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴 ↑o (ℎ‘𝑘)) ·o (𝑓‘(ℎ‘𝑘))) +o 𝑧)), ∅)‘dom ℎ) ∈ V
2	1	csbex 5207	. . 3 ⊢ ⦋OrdIso( E , (𝑓 supp ∅)) / ℎ⦌(seqω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴 ↑o (ℎ‘𝑘)) ·o (𝑓‘(ℎ‘𝑘))) +o 𝑧)), ∅)‘dom ℎ) ∈ V
3	2	a1i 11	. 2 ⊢ ((𝜑 ∧ 𝑓 ∈ 𝑆) → ⦋OrdIso( E , (𝑓 supp ∅)) / ℎ⦌(seqω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴 ↑o (ℎ‘𝑘)) ·o (𝑓‘(ℎ‘𝑘))) +o 𝑧)), ∅)‘dom ℎ) ∈ V)
4		eqid 2821	. . . 4 ⊢ {𝑔 ∈ (𝐴 ↑m 𝐵) ∣ 𝑔 finSupp ∅} = {𝑔 ∈ (𝐴 ↑m 𝐵) ∣ 𝑔 finSupp ∅}
5		cantnfs.a	. . . 4 ⊢ (𝜑 → 𝐴 ∈ On)
6		cantnfs.b	. . . 4 ⊢ (𝜑 → 𝐵 ∈ On)
7	4, 5, 6	cantnffval 9120	. . 3 ⊢ (𝜑 → (𝐴 CNF 𝐵) = (𝑓 ∈ {𝑔 ∈ (𝐴 ↑m 𝐵) ∣ 𝑔 finSupp ∅} ↦ ⦋OrdIso( E , (𝑓 supp ∅)) / ℎ⦌(seqω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴 ↑o (ℎ‘𝑘)) ·o (𝑓‘(ℎ‘𝑘))) +o 𝑧)), ∅)‘dom ℎ)))
8		cantnfs.s	. . . . 5 ⊢ 𝑆 = dom (𝐴 CNF 𝐵)
9	4, 5, 6	cantnfdm 9121	. . . . 5 ⊢ (𝜑 → dom (𝐴 CNF 𝐵) = {𝑔 ∈ (𝐴 ↑m 𝐵) ∣ 𝑔 finSupp ∅})
10	8, 9	syl5eq 2868	. . . 4 ⊢ (𝜑 → 𝑆 = {𝑔 ∈ (𝐴 ↑m 𝐵) ∣ 𝑔 finSupp ∅})
11	10	mpteq1d 5147	. . 3 ⊢ (𝜑 → (𝑓 ∈ 𝑆 ↦ ⦋OrdIso( E , (𝑓 supp ∅)) / ℎ⦌(seqω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴 ↑o (ℎ‘𝑘)) ·o (𝑓‘(ℎ‘𝑘))) +o 𝑧)), ∅)‘dom ℎ)) = (𝑓 ∈ {𝑔 ∈ (𝐴 ↑m 𝐵) ∣ 𝑔 finSupp ∅} ↦ ⦋OrdIso( E , (𝑓 supp ∅)) / ℎ⦌(seqω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴 ↑o (ℎ‘𝑘)) ·o (𝑓‘(ℎ‘𝑘))) +o 𝑧)), ∅)‘dom ℎ)))
12	7, 11	eqtr4d 2859	. 2 ⊢ (𝜑 → (𝐴 CNF 𝐵) = (𝑓 ∈ 𝑆 ↦ ⦋OrdIso( E , (𝑓 supp ∅)) / ℎ⦌(seqω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴 ↑o (ℎ‘𝑘)) ·o (𝑓‘(ℎ‘𝑘))) +o 𝑧)), ∅)‘dom ℎ)))
13	5	adantr 483	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑆) → 𝐴 ∈ On)
14	6	adantr 483	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑆) → 𝐵 ∈ On)
15		eqid 2821	. . . . . . . 8 ⊢ OrdIso( E , (𝑥 supp ∅)) = OrdIso( E , (𝑥 supp ∅))
16		simpr 487	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑆) → 𝑥 ∈ 𝑆)
17		eqid 2821	. . . . . . . 8 ⊢ seqω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴 ↑o (OrdIso( E , (𝑥 supp ∅))‘𝑘)) ·o (𝑥‘(OrdIso( E , (𝑥 supp ∅))‘𝑘))) +o 𝑧)), ∅) = seqω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴 ↑o (OrdIso( E , (𝑥 supp ∅))‘𝑘)) ·o (𝑥‘(OrdIso( E , (𝑥 supp ∅))‘𝑘))) +o 𝑧)), ∅)
18	8, 13, 14, 15, 16, 17	cantnfval 9125	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑆) → ((𝐴 CNF 𝐵)‘𝑥) = (seqω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴 ↑o (OrdIso( E , (𝑥 supp ∅))‘𝑘)) ·o (𝑥‘(OrdIso( E , (𝑥 supp ∅))‘𝑘))) +o 𝑧)), ∅)‘dom OrdIso( E , (𝑥 supp ∅))))
19	18	adantr 483	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑆) ∧ 𝐴 = ∅) → ((𝐴 CNF 𝐵)‘𝑥) = (seqω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴 ↑o (OrdIso( E , (𝑥 supp ∅))‘𝑘)) ·o (𝑥‘(OrdIso( E , (𝑥 supp ∅))‘𝑘))) +o 𝑧)), ∅)‘dom OrdIso( E , (𝑥 supp ∅))))
20		ovex 7183	. . . . . . . . . . 11 ⊢ (𝑥 supp ∅) ∈ V
21	8, 13, 14, 15, 16	cantnfcl 9124	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑆) → ( E We (𝑥 supp ∅) ∧ dom OrdIso( E , (𝑥 supp ∅)) ∈ ω))
22	21	simpld 497	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑆) → E We (𝑥 supp ∅))
23	15	oien 8996	. . . . . . . . . . 11 ⊢ (((𝑥 supp ∅) ∈ V ∧ E We (𝑥 supp ∅)) → dom OrdIso( E , (𝑥 supp ∅)) ≈ (𝑥 supp ∅))
24	20, 22, 23	sylancr 589	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑆) → dom OrdIso( E , (𝑥 supp ∅)) ≈ (𝑥 supp ∅))
25	24	adantr 483	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑆) ∧ 𝐴 = ∅) → dom OrdIso( E , (𝑥 supp ∅)) ≈ (𝑥 supp ∅))
26		suppssdm 7837	. . . . . . . . . . 11 ⊢ (𝑥 supp ∅) ⊆ dom 𝑥
27	8, 5, 6	cantnfs 9123	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑥 ∈ 𝑆 ↔ (𝑥:𝐵⟶𝐴 ∧ 𝑥 finSupp ∅)))
28	27	simprbda 501	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑆) → 𝑥:𝐵⟶𝐴)
29	26, 28	fssdm 6524	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑆) → (𝑥 supp ∅) ⊆ 𝐵)
30		feq3 6491	. . . . . . . . . . . . . 14 ⊢ (𝐴 = ∅ → (𝑥:𝐵⟶𝐴 ↔ 𝑥:𝐵⟶∅))
31	28, 30	syl5ibcom 247	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑆) → (𝐴 = ∅ → 𝑥:𝐵⟶∅))
32	31	imp 409	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑆) ∧ 𝐴 = ∅) → 𝑥:𝐵⟶∅)
33		f00 6555	. . . . . . . . . . . 12 ⊢ (𝑥:𝐵⟶∅ ↔ (𝑥 = ∅ ∧ 𝐵 = ∅))
34	32, 33	sylib 220	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑆) ∧ 𝐴 = ∅) → (𝑥 = ∅ ∧ 𝐵 = ∅))
35	34	simprd 498	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑆) ∧ 𝐴 = ∅) → 𝐵 = ∅)
36		sseq0 4352	. . . . . . . . . 10 ⊢ (((𝑥 supp ∅) ⊆ 𝐵 ∧ 𝐵 = ∅) → (𝑥 supp ∅) = ∅)
37	29, 35, 36	syl2an2r 683	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑆) ∧ 𝐴 = ∅) → (𝑥 supp ∅) = ∅)
38	25, 37	breqtrd 5084	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑆) ∧ 𝐴 = ∅) → dom OrdIso( E , (𝑥 supp ∅)) ≈ ∅)
39		en0 8566	. . . . . . . 8 ⊢ (dom OrdIso( E , (𝑥 supp ∅)) ≈ ∅ ↔ dom OrdIso( E , (𝑥 supp ∅)) = ∅)
40	38, 39	sylib 220	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑆) ∧ 𝐴 = ∅) → dom OrdIso( E , (𝑥 supp ∅)) = ∅)
41	40	fveq2d 6668	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑆) ∧ 𝐴 = ∅) → (seqω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴 ↑o (OrdIso( E , (𝑥 supp ∅))‘𝑘)) ·o (𝑥‘(OrdIso( E , (𝑥 supp ∅))‘𝑘))) +o 𝑧)), ∅)‘dom OrdIso( E , (𝑥 supp ∅))) = (seqω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴 ↑o (OrdIso( E , (𝑥 supp ∅))‘𝑘)) ·o (𝑥‘(OrdIso( E , (𝑥 supp ∅))‘𝑘))) +o 𝑧)), ∅)‘∅))
42		0ex 5203	. . . . . . 7 ⊢ ∅ ∈ V
43	17	seqom0g 8086	. . . . . . 7 ⊢ (∅ ∈ V → (seqω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴 ↑o (OrdIso( E , (𝑥 supp ∅))‘𝑘)) ·o (𝑥‘(OrdIso( E , (𝑥 supp ∅))‘𝑘))) +o 𝑧)), ∅)‘∅) = ∅)
44	42, 43	mp1i 13	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑆) ∧ 𝐴 = ∅) → (seqω((𝑘 ∈ V, 𝑧 ∈ V ↦ (((𝐴 ↑o (OrdIso( E , (𝑥 supp ∅))‘𝑘)) ·o (𝑥‘(OrdIso( E , (𝑥 supp ∅))‘𝑘))) +o 𝑧)), ∅)‘∅) = ∅)
45	19, 41, 44	3eqtrd 2860	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑆) ∧ 𝐴 = ∅) → ((𝐴 CNF 𝐵)‘𝑥) = ∅)
46		el1o 8118	. . . . 5 ⊢ (((𝐴 CNF 𝐵)‘𝑥) ∈ 1o ↔ ((𝐴 CNF 𝐵)‘𝑥) = ∅)
47	45, 46	sylibr 236	. . . 4 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑆) ∧ 𝐴 = ∅) → ((𝐴 CNF 𝐵)‘𝑥) ∈ 1o)
48	35	oveq2d 7166	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑆) ∧ 𝐴 = ∅) → (𝐴 ↑o 𝐵) = (𝐴 ↑o ∅))
49	13	adantr 483	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑆) ∧ 𝐴 = ∅) → 𝐴 ∈ On)
50		oe0 8141	. . . . . 6 ⊢ (𝐴 ∈ On → (𝐴 ↑o ∅) = 1o)
51	49, 50	syl 17	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑆) ∧ 𝐴 = ∅) → (𝐴 ↑o ∅) = 1o)
52	48, 51	eqtrd 2856	. . . 4 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑆) ∧ 𝐴 = ∅) → (𝐴 ↑o 𝐵) = 1o)
53	47, 52	eleqtrrd 2916	. . 3 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑆) ∧ 𝐴 = ∅) → ((𝐴 CNF 𝐵)‘𝑥) ∈ (𝐴 ↑o 𝐵))
54	13	adantr 483	. . . 4 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑆) ∧ 𝐴 ≠ ∅) → 𝐴 ∈ On)
55	14	adantr 483	. . . 4 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑆) ∧ 𝐴 ≠ ∅) → 𝐵 ∈ On)
56	16	adantr 483	. . . 4 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑆) ∧ 𝐴 ≠ ∅) → 𝑥 ∈ 𝑆)
57		on0eln0 6240	. . . . . 6 ⊢ (𝐴 ∈ On → (∅ ∈ 𝐴 ↔ 𝐴 ≠ ∅))
58	13, 57	syl 17	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑆) → (∅ ∈ 𝐴 ↔ 𝐴 ≠ ∅))
59	58	biimpar 480	. . . 4 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑆) ∧ 𝐴 ≠ ∅) → ∅ ∈ 𝐴)
60	29	adantr 483	. . . 4 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑆) ∧ 𝐴 ≠ ∅) → (𝑥 supp ∅) ⊆ 𝐵)
61	8, 54, 55, 56, 59, 55, 60	cantnflt2 9130	. . 3 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝑆) ∧ 𝐴 ≠ ∅) → ((𝐴 CNF 𝐵)‘𝑥) ∈ (𝐴 ↑o 𝐵))
62	53, 61	pm2.61dane 3104	. 2 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑆) → ((𝐴 CNF 𝐵)‘𝑥) ∈ (𝐴 ↑o 𝐵))
63	3, 12, 62	fmpt2d 6881	1 ⊢ (𝜑 → (𝐴 CNF 𝐵):𝑆⟶(𝐴 ↑o 𝐵))

Syntax hints:   → wi 4   ↔ wb 208   ∧ wa 398   = wceq 1533   ∈ wcel 2110   ≠ wne 3016  {crab 3142  Vcvv 3494  ⦋csb 3882   ⊆ wss 3935  ∅c0 4290   class class class wbr 5058   ↦ cmpt 5138   E cep 5458   We wwe 5507  dom cdm 5549  Oncon0 6185  ⟶wf 6345  ‘cfv 6349  (class class class)co 7150   ∈ cmpo 7152  ωcom 7574   supp csupp 7824  seq_ωcseqom 8077  1_oc1o 8089   +_o coa 8093   ·_o comu 8094   ↑_o coe 8095   ↑_m cmap 8400   ≈ cen 8500   finSupp cfsupp 8827  OrdIsocoi 8967   CNF ccnf 9118

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1907  ax-6 1966  ax-7 2011  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2157  ax-12 2173  ax-ext 2793  ax-rep 5182  ax-sep 5195  ax-nul 5202  ax-pow 5258  ax-pr 5321  ax-un 7455

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1536  df-fal 1546  df-ex 1777  df-nf 1781  df-sb 2066  df-mo 2618  df-eu 2650  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ne 3017  df-ral 3143  df-rex 3144  df-reu 3145  df-rmo 3146  df-rab 3147  df-v 3496  df-sbc 3772  df-csb 3883  df-dif 3938  df-un 3940  df-in 3942  df-ss 3951  df-pss 3953  df-nul 4291  df-if 4467  df-pw 4540  df-sn 4561  df-pr 4563  df-tp 4565  df-op 4567  df-uni 4832  df-iun 4913  df-br 5059  df-opab 5121  df-mpt 5139  df-tr 5165  df-id 5454  df-eprel 5459  df-po 5468  df-so 5469  df-fr 5508  df-se 5509  df-we 5510  df-xp 5555  df-rel 5556  df-cnv 5557  df-co 5558  df-dm 5559  df-rn 5560  df-res 5561  df-ima 5562  df-pred 6142  df-ord 6188  df-on 6189  df-lim 6190  df-suc 6191  df-iota 6308  df-fun 6351  df-fn 6352  df-f 6353  df-f1 6354  df-fo 6355  df-f1o 6356  df-fv 6357  df-isom 6358  df-riota 7108  df-ov 7153  df-oprab 7154  df-mpo 7155  df-om 7575  df-1st 7683  df-2nd 7684  df-supp 7825  df-wrecs 7941  df-recs 8002  df-rdg 8040  df-seqom 8078  df-1o 8096  df-2o 8097  df-oadd 8100  df-omul 8101  df-oexp 8102  df-er 8283  df-map 8402  df-en 8504  df-dom 8505  df-sdom 8506  df-fin 8507  df-fsupp 8828  df-oi 8968  df-cnf 9119

This theorem is referenced by:  cantnfp1  9138  cantnflem1  9146  cantnflem3  9148  cantnflem4  9149  cantnf  9150