MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  suppimacnv Structured version   Visualization version   GIF version

Theorem suppimacnv 8155
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.
StepHypRef Expression
1 breq2 5151 . . . . . . . 8 (𝑡 = 𝑠 → (𝑥𝑅𝑡𝑥𝑅𝑠))
21cbvexvw 2040 . . . . . . 7 (∃𝑡 𝑥𝑅𝑡 ↔ ∃𝑠 𝑥𝑅𝑠)
3 breq2 5151 . . . . . . . . . . . . . 14 (𝑠 = 𝑍 → (𝑥𝑅𝑠𝑥𝑅𝑍))
43anbi1d 630 . . . . . . . . . . . . 13 (𝑠 = 𝑍 → ((𝑥𝑅𝑠 ∧ (𝑥𝑅𝑡𝑡𝑍)) ↔ (𝑥𝑅𝑍 ∧ (𝑥𝑅𝑡𝑡𝑍))))
5 bianir 1057 . . . . . . . . . . . . . . . . . 18 ((𝑡𝑍 ∧ (𝑥𝑅𝑡𝑡𝑍)) → 𝑥𝑅𝑡)
6 vex 3478 . . . . . . . . . . . . . . . . . . . 20 𝑡 ∈ V
7 breq2 5151 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 = 𝑡 → (𝑥𝑅𝑦𝑥𝑅𝑡))
8 neeq1 3003 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 = 𝑡 → (𝑦𝑍𝑡𝑍))
97, 8anbi12d 631 . . . . . . . . . . . . . . . . . . . 20 (𝑦 = 𝑡 → ((𝑥𝑅𝑦𝑦𝑍) ↔ (𝑥𝑅𝑡𝑡𝑍)))
106, 9spcev 3596 . . . . . . . . . . . . . . . . . . 19 ((𝑥𝑅𝑡𝑡𝑍) → ∃𝑦(𝑥𝑅𝑦𝑦𝑍))
1110ex 413 . . . . . . . . . . . . . . . . . 18 (𝑥𝑅𝑡 → (𝑡𝑍 → ∃𝑦(𝑥𝑅𝑦𝑦𝑍)))
125, 11syl 17 . . . . . . . . . . . . . . . . 17 ((𝑡𝑍 ∧ (𝑥𝑅𝑡𝑡𝑍)) → (𝑡𝑍 → ∃𝑦(𝑥𝑅𝑦𝑦𝑍)))
1312ex 413 . . . . . . . . . . . . . . . 16 (𝑡𝑍 → ((𝑥𝑅𝑡𝑡𝑍) → (𝑡𝑍 → ∃𝑦(𝑥𝑅𝑦𝑦𝑍))))
1413pm2.43a 54 . . . . . . . . . . . . . . 15 (𝑡𝑍 → ((𝑥𝑅𝑡𝑡𝑍) → ∃𝑦(𝑥𝑅𝑦𝑦𝑍)))
1514adantld 491 . . . . . . . . . . . . . 14 (𝑡𝑍 → ((𝑥𝑅𝑍 ∧ (𝑥𝑅𝑡𝑡𝑍)) → ∃𝑦(𝑥𝑅𝑦𝑦𝑍)))
16 nne 2944 . . . . . . . . . . . . . . . 16 𝑡𝑍𝑡 = 𝑍)
17 notbi 318 . . . . . . . . . . . . . . . . . . . 20 ((𝑥𝑅𝑡𝑡𝑍) ↔ (¬ 𝑥𝑅𝑡 ↔ ¬ 𝑡𝑍))
18 bianir 1057 . . . . . . . . . . . . . . . . . . . . . 22 ((¬ 𝑡𝑍 ∧ (¬ 𝑥𝑅𝑡 ↔ ¬ 𝑡𝑍)) → ¬ 𝑥𝑅𝑡)
19 breq2 5151 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑍 = 𝑡 → (𝑥𝑅𝑍𝑥𝑅𝑡))
2019eqcoms 2740 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑡 = 𝑍 → (𝑥𝑅𝑍𝑥𝑅𝑡))
21 pm2.24 124 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥𝑅𝑡 → (¬ 𝑥𝑅𝑡 → ∃𝑦(𝑥𝑅𝑦𝑦𝑍)))
2220, 21syl6bi 252 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑡 = 𝑍 → (𝑥𝑅𝑍 → (¬ 𝑥𝑅𝑡 → ∃𝑦(𝑥𝑅𝑦𝑦𝑍))))
2322com13 88 . . . . . . . . . . . . . . . . . . . . . 22 𝑥𝑅𝑡 → (𝑥𝑅𝑍 → (𝑡 = 𝑍 → ∃𝑦(𝑥𝑅𝑦𝑦𝑍))))
2418, 23syl 17 . . . . . . . . . . . . . . . . . . . . 21 ((¬ 𝑡𝑍 ∧ (¬ 𝑥𝑅𝑡 ↔ ¬ 𝑡𝑍)) → (𝑥𝑅𝑍 → (𝑡 = 𝑍 → ∃𝑦(𝑥𝑅𝑦𝑦𝑍))))
2524ex 413 . . . . . . . . . . . . . . . . . . . 20 𝑡𝑍 → ((¬ 𝑥𝑅𝑡 ↔ ¬ 𝑡𝑍) → (𝑥𝑅𝑍 → (𝑡 = 𝑍 → ∃𝑦(𝑥𝑅𝑦𝑦𝑍)))))
2617, 25biimtrid 241 . . . . . . . . . . . . . . . . . . 19 𝑡𝑍 → ((𝑥𝑅𝑡𝑡𝑍) → (𝑥𝑅𝑍 → (𝑡 = 𝑍 → ∃𝑦(𝑥𝑅𝑦𝑦𝑍)))))
2726com13 88 . . . . . . . . . . . . . . . . . 18 (𝑥𝑅𝑍 → ((𝑥𝑅𝑡𝑡𝑍) → (¬ 𝑡𝑍 → (𝑡 = 𝑍 → ∃𝑦(𝑥𝑅𝑦𝑦𝑍)))))
2827imp 407 . . . . . . . . . . . . . . . . 17 ((𝑥𝑅𝑍 ∧ (𝑥𝑅𝑡𝑡𝑍)) → (¬ 𝑡𝑍 → (𝑡 = 𝑍 → ∃𝑦(𝑥𝑅𝑦𝑦𝑍))))
2928com13 88 . . . . . . . . . . . . . . . 16 (𝑡 = 𝑍 → (¬ 𝑡𝑍 → ((𝑥𝑅𝑍 ∧ (𝑥𝑅𝑡𝑡𝑍)) → ∃𝑦(𝑥𝑅𝑦𝑦𝑍))))
3016, 29sylbi 216 . . . . . . . . . . . . . . 15 𝑡𝑍 → (¬ 𝑡𝑍 → ((𝑥𝑅𝑍 ∧ (𝑥𝑅𝑡𝑡𝑍)) → ∃𝑦(𝑥𝑅𝑦𝑦𝑍))))
3130pm2.43i 52 . . . . . . . . . . . . . 14 𝑡𝑍 → ((𝑥𝑅𝑍 ∧ (𝑥𝑅𝑡𝑡𝑍)) → ∃𝑦(𝑥𝑅𝑦𝑦𝑍)))
3215, 31pm2.61i 182 . . . . . . . . . . . . 13 ((𝑥𝑅𝑍 ∧ (𝑥𝑅𝑡𝑡𝑍)) → ∃𝑦(𝑥𝑅𝑦𝑦𝑍))
334, 32syl6bi 252 . . . . . . . . . . . 12 (𝑠 = 𝑍 → ((𝑥𝑅𝑠 ∧ (𝑥𝑅𝑡𝑡𝑍)) → ∃𝑦(𝑥𝑅𝑦𝑦𝑍)))
34 vex 3478 . . . . . . . . . . . . . . . 16 𝑠 ∈ V
35 breq2 5151 . . . . . . . . . . . . . . . . 17 (𝑦 = 𝑠 → (𝑥𝑅𝑦𝑥𝑅𝑠))
36 neeq1 3003 . . . . . . . . . . . . . . . . 17 (𝑦 = 𝑠 → (𝑦𝑍𝑠𝑍))
3735, 36anbi12d 631 . . . . . . . . . . . . . . . 16 (𝑦 = 𝑠 → ((𝑥𝑅𝑦𝑦𝑍) ↔ (𝑥𝑅𝑠𝑠𝑍)))
3834, 37spcev 3596 . . . . . . . . . . . . . . 15 ((𝑥𝑅𝑠𝑠𝑍) → ∃𝑦(𝑥𝑅𝑦𝑦𝑍))
3938ex 413 . . . . . . . . . . . . . 14 (𝑥𝑅𝑠 → (𝑠𝑍 → ∃𝑦(𝑥𝑅𝑦𝑦𝑍)))
4039adantr 481 . . . . . . . . . . . . 13 ((𝑥𝑅𝑠 ∧ (𝑥𝑅𝑡𝑡𝑍)) → (𝑠𝑍 → ∃𝑦(𝑥𝑅𝑦𝑦𝑍)))
4140com12 32 . . . . . . . . . . . 12 (𝑠𝑍 → ((𝑥𝑅𝑠 ∧ (𝑥𝑅𝑡𝑡𝑍)) → ∃𝑦(𝑥𝑅𝑦𝑦𝑍)))
4233, 41pm2.61ine 3025 . . . . . . . . . . 11 ((𝑥𝑅𝑠 ∧ (𝑥𝑅𝑡𝑡𝑍)) → ∃𝑦(𝑥𝑅𝑦𝑦𝑍))
4342expcom 414 . . . . . . . . . 10 ((𝑥𝑅𝑡𝑡𝑍) → (𝑥𝑅𝑠 → ∃𝑦(𝑥𝑅𝑦𝑦𝑍)))
4443exlimiv 1933 . . . . . . . . 9 (∃𝑡(𝑥𝑅𝑡𝑡𝑍) → (𝑥𝑅𝑠 → ∃𝑦(𝑥𝑅𝑦𝑦𝑍)))
4544com12 32 . . . . . . . 8 (𝑥𝑅𝑠 → (∃𝑡(𝑥𝑅𝑡𝑡𝑍) → ∃𝑦(𝑥𝑅𝑦𝑦𝑍)))
4645exlimiv 1933 . . . . . . 7 (∃𝑠 𝑥𝑅𝑠 → (∃𝑡(𝑥𝑅𝑡𝑡𝑍) → ∃𝑦(𝑥𝑅𝑦𝑦𝑍)))
472, 46sylbi 216 . . . . . 6 (∃𝑡 𝑥𝑅𝑡 → (∃𝑡(𝑥𝑅𝑡𝑡𝑍) → ∃𝑦(𝑥𝑅𝑦𝑦𝑍)))
4847imp 407 . . . . 5 ((∃𝑡 𝑥𝑅𝑡 ∧ ∃𝑡(𝑥𝑅𝑡𝑡𝑍)) → ∃𝑦(𝑥𝑅𝑦𝑦𝑍))
4948a1i 11 . . . 4 ((𝑅𝑉𝑍𝑊) → ((∃𝑡 𝑥𝑅𝑡 ∧ ∃𝑡(𝑥𝑅𝑡𝑡𝑍)) → ∃𝑦(𝑥𝑅𝑦𝑦𝑍)))
5049ss2abdv 4059 . . 3 ((𝑅𝑉𝑍𝑊) → {𝑥 ∣ (∃𝑡 𝑥𝑅𝑡 ∧ ∃𝑡(𝑥𝑅𝑡𝑡𝑍))} ⊆ {𝑥 ∣ ∃𝑦(𝑥𝑅𝑦𝑦𝑍)})
51 suppvalbr 8146 . . 3 ((𝑅𝑉𝑍𝑊) → (𝑅 supp 𝑍) = {𝑥 ∣ (∃𝑡 𝑥𝑅𝑡 ∧ ∃𝑡(𝑥𝑅𝑡𝑡𝑍))})
52 cnvimadfsn 8153 . . . 4 (𝑅 “ (V ∖ {𝑍})) = {𝑥 ∣ ∃𝑦(𝑥𝑅𝑦𝑦𝑍)}
5352a1i 11 . . 3 ((𝑅𝑉𝑍𝑊) → (𝑅 “ (V ∖ {𝑍})) = {𝑥 ∣ ∃𝑦(𝑥𝑅𝑦𝑦𝑍)})
5450, 51, 533sstr4d 4028 . 2 ((𝑅𝑉𝑍𝑊) → (𝑅 supp 𝑍) ⊆ (𝑅 “ (V ∖ {𝑍})))
55 suppimacnvss 8154 . 2 ((𝑅𝑉𝑍𝑊) → (𝑅 “ (V ∖ {𝑍})) ⊆ (𝑅 supp 𝑍))
5654, 55eqssd 3998 1 ((𝑅𝑉𝑍𝑊) → (𝑅 supp 𝑍) = (𝑅 “ (V ∖ {𝑍})))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 205  wa 396   = wceq 1541  wex 1781  wcel 2106  {cab 2709  wne 2940  Vcvv 3474  cdif 3944  {csn 4627   class class class wbr 5147  ccnv 5674  cima 5678  (class class class)co 7405   supp csupp 8142
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 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2703  ax-sep 5298  ax-nul 5305  ax-pr 5426  ax-un 7721
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2534  df-eu 2563  df-clab 2710  df-cleq 2724  df-clel 2810  df-nfc 2885  df-ne 2941  df-ral 3062  df-rex 3071  df-rab 3433  df-v 3476  df-sbc 3777  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-nul 4322  df-if 4528  df-sn 4628  df-pr 4630  df-op 4634  df-uni 4908  df-br 5148  df-opab 5210  df-id 5573  df-xp 5681  df-rel 5682  df-cnv 5683  df-co 5684  df-dm 5685  df-rn 5686  df-res 5687  df-ima 5688  df-iota 6492  df-fun 6542  df-fv 6548  df-ov 7408  df-oprab 7409  df-mpo 7410  df-supp 8143
This theorem is referenced by:  fsuppeq  8156  fsuppeqg  8157  suppun  8165  mptsuppdifd  8167  suppco  8187  fidmfisupp  9367  fdmfisuppfi  9368  fsuppun  9378  fsuppco  9393  gsumval3a  19765  gsumzf1o  19774  gsumzaddlem  19783  gsumzmhm  19799  gsumzoppg  19806  deg1val  25605  suppss3  31936  ffsrn  31941  fpwrelmapffslem  31944  sitgclg  33329  eulerpartlemmf  33362  eulerpartlemgf  33366
  Copyright terms: Public domain W3C validator