Theorem watfvalN 40357

Description: The W atoms function. (Contributed by NM, 26-Jan-2012.) (New usage is discouraged.)

Hypotheses

Ref	Expression
watomfval.a	⊢ 𝐴 = (Atoms‘𝐾)
watomfval.p	⊢ 𝑃 = (⊥𝑃‘𝐾)
watomfval.w	⊢ 𝑊 = (WAtoms‘𝐾)

Assertion

Ref	Expression
watfvalN	⊢ (𝐾 ∈ 𝐵 → 𝑊 = (𝑑 ∈ 𝐴 ↦ (𝐴 ∖ ((⊥𝑃‘𝐾)‘{𝑑}))))

Distinct variable groups:   𝐴,𝑑   𝐾,𝑑

Allowed substitution hints:   𝐵(𝑑)   𝑃(𝑑)   𝑊(𝑑)

Proof of Theorem watfvalN

Dummy variable 𝑘 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		elex 3463	. 2 ⊢ (𝐾 ∈ 𝐵 → 𝐾 ∈ V)
2		watomfval.w	. . 3 ⊢ 𝑊 = (WAtoms‘𝐾)
3		fveq2 6842	. . . . . 6 ⊢ (𝑘 = 𝐾 → (Atoms‘𝑘) = (Atoms‘𝐾))
4		watomfval.a	. . . . . 6 ⊢ 𝐴 = (Atoms‘𝐾)
5	3, 4	eqtr4di 2790	. . . . 5 ⊢ (𝑘 = 𝐾 → (Atoms‘𝑘) = 𝐴)
6		fveq2 6842	. . . . . . 7 ⊢ (𝑘 = 𝐾 → (⊥𝑃‘𝑘) = (⊥𝑃‘𝐾))
7	6	fveq1d 6844	. . . . . 6 ⊢ (𝑘 = 𝐾 → ((⊥𝑃‘𝑘)‘{𝑑}) = ((⊥𝑃‘𝐾)‘{𝑑}))
8	5, 7	difeq12d 4081	. . . . 5 ⊢ (𝑘 = 𝐾 → ((Atoms‘𝑘) ∖ ((⊥𝑃‘𝑘)‘{𝑑})) = (𝐴 ∖ ((⊥𝑃‘𝐾)‘{𝑑})))
9	5, 8	mpteq12dv 5187	. . . 4 ⊢ (𝑘 = 𝐾 → (𝑑 ∈ (Atoms‘𝑘) ↦ ((Atoms‘𝑘) ∖ ((⊥𝑃‘𝑘)‘{𝑑}))) = (𝑑 ∈ 𝐴 ↦ (𝐴 ∖ ((⊥𝑃‘𝐾)‘{𝑑}))))
10		df-watsN 40355	. . . 4 ⊢ WAtoms = (𝑘 ∈ V ↦ (𝑑 ∈ (Atoms‘𝑘) ↦ ((Atoms‘𝑘) ∖ ((⊥𝑃‘𝑘)‘{𝑑}))))
11	9, 10, 4	mptfvmpt 7184	. . 3 ⊢ (𝐾 ∈ V → (WAtoms‘𝐾) = (𝑑 ∈ 𝐴 ↦ (𝐴 ∖ ((⊥𝑃‘𝐾)‘{𝑑}))))
12	2, 11	eqtrid 2784	. 2 ⊢ (𝐾 ∈ V → 𝑊 = (𝑑 ∈ 𝐴 ↦ (𝐴 ∖ ((⊥𝑃‘𝐾)‘{𝑑}))))
13	1, 12	syl 17	1 ⊢ (𝐾 ∈ 𝐵 → 𝑊 = (𝑑 ∈ 𝐴 ↦ (𝐴 ∖ ((⊥𝑃‘𝐾)‘{𝑑}))))

Syntax hints:   → wi 4   = wceq 1542   ∈ wcel 2114  Vcvv 3442   ∖ cdif 3900  {csn 4582   ↦ cmpt 5181  ‘cfv 6500  Atomscatm 39628  ⊥_𝑃cpolN 40267  WAtomscwpointsN 40351

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5226  ax-sep 5243  ax-nul 5253  ax-pr 5379

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-ral 3053  df-rex 3063  df-reu 3353  df-rab 3402  df-v 3444  df-sbc 3743  df-csb 3852  df-dif 3906  df-un 3908  df-in 3910  df-ss 3920  df-nul 4288  df-if 4482  df-sn 4583  df-pr 4585  df-op 4589  df-uni 4866  df-iun 4950  df-br 5101  df-opab 5163  df-mpt 5182  df-id 5527  df-xp 5638  df-rel 5639  df-cnv 5640  df-co 5641  df-dm 5642  df-rn 5643  df-res 5644  df-ima 5645  df-iota 6456  df-fun 6502  df-fn 6503  df-f 6504  df-f1 6505  df-fo 6506  df-f1o 6507  df-fv 6508  df-watsN 40355

This theorem is referenced by:  watvalN  40358