Users' Mathboxes Mathbox for Alexander van der Vekens < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  isisubgr Structured version   Visualization version   GIF version

Theorem isisubgr 47786
Description: The subgraph induced by a subset of vertices. (Contributed by AV, 12-May-2025.)
Hypotheses
Ref Expression
isisubgr.v 𝑉 = (Vtx‘𝐺)
isisubgr.e 𝐸 = (iEdg‘𝐺)
Assertion
Ref Expression
isisubgr ((𝐺𝑊𝑆𝑉) → (𝐺 ISubGr 𝑆) = ⟨𝑆, (𝐸 ↾ {𝑥 ∈ dom 𝐸 ∣ (𝐸𝑥) ⊆ 𝑆})⟩)
Distinct variable groups:   𝑥,𝐸   𝑥,𝐺   𝑥,𝑆   𝑥,𝑉
Allowed substitution hint:   𝑊(𝑥)

Proof of Theorem isisubgr
Dummy variables 𝑒 𝑔 𝑣 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 elex 3499 . . 3 (𝐺𝑊𝐺 ∈ V)
21adantr 480 . 2 ((𝐺𝑊𝑆𝑉) → 𝐺 ∈ V)
3 isisubgr.v . . . . . 6 𝑉 = (Vtx‘𝐺)
43fvexi 6921 . . . . 5 𝑉 ∈ V
54a1i 11 . . . 4 (𝑆𝑉𝑉 ∈ V)
6 id 22 . . . 4 (𝑆𝑉𝑆𝑉)
75, 6sselpwd 5334 . . 3 (𝑆𝑉𝑆 ∈ 𝒫 𝑉)
87adantl 481 . 2 ((𝐺𝑊𝑆𝑉) → 𝑆 ∈ 𝒫 𝑉)
9 opex 5475 . . 3 𝑆, (𝐸 ↾ {𝑥 ∈ dom 𝐸 ∣ (𝐸𝑥) ⊆ 𝑆})⟩ ∈ V
109a1i 11 . 2 ((𝐺𝑊𝑆𝑉) → ⟨𝑆, (𝐸 ↾ {𝑥 ∈ dom 𝐸 ∣ (𝐸𝑥) ⊆ 𝑆})⟩ ∈ V)
11 simpr 484 . . . 4 ((𝑔 = 𝐺𝑣 = 𝑆) → 𝑣 = 𝑆)
12 fvexd 6922 . . . . 5 ((𝑔 = 𝐺𝑣 = 𝑆) → (iEdg‘𝑔) ∈ V)
13 fveq2 6907 . . . . . . . . . 10 (𝑔 = 𝐺 → (iEdg‘𝑔) = (iEdg‘𝐺))
14 isisubgr.e . . . . . . . . . 10 𝐸 = (iEdg‘𝐺)
1513, 14eqtr4di 2793 . . . . . . . . 9 (𝑔 = 𝐺 → (iEdg‘𝑔) = 𝐸)
1615eqeq2d 2746 . . . . . . . 8 (𝑔 = 𝐺 → (𝑒 = (iEdg‘𝑔) ↔ 𝑒 = 𝐸))
1716adantr 480 . . . . . . 7 ((𝑔 = 𝐺𝑣 = 𝑆) → (𝑒 = (iEdg‘𝑔) ↔ 𝑒 = 𝐸))
18 simpr 484 . . . . . . . . . 10 ((𝑣 = 𝑆𝑒 = 𝐸) → 𝑒 = 𝐸)
19 dmeq 5917 . . . . . . . . . . . 12 (𝑒 = 𝐸 → dom 𝑒 = dom 𝐸)
2019adantl 481 . . . . . . . . . . 11 ((𝑣 = 𝑆𝑒 = 𝐸) → dom 𝑒 = dom 𝐸)
21 fveq1 6906 . . . . . . . . . . . . 13 (𝑒 = 𝐸 → (𝑒𝑥) = (𝐸𝑥))
2221adantl 481 . . . . . . . . . . . 12 ((𝑣 = 𝑆𝑒 = 𝐸) → (𝑒𝑥) = (𝐸𝑥))
23 simpl 482 . . . . . . . . . . . 12 ((𝑣 = 𝑆𝑒 = 𝐸) → 𝑣 = 𝑆)
2422, 23sseq12d 4029 . . . . . . . . . . 11 ((𝑣 = 𝑆𝑒 = 𝐸) → ((𝑒𝑥) ⊆ 𝑣 ↔ (𝐸𝑥) ⊆ 𝑆))
2520, 24rabeqbidv 3452 . . . . . . . . . 10 ((𝑣 = 𝑆𝑒 = 𝐸) → {𝑥 ∈ dom 𝑒 ∣ (𝑒𝑥) ⊆ 𝑣} = {𝑥 ∈ dom 𝐸 ∣ (𝐸𝑥) ⊆ 𝑆})
2618, 25reseq12d 6001 . . . . . . . . 9 ((𝑣 = 𝑆𝑒 = 𝐸) → (𝑒 ↾ {𝑥 ∈ dom 𝑒 ∣ (𝑒𝑥) ⊆ 𝑣}) = (𝐸 ↾ {𝑥 ∈ dom 𝐸 ∣ (𝐸𝑥) ⊆ 𝑆}))
2726ex 412 . . . . . . . 8 (𝑣 = 𝑆 → (𝑒 = 𝐸 → (𝑒 ↾ {𝑥 ∈ dom 𝑒 ∣ (𝑒𝑥) ⊆ 𝑣}) = (𝐸 ↾ {𝑥 ∈ dom 𝐸 ∣ (𝐸𝑥) ⊆ 𝑆})))
2827adantl 481 . . . . . . 7 ((𝑔 = 𝐺𝑣 = 𝑆) → (𝑒 = 𝐸 → (𝑒 ↾ {𝑥 ∈ dom 𝑒 ∣ (𝑒𝑥) ⊆ 𝑣}) = (𝐸 ↾ {𝑥 ∈ dom 𝐸 ∣ (𝐸𝑥) ⊆ 𝑆})))
2917, 28sylbid 240 . . . . . 6 ((𝑔 = 𝐺𝑣 = 𝑆) → (𝑒 = (iEdg‘𝑔) → (𝑒 ↾ {𝑥 ∈ dom 𝑒 ∣ (𝑒𝑥) ⊆ 𝑣}) = (𝐸 ↾ {𝑥 ∈ dom 𝐸 ∣ (𝐸𝑥) ⊆ 𝑆})))
3029imp 406 . . . . 5 (((𝑔 = 𝐺𝑣 = 𝑆) ∧ 𝑒 = (iEdg‘𝑔)) → (𝑒 ↾ {𝑥 ∈ dom 𝑒 ∣ (𝑒𝑥) ⊆ 𝑣}) = (𝐸 ↾ {𝑥 ∈ dom 𝐸 ∣ (𝐸𝑥) ⊆ 𝑆}))
3112, 30csbied 3946 . . . 4 ((𝑔 = 𝐺𝑣 = 𝑆) → (iEdg‘𝑔) / 𝑒(𝑒 ↾ {𝑥 ∈ dom 𝑒 ∣ (𝑒𝑥) ⊆ 𝑣}) = (𝐸 ↾ {𝑥 ∈ dom 𝐸 ∣ (𝐸𝑥) ⊆ 𝑆}))
3211, 31opeq12d 4886 . . 3 ((𝑔 = 𝐺𝑣 = 𝑆) → ⟨𝑣, (iEdg‘𝑔) / 𝑒(𝑒 ↾ {𝑥 ∈ dom 𝑒 ∣ (𝑒𝑥) ⊆ 𝑣})⟩ = ⟨𝑆, (𝐸 ↾ {𝑥 ∈ dom 𝐸 ∣ (𝐸𝑥) ⊆ 𝑆})⟩)
33 fveq2 6907 . . . . 5 (𝑔 = 𝐺 → (Vtx‘𝑔) = (Vtx‘𝐺))
3433, 3eqtr4di 2793 . . . 4 (𝑔 = 𝐺 → (Vtx‘𝑔) = 𝑉)
3534pweqd 4622 . . 3 (𝑔 = 𝐺 → 𝒫 (Vtx‘𝑔) = 𝒫 𝑉)
36 df-isubgr 47785 . . 3 ISubGr = (𝑔 ∈ V, 𝑣 ∈ 𝒫 (Vtx‘𝑔) ↦ ⟨𝑣, (iEdg‘𝑔) / 𝑒(𝑒 ↾ {𝑥 ∈ dom 𝑒 ∣ (𝑒𝑥) ⊆ 𝑣})⟩)
3732, 35, 36ovmpox 7586 . 2 ((𝐺 ∈ V ∧ 𝑆 ∈ 𝒫 𝑉 ∧ ⟨𝑆, (𝐸 ↾ {𝑥 ∈ dom 𝐸 ∣ (𝐸𝑥) ⊆ 𝑆})⟩ ∈ V) → (𝐺 ISubGr 𝑆) = ⟨𝑆, (𝐸 ↾ {𝑥 ∈ dom 𝐸 ∣ (𝐸𝑥) ⊆ 𝑆})⟩)
382, 8, 10, 37syl3anc 1370 1 ((𝐺𝑊𝑆𝑉) → (𝐺 ISubGr 𝑆) = ⟨𝑆, (𝐸 ↾ {𝑥 ∈ dom 𝐸 ∣ (𝐸𝑥) ⊆ 𝑆})⟩)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395   = wceq 1537  wcel 2106  {crab 3433  Vcvv 3478  csb 3908  wss 3963  𝒫 cpw 4605  cop 4637  dom cdm 5689  cres 5691  cfv 6563  (class class class)co 7431  Vtxcvtx 29028  iEdgciedg 29029   ISubGr cisubgr 47784
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1908  ax-6 1965  ax-7 2005  ax-8 2108  ax-9 2116  ax-10 2139  ax-11 2155  ax-12 2175  ax-ext 2706  ax-sep 5302  ax-nul 5312  ax-pr 5438
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1540  df-fal 1550  df-ex 1777  df-nf 1781  df-sb 2063  df-mo 2538  df-eu 2567  df-clab 2713  df-cleq 2727  df-clel 2814  df-nfc 2890  df-ne 2939  df-ral 3060  df-rex 3069  df-rab 3434  df-v 3480  df-sbc 3792  df-csb 3909  df-dif 3966  df-un 3968  df-in 3970  df-ss 3980  df-nul 4340  df-if 4532  df-pw 4607  df-sn 4632  df-pr 4634  df-op 4638  df-uni 4913  df-br 5149  df-opab 5211  df-id 5583  df-xp 5695  df-rel 5696  df-cnv 5697  df-co 5698  df-dm 5699  df-res 5701  df-iota 6516  df-fun 6565  df-fv 6571  df-ov 7434  df-oprab 7435  df-mpo 7436  df-isubgr 47785
This theorem is referenced by:  isubgriedg  47787  isubgrvtxuhgr  47788  isubgrvtx  47791  isubgr0uhgr  47797
  Copyright terms: Public domain W3C validator