Theorem mrcuni 17636

Description: Idempotence of closure under a general union. (Contributed by Stefan O'Rear, 31-Jan-2015.)

Hypothesis

Ref	Expression
mrcfval.f	⊢ 𝐹 = (mrCls‘𝐶)

Assertion

Ref	Expression
mrcuni	⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → (𝐹‘∪ 𝑈) = (𝐹‘∪ (𝐹 “ 𝑈)))

Proof of Theorem mrcuni

Dummy variables 𝑥 𝑠 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		simpl 486	. . 3 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → 𝐶 ∈ (Moore‘𝑋))
2		simpll 776	. . . . . . 7 ⊢ (((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) ∧ 𝑠 ∈ 𝑈) → 𝐶 ∈ (Moore‘𝑋))
3		ssel2 3931	. . . . . . . . 9 ⊢ ((𝑈 ⊆ 𝒫 𝑋 ∧ 𝑠 ∈ 𝑈) → 𝑠 ∈ 𝒫 𝑋)
4	3	elpwid 4563	. . . . . . . 8 ⊢ ((𝑈 ⊆ 𝒫 𝑋 ∧ 𝑠 ∈ 𝑈) → 𝑠 ⊆ 𝑋)
5	4	adantll 724	. . . . . . 7 ⊢ (((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) ∧ 𝑠 ∈ 𝑈) → 𝑠 ⊆ 𝑋)
6		mrcfval.f	. . . . . . . 8 ⊢ 𝐹 = (mrCls‘𝐶)
7	6	mrcssid 17632	. . . . . . 7 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑠 ⊆ 𝑋) → 𝑠 ⊆ (𝐹‘𝑠))
8	2, 5, 7	syl2anc 593	. . . . . 6 ⊢ (((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) ∧ 𝑠 ∈ 𝑈) → 𝑠 ⊆ (𝐹‘𝑠))
9	6	mrcf 17624	. . . . . . . . . . 11 ⊢ (𝐶 ∈ (Moore‘𝑋) → 𝐹:𝒫 𝑋⟶𝐶)
10	9	ffund 6692	. . . . . . . . . 10 ⊢ (𝐶 ∈ (Moore‘𝑋) → Fun 𝐹)
11	10	adantr 484	. . . . . . . . 9 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → Fun 𝐹)
12	9	fdmd 6698	. . . . . . . . . . 11 ⊢ (𝐶 ∈ (Moore‘𝑋) → dom 𝐹 = 𝒫 𝑋)
13	12	sseq2d 3968	. . . . . . . . . 10 ⊢ (𝐶 ∈ (Moore‘𝑋) → (𝑈 ⊆ dom 𝐹 ↔ 𝑈 ⊆ 𝒫 𝑋))
14	13	biimpar 481	. . . . . . . . 9 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → 𝑈 ⊆ dom 𝐹)
15		funfvima2 7211	. . . . . . . . 9 ⊢ ((Fun 𝐹 ∧ 𝑈 ⊆ dom 𝐹) → (𝑠 ∈ 𝑈 → (𝐹‘𝑠) ∈ (𝐹 “ 𝑈)))
16	11, 14, 15	syl2anc 593	. . . . . . . 8 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → (𝑠 ∈ 𝑈 → (𝐹‘𝑠) ∈ (𝐹 “ 𝑈)))
17	16	imp 410	. . . . . . 7 ⊢ (((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) ∧ 𝑠 ∈ 𝑈) → (𝐹‘𝑠) ∈ (𝐹 “ 𝑈))
18		elssuni 4896	. . . . . . 7 ⊢ ((𝐹‘𝑠) ∈ (𝐹 “ 𝑈) → (𝐹‘𝑠) ⊆ ∪ (𝐹 “ 𝑈))
19	17, 18	syl 17	. . . . . 6 ⊢ (((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) ∧ 𝑠 ∈ 𝑈) → (𝐹‘𝑠) ⊆ ∪ (𝐹 “ 𝑈))
20	8, 19	sstrd 3946	. . . . 5 ⊢ (((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) ∧ 𝑠 ∈ 𝑈) → 𝑠 ⊆ ∪ (𝐹 “ 𝑈))
21	20	ralrimiva 3153	. . . 4 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → ∀𝑠 ∈ 𝑈 𝑠 ⊆ ∪ (𝐹 “ 𝑈))
22		unissb 4898	. . . 4 ⊢ (∪ 𝑈 ⊆ ∪ (𝐹 “ 𝑈) ↔ ∀𝑠 ∈ 𝑈 𝑠 ⊆ ∪ (𝐹 “ 𝑈))
23	21, 22	sylibr 236	. . 3 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → ∪ 𝑈 ⊆ ∪ (𝐹 “ 𝑈))
24	6	mrcssv 17629	. . . . . . 7 ⊢ (𝐶 ∈ (Moore‘𝑋) → (𝐹‘𝑥) ⊆ 𝑋)
25	24	adantr 484	. . . . . 6 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → (𝐹‘𝑥) ⊆ 𝑋)
26	25	ralrimivw 3157	. . . . 5 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → ∀𝑥 ∈ 𝑈 (𝐹‘𝑥) ⊆ 𝑋)
27	9	ffnd 6688	. . . . . 6 ⊢ (𝐶 ∈ (Moore‘𝑋) → 𝐹 Fn 𝒫 𝑋)
28		sseq1 3961	. . . . . . 7 ⊢ (𝑠 = (𝐹‘𝑥) → (𝑠 ⊆ 𝑋 ↔ (𝐹‘𝑥) ⊆ 𝑋))
29	28	ralima 7217	. . . . . 6 ⊢ ((𝐹 Fn 𝒫 𝑋 ∧ 𝑈 ⊆ 𝒫 𝑋) → (∀𝑠 ∈ (𝐹 “ 𝑈)𝑠 ⊆ 𝑋 ↔ ∀𝑥 ∈ 𝑈 (𝐹‘𝑥) ⊆ 𝑋))
30	27, 29	sylan 589	. . . . 5 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → (∀𝑠 ∈ (𝐹 “ 𝑈)𝑠 ⊆ 𝑋 ↔ ∀𝑥 ∈ 𝑈 (𝐹‘𝑥) ⊆ 𝑋))
31	26, 30	mpbird 259	. . . 4 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → ∀𝑠 ∈ (𝐹 “ 𝑈)𝑠 ⊆ 𝑋)
32		unissb 4898	. . . 4 ⊢ (∪ (𝐹 “ 𝑈) ⊆ 𝑋 ↔ ∀𝑠 ∈ (𝐹 “ 𝑈)𝑠 ⊆ 𝑋)
33	31, 32	sylibr 236	. . 3 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → ∪ (𝐹 “ 𝑈) ⊆ 𝑋)
34	6	mrcss 17631	. . 3 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ ∪ 𝑈 ⊆ ∪ (𝐹 “ 𝑈) ∧ ∪ (𝐹 “ 𝑈) ⊆ 𝑋) → (𝐹‘∪ 𝑈) ⊆ (𝐹‘∪ (𝐹 “ 𝑈)))
35	1, 23, 33, 34	syl3anc 1389	. 2 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → (𝐹‘∪ 𝑈) ⊆ (𝐹‘∪ (𝐹 “ 𝑈)))
36		simpll 776	. . . . . . . 8 ⊢ (((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) ∧ 𝑥 ∈ 𝑈) → 𝐶 ∈ (Moore‘𝑋))
37		elssuni 4896	. . . . . . . . 9 ⊢ (𝑥 ∈ 𝑈 → 𝑥 ⊆ ∪ 𝑈)
38	37	adantl 485	. . . . . . . 8 ⊢ (((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) ∧ 𝑥 ∈ 𝑈) → 𝑥 ⊆ ∪ 𝑈)
39		sspwuni 5056	. . . . . . . . . 10 ⊢ (𝑈 ⊆ 𝒫 𝑋 ↔ ∪ 𝑈 ⊆ 𝑋)
40	39	bilani 508	. . . . . . . . 9 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → ∪ 𝑈 ⊆ 𝑋)
41	40	adantr 484	. . . . . . . 8 ⊢ (((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) ∧ 𝑥 ∈ 𝑈) → ∪ 𝑈 ⊆ 𝑋)
42	6	mrcss 17631	. . . . . . . 8 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑥 ⊆ ∪ 𝑈 ∧ ∪ 𝑈 ⊆ 𝑋) → (𝐹‘𝑥) ⊆ (𝐹‘∪ 𝑈))
43	36, 38, 41, 42	syl3anc 1389	. . . . . . 7 ⊢ (((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) ∧ 𝑥 ∈ 𝑈) → (𝐹‘𝑥) ⊆ (𝐹‘∪ 𝑈))
44	43	ralrimiva 3153	. . . . . 6 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → ∀𝑥 ∈ 𝑈 (𝐹‘𝑥) ⊆ (𝐹‘∪ 𝑈))
45		sseq1 3961	. . . . . . . 8 ⊢ (𝑠 = (𝐹‘𝑥) → (𝑠 ⊆ (𝐹‘∪ 𝑈) ↔ (𝐹‘𝑥) ⊆ (𝐹‘∪ 𝑈)))
46	45	ralima 7217	. . . . . . 7 ⊢ ((𝐹 Fn 𝒫 𝑋 ∧ 𝑈 ⊆ 𝒫 𝑋) → (∀𝑠 ∈ (𝐹 “ 𝑈)𝑠 ⊆ (𝐹‘∪ 𝑈) ↔ ∀𝑥 ∈ 𝑈 (𝐹‘𝑥) ⊆ (𝐹‘∪ 𝑈)))
47	27, 46	sylan 589	. . . . . 6 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → (∀𝑠 ∈ (𝐹 “ 𝑈)𝑠 ⊆ (𝐹‘∪ 𝑈) ↔ ∀𝑥 ∈ 𝑈 (𝐹‘𝑥) ⊆ (𝐹‘∪ 𝑈)))
48	44, 47	mpbird 259	. . . . 5 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → ∀𝑠 ∈ (𝐹 “ 𝑈)𝑠 ⊆ (𝐹‘∪ 𝑈))
49		unissb 4898	. . . . 5 ⊢ (∪ (𝐹 “ 𝑈) ⊆ (𝐹‘∪ 𝑈) ↔ ∀𝑠 ∈ (𝐹 “ 𝑈)𝑠 ⊆ (𝐹‘∪ 𝑈))
50	48, 49	sylibr 236	. . . 4 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → ∪ (𝐹 “ 𝑈) ⊆ (𝐹‘∪ 𝑈))
51	6	mrcssv 17629	. . . . 5 ⊢ (𝐶 ∈ (Moore‘𝑋) → (𝐹‘∪ 𝑈) ⊆ 𝑋)
52	51	adantr 484	. . . 4 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → (𝐹‘∪ 𝑈) ⊆ 𝑋)
53	6	mrcss 17631	. . . 4 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ ∪ (𝐹 “ 𝑈) ⊆ (𝐹‘∪ 𝑈) ∧ (𝐹‘∪ 𝑈) ⊆ 𝑋) → (𝐹‘∪ (𝐹 “ 𝑈)) ⊆ (𝐹‘(𝐹‘∪ 𝑈)))
54	1, 50, 52, 53	syl3anc 1389	. . 3 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → (𝐹‘∪ (𝐹 “ 𝑈)) ⊆ (𝐹‘(𝐹‘∪ 𝑈)))
55	6	mrcidm 17634	. . . 4 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ ∪ 𝑈 ⊆ 𝑋) → (𝐹‘(𝐹‘∪ 𝑈)) = (𝐹‘∪ 𝑈))
56	1, 40, 55	syl2anc 593	. . 3 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → (𝐹‘(𝐹‘∪ 𝑈)) = (𝐹‘∪ 𝑈))
57	54, 56	sseqtrd 3972	. 2 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → (𝐹‘∪ (𝐹 “ 𝑈)) ⊆ (𝐹‘∪ 𝑈))
58	35, 57	eqssd 3953	1 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → (𝐹‘∪ 𝑈) = (𝐹‘∪ (𝐹 “ 𝑈)))

