Theorem sigapildsyslem 34192

Description: Lemma for sigapildsys 34193. (Contributed by Thierry Arnoux, 13-Jun-2020.)

Hypotheses

Ref	Expression
dynkin.p	⊢ 𝑃 = {𝑠 ∈ 𝒫 𝒫 𝑂 ∣ (fi‘𝑠) ⊆ 𝑠}
dynkin.l	⊢ 𝐿 = {𝑠 ∈ 𝒫 𝒫 𝑂 ∣ (∅ ∈ 𝑠 ∧ ∀𝑥 ∈ 𝑠 (𝑂 ∖ 𝑥) ∈ 𝑠 ∧ ∀𝑥 ∈ 𝒫 𝑠((𝑥 ≼ ω ∧ Disj 𝑦 ∈ 𝑥 𝑦) → ∪ 𝑥 ∈ 𝑠))}
sigapildsyslem.n	⊢ Ⅎ𝑛𝜑
sigapildsyslem.1	⊢ (𝜑 → 𝑡 ∈ (𝑃 ∩ 𝐿))
sigapildsyslem.2	⊢ (𝜑 → 𝐴 ∈ 𝑡)
sigapildsyslem.3	⊢ (𝜑 → 𝑁 ∈ Fin)
sigapildsyslem.4	⊢ ((𝜑 ∧ 𝑛 ∈ 𝑁) → 𝐵 ∈ 𝑡)

Assertion

Ref	Expression
sigapildsyslem	⊢ (𝜑 → (𝐴 ∖ ∪ 𝑛 ∈ 𝑁 𝐵) ∈ 𝑡)

Distinct variable groups:   𝑛,𝑠,𝑡,𝑥,𝑦   𝑛,𝐿,𝑡,𝑥,𝑦   𝑂,𝑠,𝑡,𝑥   𝑃,𝑛,𝑡,𝑥,𝑦   𝐴,𝑛   𝑥,𝐵   𝑛,𝑁,𝑥

Allowed substitution hints:   𝜑(𝑥,𝑦,𝑡,𝑛,𝑠)   𝐴(𝑥,𝑦,𝑡,𝑠)   𝐵(𝑦,𝑡,𝑛,𝑠)   𝑃(𝑠)   𝐿(𝑠)   𝑁(𝑦,𝑡,𝑠)   𝑂(𝑦,𝑛)

Proof of Theorem sigapildsyslem

