Theorem suppimacnv 8178

Description: Support sets of functions expressed by inverse images. (Contributed by AV, 31-Mar-2019.) (Revised by AV, 7-Apr-2019.)

Assertion

Ref	Expression
suppimacnv	⊢ ((𝑅 ∈ 𝑉 ∧ 𝑍 ∈ 𝑊) → (𝑅 supp 𝑍) = (◡𝑅 “ (V ∖ {𝑍})))

Proof of Theorem suppimacnv

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

Step	Hyp	Ref	Expression
1		breq2 5128	. . . . . . . 8 ⊢ (𝑡 = 𝑠 → (𝑥𝑅𝑡 ↔ 𝑥𝑅𝑠))
2	1	cbvexvw 2037	. . . . . . 7 ⊢ (∃𝑡 𝑥𝑅𝑡 ↔ ∃𝑠 𝑥𝑅𝑠)
3		breq2 5128	. . . . . . . . . . . . . 14 ⊢ (𝑠 = 𝑍 → (𝑥𝑅𝑠 ↔ 𝑥𝑅𝑍))
4	3	anbi1d 631	. . . . . . . . . . . . 13 ⊢ (𝑠 = 𝑍 → ((𝑥𝑅𝑠 ∧ (𝑥𝑅𝑡 ↔ 𝑡 ≠ 𝑍)) ↔ (𝑥𝑅𝑍 ∧ (𝑥𝑅𝑡 ↔ 𝑡 ≠ 𝑍))))
5		bianir 1058	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑡 ≠ 𝑍 ∧ (𝑥𝑅𝑡 ↔ 𝑡 ≠ 𝑍)) → 𝑥𝑅𝑡)
6		vex 3468	. . . . . . . . . . . . . . . . . . . 20 ⊢ 𝑡 ∈ V
7		breq2 5128	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑦 = 𝑡 → (𝑥𝑅𝑦 ↔ 𝑥𝑅𝑡))
8		neeq1 2995	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑦 = 𝑡 → (𝑦 ≠ 𝑍 ↔ 𝑡 ≠ 𝑍))
9	7, 8	anbi12d 632	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑦 = 𝑡 → ((𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍) ↔ (𝑥𝑅𝑡 ∧ 𝑡 ≠ 𝑍)))
10	6, 9	spcev 3590	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑥𝑅𝑡 ∧ 𝑡 ≠ 𝑍) → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍))
11	10	ex 412	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥𝑅𝑡 → (𝑡 ≠ 𝑍 → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍)))
12	5, 11	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑡 ≠ 𝑍 ∧ (𝑥𝑅𝑡 ↔ 𝑡 ≠ 𝑍)) → (𝑡 ≠ 𝑍 → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍)))
13	12	ex 412	. . . . . . . . . . . . . . . 16 ⊢ (𝑡 ≠ 𝑍 → ((𝑥𝑅𝑡 ↔ 𝑡 ≠ 𝑍) → (𝑡 ≠ 𝑍 → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍))))
14	13	pm2.43a 54	. . . . . . . . . . . . . . 15 ⊢ (𝑡 ≠ 𝑍 → ((𝑥𝑅𝑡 ↔ 𝑡 ≠ 𝑍) → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍)))
15	14	adantld 490	. . . . . . . . . . . . . 14 ⊢ (𝑡 ≠ 𝑍 → ((𝑥𝑅𝑍 ∧ (𝑥𝑅𝑡 ↔ 𝑡 ≠ 𝑍)) → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍)))
16		nne 2937	. . . . . . . . . . . . . . . 16 ⊢ (¬ 𝑡 ≠ 𝑍 ↔ 𝑡 = 𝑍)
17		notbi 319	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑥𝑅𝑡 ↔ 𝑡 ≠ 𝑍) ↔ (¬ 𝑥𝑅𝑡 ↔ ¬ 𝑡 ≠ 𝑍))
18		bianir 1058	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((¬ 𝑡 ≠ 𝑍 ∧ (¬ 𝑥𝑅𝑡 ↔ ¬ 𝑡 ≠ 𝑍)) → ¬ 𝑥𝑅𝑡)
19		breq2 5128	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑍 = 𝑡 → (𝑥𝑅𝑍 ↔ 𝑥𝑅𝑡))
20	19	eqcoms 2744	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑡 = 𝑍 → (𝑥𝑅𝑍 ↔ 𝑥𝑅𝑡))
21		pm2.24 124	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑥𝑅𝑡 → (¬ 𝑥𝑅𝑡 → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍)))
22	20, 21	biimtrdi 253	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑡 = 𝑍 → (𝑥𝑅𝑍 → (¬ 𝑥𝑅𝑡 → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍))))
23	22	com13 88	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (¬ 𝑥𝑅𝑡 → (𝑥𝑅𝑍 → (𝑡 = 𝑍 → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍))))
24	18, 23	syl 17	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((¬ 𝑡 ≠ 𝑍 ∧ (¬ 𝑥𝑅𝑡 ↔ ¬ 𝑡 ≠ 𝑍)) → (𝑥𝑅𝑍 → (𝑡 = 𝑍 → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍))))
25	24	ex 412	. . . . . . . . . . . . . . . . . . . 20 ⊢ (¬ 𝑡 ≠ 𝑍 → ((¬ 𝑥𝑅𝑡 ↔ ¬ 𝑡 ≠ 𝑍) → (𝑥𝑅𝑍 → (𝑡 = 𝑍 → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍)))))
26	17, 25	biimtrid 242	. . . . . . . . . . . . . . . . . . 19 ⊢ (¬ 𝑡 ≠ 𝑍 → ((𝑥𝑅𝑡 ↔ 𝑡 ≠ 𝑍) → (𝑥𝑅𝑍 → (𝑡 = 𝑍 → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍)))))
27	26	com13 88	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥𝑅𝑍 → ((𝑥𝑅𝑡 ↔ 𝑡 ≠ 𝑍) → (¬ 𝑡 ≠ 𝑍 → (𝑡 = 𝑍 → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍)))))
28	27	imp 406	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑥𝑅𝑍 ∧ (𝑥𝑅𝑡 ↔ 𝑡 ≠ 𝑍)) → (¬ 𝑡 ≠ 𝑍 → (𝑡 = 𝑍 → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍))))
29	28	com13 88	. . . . . . . . . . . . . . . 16 ⊢ (𝑡 = 𝑍 → (¬ 𝑡 ≠ 𝑍 → ((𝑥𝑅𝑍 ∧ (𝑥𝑅𝑡 ↔ 𝑡 ≠ 𝑍)) → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍))))
30	16, 29	sylbi 217	. . . . . . . . . . . . . . 15 ⊢ (¬ 𝑡 ≠ 𝑍 → (¬ 𝑡 ≠ 𝑍 → ((𝑥𝑅𝑍 ∧ (𝑥𝑅𝑡 ↔ 𝑡 ≠ 𝑍)) → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍))))
31	30	pm2.43i 52	. . . . . . . . . . . . . 14 ⊢ (¬ 𝑡 ≠ 𝑍 → ((𝑥𝑅𝑍 ∧ (𝑥𝑅𝑡 ↔ 𝑡 ≠ 𝑍)) → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍)))
32	15, 31	pm2.61i 182	. . . . . . . . . . . . 13 ⊢ ((𝑥𝑅𝑍 ∧ (𝑥𝑅𝑡 ↔ 𝑡 ≠ 𝑍)) → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍))
33	4, 32	biimtrdi 253	. . . . . . . . . . . 12 ⊢ (𝑠 = 𝑍 → ((𝑥𝑅𝑠 ∧ (𝑥𝑅𝑡 ↔ 𝑡 ≠ 𝑍)) → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍)))
34		vex 3468	. . . . . . . . . . . . . . . 16 ⊢ 𝑠 ∈ V
35		breq2 5128	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = 𝑠 → (𝑥𝑅𝑦 ↔ 𝑥𝑅𝑠))
36		neeq1 2995	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = 𝑠 → (𝑦 ≠ 𝑍 ↔ 𝑠 ≠ 𝑍))
37	35, 36	anbi12d 632	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = 𝑠 → ((𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍) ↔ (𝑥𝑅𝑠 ∧ 𝑠 ≠ 𝑍)))
38	34, 37	spcev 3590	. . . . . . . . . . . . . . 15 ⊢ ((𝑥𝑅𝑠 ∧ 𝑠 ≠ 𝑍) → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍))
39	38	ex 412	. . . . . . . . . . . . . 14 ⊢ (𝑥𝑅𝑠 → (𝑠 ≠ 𝑍 → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍)))
40	39	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝑥𝑅𝑠 ∧ (𝑥𝑅𝑡 ↔ 𝑡 ≠ 𝑍)) → (𝑠 ≠ 𝑍 → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍)))
41	40	com12 32	. . . . . . . . . . . 12 ⊢ (𝑠 ≠ 𝑍 → ((𝑥𝑅𝑠 ∧ (𝑥𝑅𝑡 ↔ 𝑡 ≠ 𝑍)) → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍)))
42	33, 41	pm2.61ine 3016	. . . . . . . . . . 11 ⊢ ((𝑥𝑅𝑠 ∧ (𝑥𝑅𝑡 ↔ 𝑡 ≠ 𝑍)) → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍))
43	42	expcom 413	. . . . . . . . . 10 ⊢ ((𝑥𝑅𝑡 ↔ 𝑡 ≠ 𝑍) → (𝑥𝑅𝑠 → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍)))
44	43	exlimiv 1930	. . . . . . . . 9 ⊢ (∃𝑡(𝑥𝑅𝑡 ↔ 𝑡 ≠ 𝑍) → (𝑥𝑅𝑠 → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍)))
45	44	com12 32	. . . . . . . 8 ⊢ (𝑥𝑅𝑠 → (∃𝑡(𝑥𝑅𝑡 ↔ 𝑡 ≠ 𝑍) → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍)))
46	45	exlimiv 1930	. . . . . . 7 ⊢ (∃𝑠 𝑥𝑅𝑠 → (∃𝑡(𝑥𝑅𝑡 ↔ 𝑡 ≠ 𝑍) → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍)))
47	2, 46	sylbi 217	. . . . . 6 ⊢ (∃𝑡 𝑥𝑅𝑡 → (∃𝑡(𝑥𝑅𝑡 ↔ 𝑡 ≠ 𝑍) → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍)))
48	47	imp 406	. . . . 5 ⊢ ((∃𝑡 𝑥𝑅𝑡 ∧ ∃𝑡(𝑥𝑅𝑡 ↔ 𝑡 ≠ 𝑍)) → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍))
49	48	a1i 11	. . . 4 ⊢ ((𝑅 ∈ 𝑉 ∧ 𝑍 ∈ 𝑊) → ((∃𝑡 𝑥𝑅𝑡 ∧ ∃𝑡(𝑥𝑅𝑡 ↔ 𝑡 ≠ 𝑍)) → ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍)))
50	49	ss2abdv 4046	. . 3 ⊢ ((𝑅 ∈ 𝑉 ∧ 𝑍 ∈ 𝑊) → {𝑥 ∣ (∃𝑡 𝑥𝑅𝑡 ∧ ∃𝑡(𝑥𝑅𝑡 ↔ 𝑡 ≠ 𝑍))} ⊆ {𝑥 ∣ ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍)})
51		suppvalbr 8168	. . 3 ⊢ ((𝑅 ∈ 𝑉 ∧ 𝑍 ∈ 𝑊) → (𝑅 supp 𝑍) = {𝑥 ∣ (∃𝑡 𝑥𝑅𝑡 ∧ ∃𝑡(𝑥𝑅𝑡 ↔ 𝑡 ≠ 𝑍))})
52		cnvimadfsn 8176	. . . 4 ⊢ (◡𝑅 “ (V ∖ {𝑍})) = {𝑥 ∣ ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍)}
53	52	a1i 11	. . 3 ⊢ ((𝑅 ∈ 𝑉 ∧ 𝑍 ∈ 𝑊) → (◡𝑅 “ (V ∖ {𝑍})) = {𝑥 ∣ ∃𝑦(𝑥𝑅𝑦 ∧ 𝑦 ≠ 𝑍)})
54	50, 51, 53	3sstr4d 4019	. 2 ⊢ ((𝑅 ∈ 𝑉 ∧ 𝑍 ∈ 𝑊) → (𝑅 supp 𝑍) ⊆ (◡𝑅 “ (V ∖ {𝑍})))
55		suppimacnvss 8177	. 2 ⊢ ((𝑅 ∈ 𝑉 ∧ 𝑍 ∈ 𝑊) → (◡𝑅 “ (V ∖ {𝑍})) ⊆ (𝑅 supp 𝑍))
56	54, 55	eqssd 3981	1 ⊢ ((𝑅 ∈ 𝑉 ∧ 𝑍 ∈ 𝑊) → (𝑅 supp 𝑍) = (◡𝑅 “ (V ∖ {𝑍})))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206   ∧ wa 395   = wceq 1540  ∃wex 1779   ∈ wcel 2109  {cab 2714   ≠ wne 2933  Vcvv 3464   ∖ cdif 3928  {csn 4606   class class class wbr 5124  ^◡ccnv 5658   “ cima 5662  (class class class)co 7410   supp csupp 8164

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2708  ax-sep 5271  ax-nul 5281  ax-pr 5407  ax-un 7734

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2540  df-eu 2569  df-clab 2715  df-cleq 2728  df-clel 2810  df-nfc 2886  df-ne 2934  df-ral 3053  df-rex 3062  df-rab 3421  df-v 3466  df-sbc 3771  df-dif 3934  df-un 3936  df-in 3938  df-ss 3948  df-nul 4314  df-if 4506  df-pw 4582  df-sn 4607  df-pr 4609  df-op 4613  df-uni 4889  df-br 5125  df-opab 5187  df-id 5553  df-xp 5665  df-rel 5666  df-cnv 5667  df-co 5668  df-dm 5669  df-rn 5670  df-res 5671  df-ima 5672  df-iota 6489  df-fun 6538  df-fv 6544  df-ov 7413  df-oprab 7414  df-mpo 7415  df-supp 8165

This theorem is referenced by:  fsuppeq  8179  fsuppeqg  8180  suppun  8188  mptsuppdifd  8190  suppco  8210  fidmfisupp  9389  fdmfisuppfi  9391  fsuppun  9404  fsuppco  9419  gsumval3a  19889  gsumzf1o  19898  gsumzaddlem  19907  gsumzmhm  19923  gsumzoppg  19930  deg1val  26058  suppun2  32666  suppss3  32706  ffsrn  32711  fpwrelmapffslem  32714  sitgclg  34379  eulerpartlemmf  34412  eulerpartlemgf  34416