Syntax hints:   → wi 4   ↔ wb 208   ∧ wa 399   = wceq 1559   ∈ wcel 2141  ∀wral 3075   ⊆ wss 3904  𝒫 cpw 4554  ∪ cuni 4864  dom cdm 5645   “ cima 5648  Fun wfun 6511   Fn wfn 6512  ‘cfv 6517  Moorecmre 17593  mrClscmrc 17594

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1814  ax-4 1828  ax-5 1929  ax-6 1986  ax-7 2027  ax-8 2143  ax-9 2151  ax-10 2174  ax-11 2190  ax-12 2211  ax-ext 2733  ax-sep 5245  ax-nul 5255  ax-pow 5321  ax-pr 5389  ax-un 7714

This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3an 1099  df-tru 1562  df-fal 1572  df-ex 1799  df-nf 1803  df-sb 2090  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-ral 3076  df-rex 3086  df-rab 3414  df-v 3455  df-sbc 3745  df-csb 3853  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-nul 4286  df-if 4480  df-pw 4556  df-sn 4582  df-pr 4584  df-op 4588  df-uni 4865  df-int 4905  df-br 5100  df-opab 5162  df-mpt 5181  df-id 5540  df-xp 5651  df-rel 5652  df-cnv 5653  df-co 5654  df-dm 5655  df-rn 5656  df-res 5657  df-ima 5658  df-iota 6473  df-fun 6519  df-fn 6520  df-f 6521  df-fv 6525  df-mre 17597  df-mrc 17598

This theorem is referenced by:  mrcun  17637  isacs4lem  18559