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

Theorem isupgr 28910
Description: The property of being an undirected pseudograph. (Contributed by Mario Carneiro, 11-Mar-2015.) (Revised by AV, 10-Oct-2020.)
Hypotheses
Ref Expression
isupgr.v 𝑉 = (Vtx‘𝐺)
isupgr.e 𝐸 = (iEdg‘𝐺)
Assertion
Ref Expression
isupgr (𝐺𝑈 → (𝐺 ∈ UPGraph ↔ 𝐸:dom 𝐸⟶{𝑥 ∈ (𝒫 𝑉 ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}))
Distinct variable groups:   𝑥,𝐺   𝑥,𝑉
Allowed substitution hints:   𝑈(𝑥)   𝐸(𝑥)

Proof of Theorem isupgr
Dummy variables 𝑒 𝑔 𝑣 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 df-upgr 28908 . . 3 UPGraph = {𝑔[(Vtx‘𝑔) / 𝑣][(iEdg‘𝑔) / 𝑒]𝑒:dom 𝑒⟶{𝑥 ∈ (𝒫 𝑣 ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}}
21eleq2i 2821 . 2 (𝐺 ∈ UPGraph ↔ 𝐺 ∈ {𝑔[(Vtx‘𝑔) / 𝑣][(iEdg‘𝑔) / 𝑒]𝑒:dom 𝑒⟶{𝑥 ∈ (𝒫 𝑣 ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}})
3 fveq2 6897 . . . . 5 ( = 𝐺 → (iEdg‘) = (iEdg‘𝐺))
4 isupgr.e . . . . 5 𝐸 = (iEdg‘𝐺)
53, 4eqtr4di 2786 . . . 4 ( = 𝐺 → (iEdg‘) = 𝐸)
63dmeqd 5908 . . . . 5 ( = 𝐺 → dom (iEdg‘) = dom (iEdg‘𝐺))
74eqcomi 2737 . . . . . 6 (iEdg‘𝐺) = 𝐸
87dmeqi 5907 . . . . 5 dom (iEdg‘𝐺) = dom 𝐸
96, 8eqtrdi 2784 . . . 4 ( = 𝐺 → dom (iEdg‘) = dom 𝐸)
10 fveq2 6897 . . . . . . . 8 ( = 𝐺 → (Vtx‘) = (Vtx‘𝐺))
11 isupgr.v . . . . . . . 8 𝑉 = (Vtx‘𝐺)
1210, 11eqtr4di 2786 . . . . . . 7 ( = 𝐺 → (Vtx‘) = 𝑉)
1312pweqd 4620 . . . . . 6 ( = 𝐺 → 𝒫 (Vtx‘) = 𝒫 𝑉)
1413difeq1d 4119 . . . . 5 ( = 𝐺 → (𝒫 (Vtx‘) ∖ {∅}) = (𝒫 𝑉 ∖ {∅}))
1514rabeqdv 3444 . . . 4 ( = 𝐺 → {𝑥 ∈ (𝒫 (Vtx‘) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2} = {𝑥 ∈ (𝒫 𝑉 ∖ {∅}) ∣ (♯‘𝑥) ≤ 2})
165, 9, 15feq123d 6711 . . 3 ( = 𝐺 → ((iEdg‘):dom (iEdg‘)⟶{𝑥 ∈ (𝒫 (Vtx‘) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2} ↔ 𝐸:dom 𝐸⟶{𝑥 ∈ (𝒫 𝑉 ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}))
17 fvexd 6912 . . . . 5 (𝑔 = → (Vtx‘𝑔) ∈ V)
18 fveq2 6897 . . . . 5 (𝑔 = → (Vtx‘𝑔) = (Vtx‘))
19 fvexd 6912 . . . . . 6 ((𝑔 = 𝑣 = (Vtx‘)) → (iEdg‘𝑔) ∈ V)
20 fveq2 6897 . . . . . . 7 (𝑔 = → (iEdg‘𝑔) = (iEdg‘))
2120adantr 480 . . . . . 6 ((𝑔 = 𝑣 = (Vtx‘)) → (iEdg‘𝑔) = (iEdg‘))
22 simpr 484 . . . . . . 7 (((𝑔 = 𝑣 = (Vtx‘)) ∧ 𝑒 = (iEdg‘)) → 𝑒 = (iEdg‘))
2322dmeqd 5908 . . . . . . 7 (((𝑔 = 𝑣 = (Vtx‘)) ∧ 𝑒 = (iEdg‘)) → dom 𝑒 = dom (iEdg‘))
24 pweq 4617 . . . . . . . . . 10 (𝑣 = (Vtx‘) → 𝒫 𝑣 = 𝒫 (Vtx‘))
2524ad2antlr 726 . . . . . . . . 9 (((𝑔 = 𝑣 = (Vtx‘)) ∧ 𝑒 = (iEdg‘)) → 𝒫 𝑣 = 𝒫 (Vtx‘))
2625difeq1d 4119 . . . . . . . 8 (((𝑔 = 𝑣 = (Vtx‘)) ∧ 𝑒 = (iEdg‘)) → (𝒫 𝑣 ∖ {∅}) = (𝒫 (Vtx‘) ∖ {∅}))
2726rabeqdv 3444 . . . . . . 7 (((𝑔 = 𝑣 = (Vtx‘)) ∧ 𝑒 = (iEdg‘)) → {𝑥 ∈ (𝒫 𝑣 ∖ {∅}) ∣ (♯‘𝑥) ≤ 2} = {𝑥 ∈ (𝒫 (Vtx‘) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2})
2822, 23, 27feq123d 6711 . . . . . 6 (((𝑔 = 𝑣 = (Vtx‘)) ∧ 𝑒 = (iEdg‘)) → (𝑒:dom 𝑒⟶{𝑥 ∈ (𝒫 𝑣 ∖ {∅}) ∣ (♯‘𝑥) ≤ 2} ↔ (iEdg‘):dom (iEdg‘)⟶{𝑥 ∈ (𝒫 (Vtx‘) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}))
2919, 21, 28sbcied2 3824 . . . . 5 ((𝑔 = 𝑣 = (Vtx‘)) → ([(iEdg‘𝑔) / 𝑒]𝑒:dom 𝑒⟶{𝑥 ∈ (𝒫 𝑣 ∖ {∅}) ∣ (♯‘𝑥) ≤ 2} ↔ (iEdg‘):dom (iEdg‘)⟶{𝑥 ∈ (𝒫 (Vtx‘) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}))
3017, 18, 29sbcied2 3824 . . . 4 (𝑔 = → ([(Vtx‘𝑔) / 𝑣][(iEdg‘𝑔) / 𝑒]𝑒:dom 𝑒⟶{𝑥 ∈ (𝒫 𝑣 ∖ {∅}) ∣ (♯‘𝑥) ≤ 2} ↔ (iEdg‘):dom (iEdg‘)⟶{𝑥 ∈ (𝒫 (Vtx‘) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}))
3130cbvabv 2801 . . 3 {𝑔[(Vtx‘𝑔) / 𝑣][(iEdg‘𝑔) / 𝑒]𝑒:dom 𝑒⟶{𝑥 ∈ (𝒫 𝑣 ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}} = { ∣ (iEdg‘):dom (iEdg‘)⟶{𝑥 ∈ (𝒫 (Vtx‘) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}}
3216, 31elab2g 3669 . 2 (𝐺𝑈 → (𝐺 ∈ {𝑔[(Vtx‘𝑔) / 𝑣][(iEdg‘𝑔) / 𝑒]𝑒:dom 𝑒⟶{𝑥 ∈ (𝒫 𝑣 ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}} ↔ 𝐸:dom 𝐸⟶{𝑥 ∈ (𝒫 𝑉 ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}))
332, 32bitrid 283 1 (𝐺𝑈 → (𝐺 ∈ UPGraph ↔ 𝐸:dom 𝐸⟶{𝑥 ∈ (𝒫 𝑉 ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 395   = wceq 1534  wcel 2099  {cab 2705  {crab 3429  Vcvv 3471  [wsbc 3776  cdif 3944  c0 4323  𝒫 cpw 4603  {csn 4629   class class class wbr 5148  dom cdm 5678  wf 6544  cfv 6548  cle 11280  2c2 12298  chash 14322  Vtxcvtx 28822  iEdgciedg 28823  UPGraphcupgr 28906
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1790  ax-4 1804  ax-5 1906  ax-6 1964  ax-7 2004  ax-8 2101  ax-9 2109  ax-ext 2699  ax-nul 5306
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 847  df-3an 1087  df-tru 1537  df-fal 1547  df-ex 1775  df-sb 2061  df-clab 2706  df-cleq 2720  df-clel 2806  df-ne 2938  df-rab 3430  df-v 3473  df-sbc 3777  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-nul 4324  df-if 4530  df-pw 4605  df-sn 4630  df-pr 4632  df-op 4636  df-uni 4909  df-br 5149  df-opab 5211  df-rel 5685  df-cnv 5686  df-co 5687  df-dm 5688  df-rn 5689  df-iota 6500  df-fun 6550  df-fn 6551  df-f 6552  df-fv 6556  df-upgr 28908
This theorem is referenced by:  wrdupgr  28911  upgrf  28912  upgrop  28920  umgrupgr  28929  upgr1e  28939  upgrun  28944  uspgrupgr  29004  subupgr  29113  upgrres  29132  upgrres1  29139
  Copyright terms: Public domain W3C validator