Step	Hyp	Ref	Expression
1		iuneq1 4984	. . . . . . 7 ⊢ (𝑁 = ∅ → ∪ 𝑛 ∈ 𝑁 𝐵 = ∪ 𝑛 ∈ ∅ 𝐵)
2		0iun 5039	. . . . . . 7 ⊢ ∪ 𝑛 ∈ ∅ 𝐵 = ∅
3	1, 2	eqtrdi 2786	. . . . . 6 ⊢ (𝑁 = ∅ → ∪ 𝑛 ∈ 𝑁 𝐵 = ∅)
4	3	difeq2d 4101	. . . . 5 ⊢ (𝑁 = ∅ → (𝐴 ∖ ∪ 𝑛 ∈ 𝑁 𝐵) = (𝐴 ∖ ∅))
5		dif0 4353	. . . . 5 ⊢ (𝐴 ∖ ∅) = 𝐴
6	4, 5	eqtrdi 2786	. . . 4 ⊢ (𝑁 = ∅ → (𝐴 ∖ ∪ 𝑛 ∈ 𝑁 𝐵) = 𝐴)
7	6	adantl 481	. . 3 ⊢ ((𝜑 ∧ 𝑁 = ∅) → (𝐴 ∖ ∪ 𝑛 ∈ 𝑁 𝐵) = 𝐴)
8		sigapildsyslem.2	. . . 4 ⊢ (𝜑 → 𝐴 ∈ 𝑡)
9	8	adantr 480	. . 3 ⊢ ((𝜑 ∧ 𝑁 = ∅) → 𝐴 ∈ 𝑡)
10	7, 9	eqeltrd 2834	. 2 ⊢ ((𝜑 ∧ 𝑁 = ∅) → (𝐴 ∖ ∪ 𝑛 ∈ 𝑁 𝐵) ∈ 𝑡)
11		iindif2 5053	. . . 4 ⊢ (𝑁 ≠ ∅ → ∩ 𝑛 ∈ 𝑁 (𝐴 ∖ 𝐵) = (𝐴 ∖ ∪ 𝑛 ∈ 𝑁 𝐵))
12	11	adantl 481	. . 3 ⊢ ((𝜑 ∧ 𝑁 ≠ ∅) → ∩ 𝑛 ∈ 𝑁 (𝐴 ∖ 𝐵) = (𝐴 ∖ ∪ 𝑛 ∈ 𝑁 𝐵))
13		sigapildsyslem.1	. . . . . . . 8 ⊢ (𝜑 → 𝑡 ∈ (𝑃 ∩ 𝐿))
14	13	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑁 ≠ ∅) → 𝑡 ∈ (𝑃 ∩ 𝐿))
15	14	elin1d 4179	. . . . . 6 ⊢ ((𝜑 ∧ 𝑁 ≠ ∅) → 𝑡 ∈ 𝑃)
16		dynkin.p	. . . . . . 7 ⊢ 𝑃 = {𝑠 ∈ 𝒫 𝒫 𝑂 ∣ (fi‘𝑠) ⊆ 𝑠}
17	16	ispisys 34183	. . . . . 6 ⊢ (𝑡 ∈ 𝑃 ↔ (𝑡 ∈ 𝒫 𝒫 𝑂 ∧ (fi‘𝑡) ⊆ 𝑡))
18	15, 17	sylib 218	. . . . 5 ⊢ ((𝜑 ∧ 𝑁 ≠ ∅) → (𝑡 ∈ 𝒫 𝒫 𝑂 ∧ (fi‘𝑡) ⊆ 𝑡))
19	18	simprd 495	. . . 4 ⊢ ((𝜑 ∧ 𝑁 ≠ ∅) → (fi‘𝑡) ⊆ 𝑡)
20		sigapildsyslem.n	. . . . . . 7 ⊢ Ⅎ𝑛𝜑
21		nfv 1914	. . . . . . 7 ⊢ Ⅎ𝑛 𝑁 ≠ ∅
22	20, 21	nfan 1899	. . . . . 6 ⊢ Ⅎ𝑛(𝜑 ∧ 𝑁 ≠ ∅)
23	18	simpld 494	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑁 ≠ ∅) → 𝑡 ∈ 𝒫 𝒫 𝑂)
24	23	elpwid 4584	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑁 ≠ ∅) → 𝑡 ⊆ 𝒫 𝑂)
25	8	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑁 ≠ ∅) → 𝐴 ∈ 𝑡)
26	24, 25	sseldd 3959	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑁 ≠ ∅) → 𝐴 ∈ 𝒫 𝑂)
27	26	elpwid 4584	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑁 ≠ ∅) → 𝐴 ⊆ 𝑂)
28	27	adantr 480	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑁 ≠ ∅) ∧ 𝑛 ∈ 𝑁) → 𝐴 ⊆ 𝑂)
29		difin2 4276	. . . . . . . . 9 ⊢ (𝐴 ⊆ 𝑂 → (𝐴 ∖ 𝐵) = ((𝑂 ∖ 𝐵) ∩ 𝐴))
30	28, 29	syl 17	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑁 ≠ ∅) ∧ 𝑛 ∈ 𝑁) → (𝐴 ∖ 𝐵) = ((𝑂 ∖ 𝐵) ∩ 𝐴))
31	19	adantr 480	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑁 ≠ ∅) ∧ 𝑛 ∈ 𝑁) → (fi‘𝑡) ⊆ 𝑡)
32	14	adantr 480	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑁 ≠ ∅) ∧ 𝑛 ∈ 𝑁) → 𝑡 ∈ (𝑃 ∩ 𝐿))
33	14	elin2d 4180	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑁 ≠ ∅) → 𝑡 ∈ 𝐿)
34		dynkin.l	. . . . . . . . . . . . . . . 16 ⊢ 𝐿 = {𝑠 ∈ 𝒫 𝒫 𝑂 ∣ (∅ ∈ 𝑠 ∧ ∀𝑥 ∈ 𝑠 (𝑂 ∖ 𝑥) ∈ 𝑠 ∧ ∀𝑥 ∈ 𝒫 𝑠((𝑥 ≼ ω ∧ Disj 𝑦 ∈ 𝑥 𝑦) → ∪ 𝑥 ∈ 𝑠))}
35	34	isldsys 34187	. . . . . . . . . . . . . . 15 ⊢ (𝑡 ∈ 𝐿 ↔ (𝑡 ∈ 𝒫 𝒫 𝑂 ∧ (∅ ∈ 𝑡 ∧ ∀𝑥 ∈ 𝑡 (𝑂 ∖ 𝑥) ∈ 𝑡 ∧ ∀𝑥 ∈ 𝒫 𝑡((𝑥 ≼ ω ∧ Disj 𝑦 ∈ 𝑥 𝑦) → ∪ 𝑥 ∈ 𝑡))))
36	33, 35	sylib 218	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑁 ≠ ∅) → (𝑡 ∈ 𝒫 𝒫 𝑂 ∧ (∅ ∈ 𝑡 ∧ ∀𝑥 ∈ 𝑡 (𝑂 ∖ 𝑥) ∈ 𝑡 ∧ ∀𝑥 ∈ 𝒫 𝑡((𝑥 ≼ ω ∧ Disj 𝑦 ∈ 𝑥 𝑦) → ∪ 𝑥 ∈ 𝑡))))
37	36	simprd 495	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑁 ≠ ∅) → (∅ ∈ 𝑡 ∧ ∀𝑥 ∈ 𝑡 (𝑂 ∖ 𝑥) ∈ 𝑡 ∧ ∀𝑥 ∈ 𝒫 𝑡((𝑥 ≼ ω ∧ Disj 𝑦 ∈ 𝑥 𝑦) → ∪ 𝑥 ∈ 𝑡)))
38	37	simp2d 1143	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑁 ≠ ∅) → ∀𝑥 ∈ 𝑡 (𝑂 ∖ 𝑥) ∈ 𝑡)
39	38	adantr 480	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑁 ≠ ∅) ∧ 𝑛 ∈ 𝑁) → ∀𝑥 ∈ 𝑡 (𝑂 ∖ 𝑥) ∈ 𝑡)
40		sigapildsyslem.4	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ 𝑁) → 𝐵 ∈ 𝑡)
41	40	adantlr 715	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑁 ≠ ∅) ∧ 𝑛 ∈ 𝑁) → 𝐵 ∈ 𝑡)
42		nfv 1914	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑥(𝑂 ∖ 𝐵) ∈ 𝑡
43		difeq2 4095	. . . . . . . . . . . . . 14 ⊢ (𝑥 = 𝐵 → (𝑂 ∖ 𝑥) = (𝑂 ∖ 𝐵))
44	43	eleq1d 2819	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝐵 → ((𝑂 ∖ 𝑥) ∈ 𝑡 ↔ (𝑂 ∖ 𝐵) ∈ 𝑡))
45	42, 44	rspc 3589	. . . . . . . . . . . 12 ⊢ (𝐵 ∈ 𝑡 → (∀𝑥 ∈ 𝑡 (𝑂 ∖ 𝑥) ∈ 𝑡 → (𝑂 ∖ 𝐵) ∈ 𝑡))
46	41, 45	syl 17	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑁 ≠ ∅) ∧ 𝑛 ∈ 𝑁) → (∀𝑥 ∈ 𝑡 (𝑂 ∖ 𝑥) ∈ 𝑡 → (𝑂 ∖ 𝐵) ∈ 𝑡))
47	39, 46	mpd 15	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑁 ≠ ∅) ∧ 𝑛 ∈ 𝑁) → (𝑂 ∖ 𝐵) ∈ 𝑡)
48	25	adantr 480	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑁 ≠ ∅) ∧ 𝑛 ∈ 𝑁) → 𝐴 ∈ 𝑡)
49		inelfi 9430	. . . . . . . . . 10 ⊢ ((𝑡 ∈ (𝑃 ∩ 𝐿) ∧ (𝑂 ∖ 𝐵) ∈ 𝑡 ∧ 𝐴 ∈ 𝑡) → ((𝑂 ∖ 𝐵) ∩ 𝐴) ∈ (fi‘𝑡))
50	32, 47, 48, 49	syl3anc 1373	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑁 ≠ ∅) ∧ 𝑛 ∈ 𝑁) → ((𝑂 ∖ 𝐵) ∩ 𝐴) ∈ (fi‘𝑡))
51	31, 50	sseldd 3959	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑁 ≠ ∅) ∧ 𝑛 ∈ 𝑁) → ((𝑂 ∖ 𝐵) ∩ 𝐴) ∈ 𝑡)
52	30, 51	eqeltrd 2834	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑁 ≠ ∅) ∧ 𝑛 ∈ 𝑁) → (𝐴 ∖ 𝐵) ∈ 𝑡)
53	52	ex 412	. . . . . 6 ⊢ ((𝜑 ∧ 𝑁 ≠ ∅) → (𝑛 ∈ 𝑁 → (𝐴 ∖ 𝐵) ∈ 𝑡))
54	22, 53	ralrimi 3240	. . . . 5 ⊢ ((𝜑 ∧ 𝑁 ≠ ∅) → ∀𝑛 ∈ 𝑁 (𝐴 ∖ 𝐵) ∈ 𝑡)
55		simpr 484	. . . . 5 ⊢ ((𝜑 ∧ 𝑁 ≠ ∅) → 𝑁 ≠ ∅)
56		sigapildsyslem.3	. . . . . 6 ⊢ (𝜑 → 𝑁 ∈ Fin)
57	56	adantr 480	. . . . 5 ⊢ ((𝜑 ∧ 𝑁 ≠ ∅) → 𝑁 ∈ Fin)
58		vex 3463	. . . . . 6 ⊢ 𝑡 ∈ V
59		iinfi 9429	. . . . . 6 ⊢ ((𝑡 ∈ V ∧ (∀𝑛 ∈ 𝑁 (𝐴 ∖ 𝐵) ∈ 𝑡 ∧ 𝑁 ≠ ∅ ∧ 𝑁 ∈ Fin)) → ∩ 𝑛 ∈ 𝑁 (𝐴 ∖ 𝐵) ∈ (fi‘𝑡))
60	58, 59	mpan 690	. . . . 5 ⊢ ((∀𝑛 ∈ 𝑁 (𝐴 ∖ 𝐵) ∈ 𝑡 ∧ 𝑁 ≠ ∅ ∧ 𝑁 ∈ Fin) → ∩ 𝑛 ∈ 𝑁 (𝐴 ∖ 𝐵) ∈ (fi‘𝑡))
61	54, 55, 57, 60	syl3anc 1373	. . . 4 ⊢ ((𝜑 ∧ 𝑁 ≠ ∅) → ∩ 𝑛 ∈ 𝑁 (𝐴 ∖ 𝐵) ∈ (fi‘𝑡))
62	19, 61	sseldd 3959	. . 3 ⊢ ((𝜑 ∧ 𝑁 ≠ ∅) → ∩ 𝑛 ∈ 𝑁 (𝐴 ∖ 𝐵) ∈ 𝑡)
63	12, 62	eqeltrrd 2835	. 2 ⊢ ((𝜑 ∧ 𝑁 ≠ ∅) → (𝐴 ∖ ∪ 𝑛 ∈ 𝑁 𝐵) ∈ 𝑡)
64	10, 63	pm2.61dane 3019	1 ⊢ (𝜑 → (𝐴 ∖ ∪ 𝑛 ∈ 𝑁 𝐵) ∈ 𝑡)

