Theorem mrcuni 17801

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 488	. . 3 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → 𝐶 ∈ (Moore‘𝑋))
2		simpll 779	. . . . . . 7 ⊢ (((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) ∧ 𝑠 ∈ 𝑈) → 𝐶 ∈ (Moore‘𝑋))
3		ssel2 3903	. . . . . . . . 9 ⊢ ((𝑈 ⊆ 𝒫 𝑋 ∧ 𝑠 ∈ 𝑈) → 𝑠 ∈ 𝒫 𝑋)
4	3	elpwid 4565	. . . . . . . 8 ⊢ ((𝑈 ⊆ 𝒫 𝑋 ∧ 𝑠 ∈ 𝑈) → 𝑠 ⊆ 𝑋)
5	4	adantll 727	. . . . . . 7 ⊢ (((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) ∧ 𝑠 ∈ 𝑈) → 𝑠 ⊆ 𝑋)
6		mrcfval.f	. . . . . . . 8 ⊢ 𝐹 = (mrCls‘𝐶)
7	6	mrcssid 17797	. . . . . . 7 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑠 ⊆ 𝑋) → 𝑠 ⊆ (𝐹‘𝑠))
8	2, 5, 7	syl2anc 596	. . . . . 6 ⊢ (((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) ∧ 𝑠 ∈ 𝑈) → 𝑠 ⊆ (𝐹‘𝑠))
9	6	mrcf 17789	. . . . . . . . . . 11 ⊢ (𝐶 ∈ (Moore‘𝑋) → 𝐹:𝒫 𝑋⟶𝐶)
10	9	ffund 6715	. . . . . . . . . 10 ⊢ (𝐶 ∈ (Moore‘𝑋) → Fun 𝐹)
11	10	adantr 486	. . . . . . . . 9 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → Fun 𝐹)
12	9	fdmd 6721	. . . . . . . . . . 11 ⊢ (𝐶 ∈ (Moore‘𝑋) → dom 𝐹 = 𝒫 𝑋)
13	12	sseq2d 3940	. . . . . . . . . 10 ⊢ (𝐶 ∈ (Moore‘𝑋) → (𝑈 ⊆ dom 𝐹 ↔ 𝑈 ⊆ 𝒫 𝑋))
14	13	biimpar 483	. . . . . . . . 9 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → 𝑈 ⊆ dom 𝐹)
15		funfvima2 7238	. . . . . . . . 9 ⊢ ((Fun 𝐹 ∧ 𝑈 ⊆ dom 𝐹) → (𝑠 ∈ 𝑈 → (𝐹‘𝑠) ∈ (𝐹 “ 𝑈)))
16	11, 14, 15	syl2anc 596	. . . . . . . 8 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → (𝑠 ∈ 𝑈 → (𝐹‘𝑠) ∈ (𝐹 “ 𝑈)))
17	16	imp 412	. . . . . . 7 ⊢ (((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) ∧ 𝑠 ∈ 𝑈) → (𝐹‘𝑠) ∈ (𝐹 “ 𝑈))
18		elssuni 4898	. . . . . . 7 ⊢ ((𝐹‘𝑠) ∈ (𝐹 “ 𝑈) → (𝐹‘𝑠) ⊆ ∪ (𝐹 “ 𝑈))
19	17, 18	syl 18	. . . . . 6 ⊢ (((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) ∧ 𝑠 ∈ 𝑈) → (𝐹‘𝑠) ⊆ ∪ (𝐹 “ 𝑈))
20	8, 19	sstrd 3918	. . . . 5 ⊢ (((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) ∧ 𝑠 ∈ 𝑈) → 𝑠 ⊆ ∪ (𝐹 “ 𝑈))
21	20	ralrimiva 3154	. . . 4 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → ∀𝑠 ∈ 𝑈 𝑠 ⊆ ∪ (𝐹 “ 𝑈))
22		unissb 4900	. . . 4 ⊢ (∪ 𝑈 ⊆ ∪ (𝐹 “ 𝑈) ↔ ∀𝑠 ∈ 𝑈 𝑠 ⊆ ∪ (𝐹 “ 𝑈))
23	21, 22	sylibr 237	. . 3 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → ∪ 𝑈 ⊆ ∪ (𝐹 “ 𝑈))
24	6	mrcssv 17794	. . . . . . 7 ⊢ (𝐶 ∈ (Moore‘𝑋) → (𝐹‘𝑥) ⊆ 𝑋)
25	24	adantr 486	. . . . . 6 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → (𝐹‘𝑥) ⊆ 𝑋)
26	25	ralrimivw 3158	. . . . 5 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → ∀𝑥 ∈ 𝑈 (𝐹‘𝑥) ⊆ 𝑋)
27	9	ffnd 6711	. . . . . 6 ⊢ (𝐶 ∈ (Moore‘𝑋) → 𝐹 Fn 𝒫 𝑋)
28		sseq1 3933	. . . . . . 7 ⊢ (𝑠 = (𝐹‘𝑥) → (𝑠 ⊆ 𝑋 ↔ (𝐹‘𝑥) ⊆ 𝑋))
29	28	ralima 7244	. . . . . 6 ⊢ ((𝐹 Fn 𝒫 𝑋 ∧ 𝑈 ⊆ 𝒫 𝑋) → (∀𝑠 ∈ (𝐹 “ 𝑈)𝑠 ⊆ 𝑋 ↔ ∀𝑥 ∈ 𝑈 (𝐹‘𝑥) ⊆ 𝑋))
30	27, 29	sylan 592	. . . . 5 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → (∀𝑠 ∈ (𝐹 “ 𝑈)𝑠 ⊆ 𝑋 ↔ ∀𝑥 ∈ 𝑈 (𝐹‘𝑥) ⊆ 𝑋))
31	26, 30	mpbird 260	. . . 4 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → ∀𝑠 ∈ (𝐹 “ 𝑈)𝑠 ⊆ 𝑋)
32		unissb 4900	. . . 4 ⊢ (∪ (𝐹 “ 𝑈) ⊆ 𝑋 ↔ ∀𝑠 ∈ (𝐹 “ 𝑈)𝑠 ⊆ 𝑋)
33	31, 32	sylibr 237	. . 3 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → ∪ (𝐹 “ 𝑈) ⊆ 𝑋)
34	6	mrcss 17796	. . 3 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ ∪ 𝑈 ⊆ ∪ (𝐹 “ 𝑈) ∧ ∪ (𝐹 “ 𝑈) ⊆ 𝑋) → (𝐹‘∪ 𝑈) ⊆ (𝐹‘∪ (𝐹 “ 𝑈)))
35	1, 23, 33, 34	syl3anc 1398	. 2 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → (𝐹‘∪ 𝑈) ⊆ (𝐹‘∪ (𝐹 “ 𝑈)))
36		simpll 779	. . . . . . . 8 ⊢ (((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) ∧ 𝑥 ∈ 𝑈) → 𝐶 ∈ (Moore‘𝑋))
37		elssuni 4898	. . . . . . . . 9 ⊢ (𝑥 ∈ 𝑈 → 𝑥 ⊆ ∪ 𝑈)
38	37	adantl 487	. . . . . . . 8 ⊢ (((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) ∧ 𝑥 ∈ 𝑈) → 𝑥 ⊆ ∪ 𝑈)
39		sspwuni 5059	. . . . . . . . . 10 ⊢ (𝑈 ⊆ 𝒫 𝑋 ↔ ∪ 𝑈 ⊆ 𝑋)
40	39	bilani 510	. . . . . . . . 9 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → ∪ 𝑈 ⊆ 𝑋)
41	40	adantr 486	. . . . . . . 8 ⊢ (((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) ∧ 𝑥 ∈ 𝑈) → ∪ 𝑈 ⊆ 𝑋)
42	6	mrcss 17796	. . . . . . . 8 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑥 ⊆ ∪ 𝑈 ∧ ∪ 𝑈 ⊆ 𝑋) → (𝐹‘𝑥) ⊆ (𝐹‘∪ 𝑈))
43	36, 38, 41, 42	syl3anc 1398	. . . . . . 7 ⊢ (((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) ∧ 𝑥 ∈ 𝑈) → (𝐹‘𝑥) ⊆ (𝐹‘∪ 𝑈))
44	43	ralrimiva 3154	. . . . . 6 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → ∀𝑥 ∈ 𝑈 (𝐹‘𝑥) ⊆ (𝐹‘∪ 𝑈))
45		sseq1 3933	. . . . . . . 8 ⊢ (𝑠 = (𝐹‘𝑥) → (𝑠 ⊆ (𝐹‘∪ 𝑈) ↔ (𝐹‘𝑥) ⊆ (𝐹‘∪ 𝑈)))
46	45	ralima 7244	. . . . . . 7 ⊢ ((𝐹 Fn 𝒫 𝑋 ∧ 𝑈 ⊆ 𝒫 𝑋) → (∀𝑠 ∈ (𝐹 “ 𝑈)𝑠 ⊆ (𝐹‘∪ 𝑈) ↔ ∀𝑥 ∈ 𝑈 (𝐹‘𝑥) ⊆ (𝐹‘∪ 𝑈)))
47	27, 46	sylan 592	. . . . . 6 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → (∀𝑠 ∈ (𝐹 “ 𝑈)𝑠 ⊆ (𝐹‘∪ 𝑈) ↔ ∀𝑥 ∈ 𝑈 (𝐹‘𝑥) ⊆ (𝐹‘∪ 𝑈)))
48	44, 47	mpbird 260	. . . . 5 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → ∀𝑠 ∈ (𝐹 “ 𝑈)𝑠 ⊆ (𝐹‘∪ 𝑈))
49		unissb 4900	. . . . 5 ⊢ (∪ (𝐹 “ 𝑈) ⊆ (𝐹‘∪ 𝑈) ↔ ∀𝑠 ∈ (𝐹 “ 𝑈)𝑠 ⊆ (𝐹‘∪ 𝑈))
50	48, 49	sylibr 237	. . . 4 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → ∪ (𝐹 “ 𝑈) ⊆ (𝐹‘∪ 𝑈))
51	6	mrcssv 17794	. . . . 5 ⊢ (𝐶 ∈ (Moore‘𝑋) → (𝐹‘∪ 𝑈) ⊆ 𝑋)
52	51	adantr 486	. . . 4 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → (𝐹‘∪ 𝑈) ⊆ 𝑋)
53	6	mrcss 17796	. . . 4 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ ∪ (𝐹 “ 𝑈) ⊆ (𝐹‘∪ 𝑈) ∧ (𝐹‘∪ 𝑈) ⊆ 𝑋) → (𝐹‘∪ (𝐹 “ 𝑈)) ⊆ (𝐹‘(𝐹‘∪ 𝑈)))
54	1, 50, 52, 53	syl3anc 1398	. . 3 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → (𝐹‘∪ (𝐹 “ 𝑈)) ⊆ (𝐹‘(𝐹‘∪ 𝑈)))
55	6	mrcidm 17799	. . . 4 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ ∪ 𝑈 ⊆ 𝑋) → (𝐹‘(𝐹‘∪ 𝑈)) = (𝐹‘∪ 𝑈))
56	1, 40, 55	syl2anc 596	. . 3 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → (𝐹‘(𝐹‘∪ 𝑈)) = (𝐹‘∪ 𝑈))
57	54, 56	sseqtrd 3944	. 2 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → (𝐹‘∪ (𝐹 “ 𝑈)) ⊆ (𝐹‘∪ 𝑈))
58	35, 57	eqssd 3925	1 ⊢ ((𝐶 ∈ (Moore‘𝑋) ∧ 𝑈 ⊆ 𝒫 𝑋) → (𝐹‘∪ 𝑈) = (𝐹‘∪ (𝐹 “ 𝑈)))

