Theorem acsfn1p 38295

Description: Construction of a closure rule from a one-parameter partial operation. (Contributed by Stefan O'Rear, 12-Sep-2015.)

Assertion

Ref	Expression
acsfn1p	⊢ ((𝑋 ∈ 𝑉 ∧ ∀𝑏 ∈ 𝑌 𝐸 ∈ 𝑋) → {𝑎 ∈ 𝒫 𝑋 ∣ ∀𝑏 ∈ (𝑎 ∩ 𝑌)𝐸 ∈ 𝑎} ∈ (ACS‘𝑋))

Distinct variable groups:   𝑎,𝑏,𝑉   𝐸,𝑎   𝑋,𝑎,𝑏   𝑌,𝑎,𝑏

Allowed substitution hint:   𝐸(𝑏)

Proof of Theorem acsfn1p

Step	Hyp	Ref	Expression
1		riinrab 4730	. . 3 ⊢ (𝒫 𝑋 ∩ ∩ 𝑏 ∈ (𝑋 ∩ 𝑌){𝑎 ∈ 𝒫 𝑋 ∣ ({𝑏} ⊆ 𝑎 → 𝐸 ∈ 𝑎)}) = {𝑎 ∈ 𝒫 𝑋 ∣ ∀𝑏 ∈ (𝑋 ∩ 𝑌)({𝑏} ⊆ 𝑎 → 𝐸 ∈ 𝑎)}
2		elpwi 4307	. . . . . . . 8 ⊢ (𝑎 ∈ 𝒫 𝑋 → 𝑎 ⊆ 𝑋)
3	2	ssrind 3988	. . . . . . 7 ⊢ (𝑎 ∈ 𝒫 𝑋 → (𝑎 ∩ 𝑌) ⊆ (𝑋 ∩ 𝑌))
4	3	adantl 467	. . . . . 6 ⊢ (((𝑋 ∈ 𝑉 ∧ ∀𝑏 ∈ 𝑌 𝐸 ∈ 𝑋) ∧ 𝑎 ∈ 𝒫 𝑋) → (𝑎 ∩ 𝑌) ⊆ (𝑋 ∩ 𝑌))
5		ralss 3817	. . . . . 6 ⊢ ((𝑎 ∩ 𝑌) ⊆ (𝑋 ∩ 𝑌) → (∀𝑏 ∈ (𝑎 ∩ 𝑌)𝐸 ∈ 𝑎 ↔ ∀𝑏 ∈ (𝑋 ∩ 𝑌)(𝑏 ∈ (𝑎 ∩ 𝑌) → 𝐸 ∈ 𝑎)))
6	4, 5	syl 17	. . . . 5 ⊢ (((𝑋 ∈ 𝑉 ∧ ∀𝑏 ∈ 𝑌 𝐸 ∈ 𝑋) ∧ 𝑎 ∈ 𝒫 𝑋) → (∀𝑏 ∈ (𝑎 ∩ 𝑌)𝐸 ∈ 𝑎 ↔ ∀𝑏 ∈ (𝑋 ∩ 𝑌)(𝑏 ∈ (𝑎 ∩ 𝑌) → 𝐸 ∈ 𝑎)))
7		inss2 3982	. . . . . . . . . 10 ⊢ (𝑋 ∩ 𝑌) ⊆ 𝑌
8	7	sseli 3748	. . . . . . . . 9 ⊢ (𝑏 ∈ (𝑋 ∩ 𝑌) → 𝑏 ∈ 𝑌)
9	8	biantrud 515	. . . . . . . 8 ⊢ (𝑏 ∈ (𝑋 ∩ 𝑌) → (𝑏 ∈ 𝑎 ↔ (𝑏 ∈ 𝑎 ∧ 𝑏 ∈ 𝑌)))
10		vex 3354	. . . . . . . . . 10 ⊢ 𝑏 ∈ V
11	10	snss 4451	. . . . . . . . 9 ⊢ (𝑏 ∈ 𝑎 ↔ {𝑏} ⊆ 𝑎)
12	11	bicomi 214	. . . . . . . 8 ⊢ ({𝑏} ⊆ 𝑎 ↔ 𝑏 ∈ 𝑎)
13		elin 3947	. . . . . . . 8 ⊢ (𝑏 ∈ (𝑎 ∩ 𝑌) ↔ (𝑏 ∈ 𝑎 ∧ 𝑏 ∈ 𝑌))
14	9, 12, 13	3bitr4g 303	. . . . . . 7 ⊢ (𝑏 ∈ (𝑋 ∩ 𝑌) → ({𝑏} ⊆ 𝑎 ↔ 𝑏 ∈ (𝑎 ∩ 𝑌)))
15	14	imbi1d 330	. . . . . 6 ⊢ (𝑏 ∈ (𝑋 ∩ 𝑌) → (({𝑏} ⊆ 𝑎 → 𝐸 ∈ 𝑎) ↔ (𝑏 ∈ (𝑎 ∩ 𝑌) → 𝐸 ∈ 𝑎)))
16	15	ralbiia 3128	. . . . 5 ⊢ (∀𝑏 ∈ (𝑋 ∩ 𝑌)({𝑏} ⊆ 𝑎 → 𝐸 ∈ 𝑎) ↔ ∀𝑏 ∈ (𝑋 ∩ 𝑌)(𝑏 ∈ (𝑎 ∩ 𝑌) → 𝐸 ∈ 𝑎))
17	6, 16	syl6rbbr 279	. . . 4 ⊢ (((𝑋 ∈ 𝑉 ∧ ∀𝑏 ∈ 𝑌 𝐸 ∈ 𝑋) ∧ 𝑎 ∈ 𝒫 𝑋) → (∀𝑏 ∈ (𝑋 ∩ 𝑌)({𝑏} ⊆ 𝑎 → 𝐸 ∈ 𝑎) ↔ ∀𝑏 ∈ (𝑎 ∩ 𝑌)𝐸 ∈ 𝑎))
18	17	rabbidva 3338	. . 3 ⊢ ((𝑋 ∈ 𝑉 ∧ ∀𝑏 ∈ 𝑌 𝐸 ∈ 𝑋) → {𝑎 ∈ 𝒫 𝑋 ∣ ∀𝑏 ∈ (𝑋 ∩ 𝑌)({𝑏} ⊆ 𝑎 → 𝐸 ∈ 𝑎)} = {𝑎 ∈ 𝒫 𝑋 ∣ ∀𝑏 ∈ (𝑎 ∩ 𝑌)𝐸 ∈ 𝑎})
19	1, 18	syl5eq 2817	. 2 ⊢ ((𝑋 ∈ 𝑉 ∧ ∀𝑏 ∈ 𝑌 𝐸 ∈ 𝑋) → (𝒫 𝑋 ∩ ∩ 𝑏 ∈ (𝑋 ∩ 𝑌){𝑎 ∈ 𝒫 𝑋 ∣ ({𝑏} ⊆ 𝑎 → 𝐸 ∈ 𝑎)}) = {𝑎 ∈ 𝒫 𝑋 ∣ ∀𝑏 ∈ (𝑎 ∩ 𝑌)𝐸 ∈ 𝑎})
20		mreacs 16526	. . . 4 ⊢ (𝑋 ∈ 𝑉 → (ACS‘𝑋) ∈ (Moore‘𝒫 𝑋))
21	20	adantr 466	. . 3 ⊢ ((𝑋 ∈ 𝑉 ∧ ∀𝑏 ∈ 𝑌 𝐸 ∈ 𝑋) → (ACS‘𝑋) ∈ (Moore‘𝒫 𝑋))
22		ssralv 3815	. . . . . 6 ⊢ ((𝑋 ∩ 𝑌) ⊆ 𝑌 → (∀𝑏 ∈ 𝑌 𝐸 ∈ 𝑋 → ∀𝑏 ∈ (𝑋 ∩ 𝑌)𝐸 ∈ 𝑋))
23	7, 22	ax-mp 5	. . . . 5 ⊢ (∀𝑏 ∈ 𝑌 𝐸 ∈ 𝑋 → ∀𝑏 ∈ (𝑋 ∩ 𝑌)𝐸 ∈ 𝑋)
24		simpll 742	. . . . . . . 8 ⊢ (((𝑋 ∈ 𝑉 ∧ 𝑏 ∈ (𝑋 ∩ 𝑌)) ∧ 𝐸 ∈ 𝑋) → 𝑋 ∈ 𝑉)
25		simpr 471	. . . . . . . 8 ⊢ (((𝑋 ∈ 𝑉 ∧ 𝑏 ∈ (𝑋 ∩ 𝑌)) ∧ 𝐸 ∈ 𝑋) → 𝐸 ∈ 𝑋)
26		inss1 3981	. . . . . . . . . . 11 ⊢ (𝑋 ∩ 𝑌) ⊆ 𝑋
27	26	sseli 3748	. . . . . . . . . 10 ⊢ (𝑏 ∈ (𝑋 ∩ 𝑌) → 𝑏 ∈ 𝑋)
28	27	ad2antlr 698	. . . . . . . . 9 ⊢ (((𝑋 ∈ 𝑉 ∧ 𝑏 ∈ (𝑋 ∩ 𝑌)) ∧ 𝐸 ∈ 𝑋) → 𝑏 ∈ 𝑋)
29	28	snssd 4475	. . . . . . . 8 ⊢ (((𝑋 ∈ 𝑉 ∧ 𝑏 ∈ (𝑋 ∩ 𝑌)) ∧ 𝐸 ∈ 𝑋) → {𝑏} ⊆ 𝑋)
30		snfi 8194	. . . . . . . . 9 ⊢ {𝑏} ∈ Fin
31	30	a1i 11	. . . . . . . 8 ⊢ (((𝑋 ∈ 𝑉 ∧ 𝑏 ∈ (𝑋 ∩ 𝑌)) ∧ 𝐸 ∈ 𝑋) → {𝑏} ∈ Fin)
32		acsfn 16527	. . . . . . . 8 ⊢ (((𝑋 ∈ 𝑉 ∧ 𝐸 ∈ 𝑋) ∧ ({𝑏} ⊆ 𝑋 ∧ {𝑏} ∈ Fin)) → {𝑎 ∈ 𝒫 𝑋 ∣ ({𝑏} ⊆ 𝑎 → 𝐸 ∈ 𝑎)} ∈ (ACS‘𝑋))
33	24, 25, 29, 31, 32	syl22anc 1477	. . . . . . 7 ⊢ (((𝑋 ∈ 𝑉 ∧ 𝑏 ∈ (𝑋 ∩ 𝑌)) ∧ 𝐸 ∈ 𝑋) → {𝑎 ∈ 𝒫 𝑋 ∣ ({𝑏} ⊆ 𝑎 → 𝐸 ∈ 𝑎)} ∈ (ACS‘𝑋))
34	33	ex 397	. . . . . 6 ⊢ ((𝑋 ∈ 𝑉 ∧ 𝑏 ∈ (𝑋 ∩ 𝑌)) → (𝐸 ∈ 𝑋 → {𝑎 ∈ 𝒫 𝑋 ∣ ({𝑏} ⊆ 𝑎 → 𝐸 ∈ 𝑎)} ∈ (ACS‘𝑋)))
35	34	ralimdva 3111	. . . . 5 ⊢ (𝑋 ∈ 𝑉 → (∀𝑏 ∈ (𝑋 ∩ 𝑌)𝐸 ∈ 𝑋 → ∀𝑏 ∈ (𝑋 ∩ 𝑌){𝑎 ∈ 𝒫 𝑋 ∣ ({𝑏} ⊆ 𝑎 → 𝐸 ∈ 𝑎)} ∈ (ACS‘𝑋)))
36	23, 35	syl5 34	. . . 4 ⊢ (𝑋 ∈ 𝑉 → (∀𝑏 ∈ 𝑌 𝐸 ∈ 𝑋 → ∀𝑏 ∈ (𝑋 ∩ 𝑌){𝑎 ∈ 𝒫 𝑋 ∣ ({𝑏} ⊆ 𝑎 → 𝐸 ∈ 𝑎)} ∈ (ACS‘𝑋)))
37	36	imp 393	. . 3 ⊢ ((𝑋 ∈ 𝑉 ∧ ∀𝑏 ∈ 𝑌 𝐸 ∈ 𝑋) → ∀𝑏 ∈ (𝑋 ∩ 𝑌){𝑎 ∈ 𝒫 𝑋 ∣ ({𝑏} ⊆ 𝑎 → 𝐸 ∈ 𝑎)} ∈ (ACS‘𝑋))
38		mreriincl 16466	. . 3 ⊢ (((ACS‘𝑋) ∈ (Moore‘𝒫 𝑋) ∧ ∀𝑏 ∈ (𝑋 ∩ 𝑌){𝑎 ∈ 𝒫 𝑋 ∣ ({𝑏} ⊆ 𝑎 → 𝐸 ∈ 𝑎)} ∈ (ACS‘𝑋)) → (𝒫 𝑋 ∩ ∩ 𝑏 ∈ (𝑋 ∩ 𝑌){𝑎 ∈ 𝒫 𝑋 ∣ ({𝑏} ⊆ 𝑎 → 𝐸 ∈ 𝑎)}) ∈ (ACS‘𝑋))
39	21, 37, 38	syl2anc 565	. 2 ⊢ ((𝑋 ∈ 𝑉 ∧ ∀𝑏 ∈ 𝑌 𝐸 ∈ 𝑋) → (𝒫 𝑋 ∩ ∩ 𝑏 ∈ (𝑋 ∩ 𝑌){𝑎 ∈ 𝒫 𝑋 ∣ ({𝑏} ⊆ 𝑎 → 𝐸 ∈ 𝑎)}) ∈ (ACS‘𝑋))
40	19, 39	eqeltrrd 2851	1 ⊢ ((𝑋 ∈ 𝑉 ∧ ∀𝑏 ∈ 𝑌 𝐸 ∈ 𝑋) → {𝑎 ∈ 𝒫 𝑋 ∣ ∀𝑏 ∈ (𝑎 ∩ 𝑌)𝐸 ∈ 𝑎} ∈ (ACS‘𝑋))

Syntax hints:   → wi 4   ↔ wb 196   ∧ wa 382   ∈ wcel 2145  ∀wral 3061  {crab 3065   ∩ cin 3722   ⊆ wss 3723  𝒫 cpw 4297  {csn 4316  ∩ ciin 4655  ‘cfv 6031  Fincfn 8109  Moorecmre 16450  ACScacs 16453

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1870  ax-4 1885  ax-5 1991  ax-6 2057  ax-7 2093  ax-8 2147  ax-9 2154  ax-10 2174  ax-11 2190  ax-12 2203  ax-13 2408  ax-ext 2751  ax-sep 4915  ax-nul 4923  ax-pow 4974  ax-pr 5034  ax-un 7096

This theorem depends on definitions:  df-bi 197  df-an 383  df-or 827  df-3or 1072  df-3an 1073  df-tru 1634  df-ex 1853  df-nf 1858  df-sb 2050  df-eu 2622  df-mo 2623  df-clab 2758  df-cleq 2764  df-clel 2767  df-nfc 2902  df-ne 2944  df-ral 3066  df-rex 3067  df-rab 3070  df-v 3353  df-sbc 3588  df-csb 3683  df-dif 3726  df-un 3728  df-in 3730  df-ss 3737  df-pss 3739  df-nul 4064  df-if 4226  df-pw 4299  df-sn 4317  df-pr 4319  df-tp 4321  df-op 4323  df-uni 4575  df-int 4612  df-iun 4656  df-iin 4657  df-br 4787  df-opab 4847  df-mpt 4864  df-tr 4887  df-id 5157  df-eprel 5162  df-po 5170  df-so 5171  df-fr 5208  df-we 5210  df-xp 5255  df-rel 5256  df-cnv 5257  df-co 5258  df-dm 5259  df-rn 5260  df-res 5261  df-ima 5262  df-ord 5869  df-on 5870  df-lim 5871  df-suc 5872  df-iota 5994  df-fun 6033  df-fn 6034  df-f 6035  df-f1 6036  df-fo 6037  df-f1o 6038  df-fv 6039  df-om 7213  df-1o 7713  df-en 8110  df-fin 8113  df-mre 16454  df-mrc 16455  df-acs 16457

This theorem is referenced by: (None)