Syntax hints:   → wi 4   ∧ wa 395   ∧ w3a 1086   = wceq 1540  Ⅎwnf 1783   ∈ wcel 2108   ≠ wne 2932  ∀wral 3051  {crab 3415  Vcvv 3459   ∖ cdif 3923   ∩ cin 3925   ⊆ wss 3926  ∅c0 4308  𝒫 cpw 4575  ∪ cuni 4883  ∪ ciun 4967  ∩ ciin 4968  Disj wdisj 5086   class class class wbr 5119  ‘cfv 6531  ωcom 7861   ≼ cdom 8957  Fincfn 8959  ficfi 9422

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2157  ax-12 2177  ax-ext 2707  ax-sep 5266  ax-nul 5276  ax-pow 5335  ax-pr 5402  ax-un 7729

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2065  df-mo 2539  df-eu 2568  df-clab 2714  df-cleq 2727  df-clel 2809  df-nfc 2885  df-ne 2933  df-ral 3052  df-rex 3061  df-reu 3360  df-rab 3416  df-v 3461  df-sbc 3766  df-dif 3929  df-un 3931  df-in 3933  df-ss 3943  df-pss 3946  df-nul 4309  df-if 4501  df-pw 4577  df-sn 4602  df-pr 4604  df-op 4608  df-uni 4884  df-int 4923  df-iun 4969  df-iin 4970  df-br 5120  df-opab 5182  df-mpt 5202  df-tr 5230  df-id 5548  df-eprel 5553  df-po 5561  df-so 5562  df-fr 5606  df-we 5608  df-xp 5660  df-rel 5661  df-cnv 5662  df-co 5663  df-dm 5664  df-rn 5665  df-res 5666  df-ima 5667  df-ord 6355  df-on 6356  df-lim 6357  df-suc 6358  df-iota 6484  df-fun 6533  df-fn 6534  df-f 6535  df-f1 6536  df-fo 6537  df-f1o 6538  df-fv 6539  df-om 7862  df-1o 8480  df-2o 8481  df-en 8960  df-dom 8961  df-fin 8963  df-fi 9423

This theorem is referenced by:  sigapildsys  34193