This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   = wceq 1569   ∈ wcel 2144  ∀wral 3076   ⊆ wss 3895  𝒫 cpw 4556  ∪ cuni 4866  dom cdm 5650   “ cima 5653  Fun wfun 6533   Fn wfn 6534  ‘cfv 6539  Moorecmre 17758  mrClscmrc 17759

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1942  ax-6 1999  ax-7 2040  ax-8 2146  ax-9 2154  ax-10 2177  ax-11 2193  ax-12 2212  ax-ext 2732  ax-sep 5248  ax-nul 5259  ax-pow 5326  ax-pr 5390  ax-un 7752

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3an 1105  df-tru 1572  df-fal 1582  df-ex 1812  df-nf 1816  df-sb 2099  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-ral 3077  df-rex 3087  df-rab 3413  df-v 3452  df-sbc 3739  df-csb 3847  df-ss 3896  df-dif 4047  df-in 4091  df-un 4151  df-nul 4279  df-if 4482  df-pw 4558  df-sn 4585  df-pr 4587  df-op 4835  df-uni 4867  df-int 4907  df-br 5103  df-opab 5167  df-mpt 5186  df-id 5545  df-xp 5656  df-rel 5657  df-cnv 5658  df-co 5659  df-dm 5660  df-rn 5661  df-res 5662  df-ima 5663  df-iota 6494  df-fun 6541  df-fn 6542  df-f 6543  df-fv 6547  df-mre 17762  df-mrc 17763

This theorem is used by:  mrcun  17802  isacs4lem  18724