Theorem suppvalbr 7688

Description: The value of the operation constructing the support of a function expressed by binary relations. (Contributed by AV, 7-Apr-2019.)

Assertion

Ref	Expression
suppvalbr	⊢ ((𝑅 ∈ 𝑉 ∧ 𝑍 ∈ 𝑊) → (𝑅 supp 𝑍) = {𝑥 ∣ (∃𝑦 𝑥𝑅𝑦 ∧ ∃𝑦(𝑥𝑅𝑦 ↔ 𝑦 ≠ 𝑍))})

Distinct variable groups:   𝑥,𝑅,𝑦   𝑥,𝑍,𝑦

Allowed substitution hints:   𝑉(𝑥,𝑦)   𝑊(𝑥,𝑦)

Proof of Theorem suppvalbr

Step	Hyp	Ref	Expression
1		suppval 7686	. 2 ⊢ ((𝑅 ∈ 𝑉 ∧ 𝑍 ∈ 𝑊) → (𝑅 supp 𝑍) = {𝑥 ∈ dom 𝑅 ∣ (𝑅 “ {𝑥}) ≠ {𝑍}})
2		df-rab 3113	. . . 4 ⊢ {𝑥 ∈ dom 𝑅 ∣ (𝑅 “ {𝑥}) ≠ {𝑍}} = {𝑥 ∣ (𝑥 ∈ dom 𝑅 ∧ (𝑅 “ {𝑥}) ≠ {𝑍})}
3		vex 3439	. . . . . . 7 ⊢ 𝑥 ∈ V
4	3	eldm 5658	. . . . . 6 ⊢ (𝑥 ∈ dom 𝑅 ↔ ∃𝑦 𝑥𝑅𝑦)
5		df-sn 4475	. . . . . . . 8 ⊢ {𝑍} = {𝑦 ∣ 𝑦 = 𝑍}
6	5	neeq2i 3048	. . . . . . 7 ⊢ ({𝑦 ∣ 𝑥𝑅𝑦} ≠ {𝑍} ↔ {𝑦 ∣ 𝑥𝑅𝑦} ≠ {𝑦 ∣ 𝑦 = 𝑍})
7		imasng 5830	. . . . . . . . 9 ⊢ (𝑥 ∈ V → (𝑅 “ {𝑥}) = {𝑦 ∣ 𝑥𝑅𝑦})
8	7	elv 3441	. . . . . . . 8 ⊢ (𝑅 “ {𝑥}) = {𝑦 ∣ 𝑥𝑅𝑦}
9	8	neeq1i 3047	. . . . . . 7 ⊢ ((𝑅 “ {𝑥}) ≠ {𝑍} ↔ {𝑦 ∣ 𝑥𝑅𝑦} ≠ {𝑍})
10		nabbi 3088	. . . . . . 7 ⊢ (∃𝑦(𝑥𝑅𝑦 ↔ ¬ 𝑦 = 𝑍) ↔ {𝑦 ∣ 𝑥𝑅𝑦} ≠ {𝑦 ∣ 𝑦 = 𝑍})
11	6, 9, 10	3bitr4i 304	. . . . . 6 ⊢ ((𝑅 “ {𝑥}) ≠ {𝑍} ↔ ∃𝑦(𝑥𝑅𝑦 ↔ ¬ 𝑦 = 𝑍))
12	4, 11	anbi12i 626	. . . . 5 ⊢ ((𝑥 ∈ dom 𝑅 ∧ (𝑅 “ {𝑥}) ≠ {𝑍}) ↔ (∃𝑦 𝑥𝑅𝑦 ∧ ∃𝑦(𝑥𝑅𝑦 ↔ ¬ 𝑦 = 𝑍)))
13	12	abbii 2860	. . . 4 ⊢ {𝑥 ∣ (𝑥 ∈ dom 𝑅 ∧ (𝑅 “ {𝑥}) ≠ {𝑍})} = {𝑥 ∣ (∃𝑦 𝑥𝑅𝑦 ∧ ∃𝑦(𝑥𝑅𝑦 ↔ ¬ 𝑦 = 𝑍))}
14	2, 13	eqtri 2818	. . 3 ⊢ {𝑥 ∈ dom 𝑅 ∣ (𝑅 “ {𝑥}) ≠ {𝑍}} = {𝑥 ∣ (∃𝑦 𝑥𝑅𝑦 ∧ ∃𝑦(𝑥𝑅𝑦 ↔ ¬ 𝑦 = 𝑍))}
15	14	a1i 11	. 2 ⊢ ((𝑅 ∈ 𝑉 ∧ 𝑍 ∈ 𝑊) → {𝑥 ∈ dom 𝑅 ∣ (𝑅 “ {𝑥}) ≠ {𝑍}} = {𝑥 ∣ (∃𝑦 𝑥𝑅𝑦 ∧ ∃𝑦(𝑥𝑅𝑦 ↔ ¬ 𝑦 = 𝑍))})
16		df-ne 2984	. . . . . . . 8 ⊢ (𝑦 ≠ 𝑍 ↔ ¬ 𝑦 = 𝑍)
17	16	bicomi 225	. . . . . . 7 ⊢ (¬ 𝑦 = 𝑍 ↔ 𝑦 ≠ 𝑍)
18	17	bibi2i 339	. . . . . 6 ⊢ ((𝑥𝑅𝑦 ↔ ¬ 𝑦 = 𝑍) ↔ (𝑥𝑅𝑦 ↔ 𝑦 ≠ 𝑍))
19	18	exbii 1830	. . . . 5 ⊢ (∃𝑦(𝑥𝑅𝑦 ↔ ¬ 𝑦 = 𝑍) ↔ ∃𝑦(𝑥𝑅𝑦 ↔ 𝑦 ≠ 𝑍))
20	19	anbi2i 622	. . . 4 ⊢ ((∃𝑦 𝑥𝑅𝑦 ∧ ∃𝑦(𝑥𝑅𝑦 ↔ ¬ 𝑦 = 𝑍)) ↔ (∃𝑦 𝑥𝑅𝑦 ∧ ∃𝑦(𝑥𝑅𝑦 ↔ 𝑦 ≠ 𝑍)))
21	20	abbii 2860	. . 3 ⊢ {𝑥 ∣ (∃𝑦 𝑥𝑅𝑦 ∧ ∃𝑦(𝑥𝑅𝑦 ↔ ¬ 𝑦 = 𝑍))} = {𝑥 ∣ (∃𝑦 𝑥𝑅𝑦 ∧ ∃𝑦(𝑥𝑅𝑦 ↔ 𝑦 ≠ 𝑍))}
22	21	a1i 11	. 2 ⊢ ((𝑅 ∈ 𝑉 ∧ 𝑍 ∈ 𝑊) → {𝑥 ∣ (∃𝑦 𝑥𝑅𝑦 ∧ ∃𝑦(𝑥𝑅𝑦 ↔ ¬ 𝑦 = 𝑍))} = {𝑥 ∣ (∃𝑦 𝑥𝑅𝑦 ∧ ∃𝑦(𝑥𝑅𝑦 ↔ 𝑦 ≠ 𝑍))})
23	1, 15, 22	3eqtrd 2834	1 ⊢ ((𝑅 ∈ 𝑉 ∧ 𝑍 ∈ 𝑊) → (𝑅 supp 𝑍) = {𝑥 ∣ (∃𝑦 𝑥𝑅𝑦 ∧ ∃𝑦(𝑥𝑅𝑦 ↔ 𝑦 ≠ 𝑍))})

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 207   ∧ wa 396   = wceq 1522  ∃wex 1762   ∈ wcel 2080  {cab 2774   ≠ wne 2983  {crab 3108  Vcvv 3436  {csn 4474   class class class wbr 4964  dom cdm 5446   “ cima 5449  (class class class)co 7019   supp csupp 7684

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1778  ax-4 1792  ax-5 1889  ax-6 1948  ax-7 1993  ax-8 2082  ax-9 2090  ax-10 2111  ax-11 2125  ax-12 2140  ax-13 2343  ax-ext 2768  ax-sep 5097  ax-nul 5104  ax-pr 5224  ax-un 7322

This theorem depends on definitions:  df-bi 208  df-an 397  df-or 843  df-3an 1082  df-tru 1525  df-ex 1763  df-nf 1767  df-sb 2042  df-mo 2575  df-eu 2611  df-clab 2775  df-cleq 2787  df-clel 2862  df-nfc 2934  df-ne 2984  df-ral 3109  df-rex 3110  df-rab 3113  df-v 3438  df-sbc 3708  df-dif 3864  df-un 3866  df-in 3868  df-ss 3876  df-nul 4214  df-if 4384  df-sn 4475  df-pr 4477  df-op 4481  df-uni 4748  df-br 4965  df-opab 5027  df-id 5351  df-xp 5452  df-rel 5453  df-cnv 5454  df-co 5455  df-dm 5456  df-rn 5457  df-res 5458  df-ima 5459  df-iota 6192  df-fun 6230  df-fv 6236  df-ov 7022  df-oprab 7023  df-mpo 7024  df-supp 7685

This theorem is referenced by:  suppimacnvss  7694  suppimacnv  7695