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

Theorem incistruhgr 26314
Description: An incidence structure 𝑃, 𝐿, 𝐼 "where 𝑃 is a set whose elements are called points, 𝐿 is a distinct set whose elements are called lines and 𝐼 ⊆ (𝑃 × 𝐿) is the incidence relation" (see Wikipedia "Incidence structure" (24-Oct-2020), https://en.wikipedia.org/wiki/Incidence_structure) implies an undirected hypergraph, if the incidence relation is right-total (to exclude empty edges). The points become the vertices, and the edge function is derived from the incidence relation by mapping each line ("edge") to the set of vertices incident to the line/edge. With 𝑃 = (Base‘𝑆) and by defining two new slots for lines and incidence relations (analogous to LineG and Itv) and enhancing the definition of iEdg accordingly, it would even be possible to express that a corresponding incidence structure is an undirected hypergraph. By choosing the incident relation appropriately, other kinds of undirected graphs (pseudographs, multigraphs, simple graphs, etc.) could be defined. (Contributed by AV, 24-Oct-2020.)
Hypotheses
Ref Expression
incistruhgr.v 𝑉 = (Vtx‘𝐺)
incistruhgr.e 𝐸 = (iEdg‘𝐺)
Assertion
Ref Expression
incistruhgr ((𝐺𝑊𝐼 ⊆ (𝑃 × 𝐿) ∧ ran 𝐼 = 𝐿) → ((𝑉 = 𝑃𝐸 = (𝑒𝐿 ↦ {𝑣𝑃𝑣𝐼𝑒})) → 𝐺 ∈ UHGraph))
Distinct variable groups:   𝑒,𝐸   𝑒,𝐺   𝑒,𝐼,𝑣   𝑒,𝐿,𝑣   𝑃,𝑒,𝑣   𝑒,𝑉,𝑣   𝑒,𝑊
Allowed substitution hints:   𝐸(𝑣)   𝐺(𝑣)   𝑊(𝑣)

Proof of Theorem incistruhgr
StepHypRef Expression
1 id 22 . . . . . . . . . 10 (𝑉 = 𝑃𝑉 = 𝑃)
21rabeqdv 3378 . . . . . . . . 9 (𝑉 = 𝑃 → {𝑣𝑉𝑣𝐼𝑒} = {𝑣𝑃𝑣𝐼𝑒})
32mpteq2dv 4938 . . . . . . . 8 (𝑉 = 𝑃 → (𝑒𝐿 ↦ {𝑣𝑉𝑣𝐼𝑒}) = (𝑒𝐿 ↦ {𝑣𝑃𝑣𝐼𝑒}))
43eqeq2d 2809 . . . . . . 7 (𝑉 = 𝑃 → (𝐸 = (𝑒𝐿 ↦ {𝑣𝑉𝑣𝐼𝑒}) ↔ 𝐸 = (𝑒𝐿 ↦ {𝑣𝑃𝑣𝐼𝑒})))
5 xpeq1 5326 . . . . . . . . 9 (𝑉 = 𝑃 → (𝑉 × 𝐿) = (𝑃 × 𝐿))
65sseq2d 3829 . . . . . . . 8 (𝑉 = 𝑃 → (𝐼 ⊆ (𝑉 × 𝐿) ↔ 𝐼 ⊆ (𝑃 × 𝐿)))
763anbi2d 1566 . . . . . . 7 (𝑉 = 𝑃 → ((𝐺𝑊𝐼 ⊆ (𝑉 × 𝐿) ∧ ran 𝐼 = 𝐿) ↔ (𝐺𝑊𝐼 ⊆ (𝑃 × 𝐿) ∧ ran 𝐼 = 𝐿)))
84, 7anbi12d 625 . . . . . 6 (𝑉 = 𝑃 → ((𝐸 = (𝑒𝐿 ↦ {𝑣𝑉𝑣𝐼𝑒}) ∧ (𝐺𝑊𝐼 ⊆ (𝑉 × 𝐿) ∧ ran 𝐼 = 𝐿)) ↔ (𝐸 = (𝑒𝐿 ↦ {𝑣𝑃𝑣𝐼𝑒}) ∧ (𝐺𝑊𝐼 ⊆ (𝑃 × 𝐿) ∧ ran 𝐼 = 𝐿))))
9 dmeq 5527 . . . . . . . . 9 (𝐸 = (𝑒𝐿 ↦ {𝑣𝑉𝑣𝐼𝑒}) → dom 𝐸 = dom (𝑒𝐿 ↦ {𝑣𝑉𝑣𝐼𝑒}))
10 incistruhgr.v . . . . . . . . . . . . 13 𝑉 = (Vtx‘𝐺)
1110fvexi 6425 . . . . . . . . . . . 12 𝑉 ∈ V
1211rabex 5007 . . . . . . . . . . 11 {𝑣𝑉𝑣𝐼𝑒} ∈ V
13 eqid 2799 . . . . . . . . . . 11 (𝑒𝐿 ↦ {𝑣𝑉𝑣𝐼𝑒}) = (𝑒𝐿 ↦ {𝑣𝑉𝑣𝐼𝑒})
1412, 13dmmpti 6234 . . . . . . . . . 10 dom (𝑒𝐿 ↦ {𝑣𝑉𝑣𝐼𝑒}) = 𝐿
1514a1i 11 . . . . . . . . 9 (𝐸 = (𝑒𝐿 ↦ {𝑣𝑉𝑣𝐼𝑒}) → dom (𝑒𝐿 ↦ {𝑣𝑉𝑣𝐼𝑒}) = 𝐿)
169, 15eqtrd 2833 . . . . . . . 8 (𝐸 = (𝑒𝐿 ↦ {𝑣𝑉𝑣𝐼𝑒}) → dom 𝐸 = 𝐿)
17 ssrab2 3883 . . . . . . . . . . . . 13 {𝑣𝑉𝑣𝐼𝑒} ⊆ 𝑉
1817a1i 11 . . . . . . . . . . . 12 (((𝐺𝑊𝐼 ⊆ (𝑉 × 𝐿) ∧ ran 𝐼 = 𝐿) ∧ 𝑒𝐿) → {𝑣𝑉𝑣𝐼𝑒} ⊆ 𝑉)
1912elpw 4355 . . . . . . . . . . . 12 ({𝑣𝑉𝑣𝐼𝑒} ∈ 𝒫 𝑉 ↔ {𝑣𝑉𝑣𝐼𝑒} ⊆ 𝑉)
2018, 19sylibr 226 . . . . . . . . . . 11 (((𝐺𝑊𝐼 ⊆ (𝑉 × 𝐿) ∧ ran 𝐼 = 𝐿) ∧ 𝑒𝐿) → {𝑣𝑉𝑣𝐼𝑒} ∈ 𝒫 𝑉)
21 eleq2 2867 . . . . . . . . . . . . . . . 16 (ran 𝐼 = 𝐿 → (𝑒 ∈ ran 𝐼𝑒𝐿))
22213ad2ant3 1166 . . . . . . . . . . . . . . 15 ((𝐺𝑊𝐼 ⊆ (𝑉 × 𝐿) ∧ ran 𝐼 = 𝐿) → (𝑒 ∈ ran 𝐼𝑒𝐿))
23 ssrelrn 5518 . . . . . . . . . . . . . . . . 17 ((𝐼 ⊆ (𝑉 × 𝐿) ∧ 𝑒 ∈ ran 𝐼) → ∃𝑣𝑉 𝑣𝐼𝑒)
2423ex 402 . . . . . . . . . . . . . . . 16 (𝐼 ⊆ (𝑉 × 𝐿) → (𝑒 ∈ ran 𝐼 → ∃𝑣𝑉 𝑣𝐼𝑒))
25243ad2ant2 1165 . . . . . . . . . . . . . . 15 ((𝐺𝑊𝐼 ⊆ (𝑉 × 𝐿) ∧ ran 𝐼 = 𝐿) → (𝑒 ∈ ran 𝐼 → ∃𝑣𝑉 𝑣𝐼𝑒))
2622, 25sylbird 252 . . . . . . . . . . . . . 14 ((𝐺𝑊𝐼 ⊆ (𝑉 × 𝐿) ∧ ran 𝐼 = 𝐿) → (𝑒𝐿 → ∃𝑣𝑉 𝑣𝐼𝑒))
2726imp 396 . . . . . . . . . . . . 13 (((𝐺𝑊𝐼 ⊆ (𝑉 × 𝐿) ∧ ran 𝐼 = 𝐿) ∧ 𝑒𝐿) → ∃𝑣𝑉 𝑣𝐼𝑒)
28 df-ne 2972 . . . . . . . . . . . . . 14 ({𝑣𝑉𝑣𝐼𝑒} ≠ ∅ ↔ ¬ {𝑣𝑉𝑣𝐼𝑒} = ∅)
29 rabn0 4158 . . . . . . . . . . . . . 14 ({𝑣𝑉𝑣𝐼𝑒} ≠ ∅ ↔ ∃𝑣𝑉 𝑣𝐼𝑒)
3028, 29bitr3i 269 . . . . . . . . . . . . 13 (¬ {𝑣𝑉𝑣𝐼𝑒} = ∅ ↔ ∃𝑣𝑉 𝑣𝐼𝑒)
3127, 30sylibr 226 . . . . . . . . . . . 12 (((𝐺𝑊𝐼 ⊆ (𝑉 × 𝐿) ∧ ran 𝐼 = 𝐿) ∧ 𝑒𝐿) → ¬ {𝑣𝑉𝑣𝐼𝑒} = ∅)
3212elsn 4383 . . . . . . . . . . . 12 ({𝑣𝑉𝑣𝐼𝑒} ∈ {∅} ↔ {𝑣𝑉𝑣𝐼𝑒} = ∅)
3331, 32sylnibr 321 . . . . . . . . . . 11 (((𝐺𝑊𝐼 ⊆ (𝑉 × 𝐿) ∧ ran 𝐼 = 𝐿) ∧ 𝑒𝐿) → ¬ {𝑣𝑉𝑣𝐼𝑒} ∈ {∅})
3420, 33eldifd 3780 . . . . . . . . . 10 (((𝐺𝑊𝐼 ⊆ (𝑉 × 𝐿) ∧ ran 𝐼 = 𝐿) ∧ 𝑒𝐿) → {𝑣𝑉𝑣𝐼𝑒} ∈ (𝒫 𝑉 ∖ {∅}))
3534fmpttd 6611 . . . . . . . . 9 ((𝐺𝑊𝐼 ⊆ (𝑉 × 𝐿) ∧ ran 𝐼 = 𝐿) → (𝑒𝐿 ↦ {𝑣𝑉𝑣𝐼𝑒}):𝐿⟶(𝒫 𝑉 ∖ {∅}))
36 simpl 475 . . . . . . . . . 10 ((𝐸 = (𝑒𝐿 ↦ {𝑣𝑉𝑣𝐼𝑒}) ∧ dom 𝐸 = 𝐿) → 𝐸 = (𝑒𝐿 ↦ {𝑣𝑉𝑣𝐼𝑒}))
37 simpr 478 . . . . . . . . . 10 ((𝐸 = (𝑒𝐿 ↦ {𝑣𝑉𝑣𝐼𝑒}) ∧ dom 𝐸 = 𝐿) → dom 𝐸 = 𝐿)
3836, 37feq12d 6244 . . . . . . . . 9 ((𝐸 = (𝑒𝐿 ↦ {𝑣𝑉𝑣𝐼𝑒}) ∧ dom 𝐸 = 𝐿) → (𝐸:dom 𝐸⟶(𝒫 𝑉 ∖ {∅}) ↔ (𝑒𝐿 ↦ {𝑣𝑉𝑣𝐼𝑒}):𝐿⟶(𝒫 𝑉 ∖ {∅})))
3935, 38syl5ibr 238 . . . . . . . 8 ((𝐸 = (𝑒𝐿 ↦ {𝑣𝑉𝑣𝐼𝑒}) ∧ dom 𝐸 = 𝐿) → ((𝐺𝑊𝐼 ⊆ (𝑉 × 𝐿) ∧ ran 𝐼 = 𝐿) → 𝐸:dom 𝐸⟶(𝒫 𝑉 ∖ {∅})))
4016, 39mpdan 679 . . . . . . 7 (𝐸 = (𝑒𝐿 ↦ {𝑣𝑉𝑣𝐼𝑒}) → ((𝐺𝑊𝐼 ⊆ (𝑉 × 𝐿) ∧ ran 𝐼 = 𝐿) → 𝐸:dom 𝐸⟶(𝒫 𝑉 ∖ {∅})))
4140imp 396 . . . . . 6 ((𝐸 = (𝑒𝐿 ↦ {𝑣𝑉𝑣𝐼𝑒}) ∧ (𝐺𝑊𝐼 ⊆ (𝑉 × 𝐿) ∧ ran 𝐼 = 𝐿)) → 𝐸:dom 𝐸⟶(𝒫 𝑉 ∖ {∅}))
428, 41syl6bir 246 . . . . 5 (𝑉 = 𝑃 → ((𝐸 = (𝑒𝐿 ↦ {𝑣𝑃𝑣𝐼𝑒}) ∧ (𝐺𝑊𝐼 ⊆ (𝑃 × 𝐿) ∧ ran 𝐼 = 𝐿)) → 𝐸:dom 𝐸⟶(𝒫 𝑉 ∖ {∅})))
4342expdimp 445 . . . 4 ((𝑉 = 𝑃𝐸 = (𝑒𝐿 ↦ {𝑣𝑃𝑣𝐼𝑒})) → ((𝐺𝑊𝐼 ⊆ (𝑃 × 𝐿) ∧ ran 𝐼 = 𝐿) → 𝐸:dom 𝐸⟶(𝒫 𝑉 ∖ {∅})))
4443impcom 397 . . 3 (((𝐺𝑊𝐼 ⊆ (𝑃 × 𝐿) ∧ ran 𝐼 = 𝐿) ∧ (𝑉 = 𝑃𝐸 = (𝑒𝐿 ↦ {𝑣𝑃𝑣𝐼𝑒}))) → 𝐸:dom 𝐸⟶(𝒫 𝑉 ∖ {∅}))
45 incistruhgr.e . . . . . 6 𝐸 = (iEdg‘𝐺)
4610, 45isuhgr 26295 . . . . 5 (𝐺𝑊 → (𝐺 ∈ UHGraph ↔ 𝐸:dom 𝐸⟶(𝒫 𝑉 ∖ {∅})))
47463ad2ant1 1164 . . . 4 ((𝐺𝑊𝐼 ⊆ (𝑃 × 𝐿) ∧ ran 𝐼 = 𝐿) → (𝐺 ∈ UHGraph ↔ 𝐸:dom 𝐸⟶(𝒫 𝑉 ∖ {∅})))
4847adantr 473 . . 3 (((𝐺𝑊𝐼 ⊆ (𝑃 × 𝐿) ∧ ran 𝐼 = 𝐿) ∧ (𝑉 = 𝑃𝐸 = (𝑒𝐿 ↦ {𝑣𝑃𝑣𝐼𝑒}))) → (𝐺 ∈ UHGraph ↔ 𝐸:dom 𝐸⟶(𝒫 𝑉 ∖ {∅})))
4944, 48mpbird 249 . 2 (((𝐺𝑊𝐼 ⊆ (𝑃 × 𝐿) ∧ ran 𝐼 = 𝐿) ∧ (𝑉 = 𝑃𝐸 = (𝑒𝐿 ↦ {𝑣𝑃𝑣𝐼𝑒}))) → 𝐺 ∈ UHGraph)
5049ex 402 1 ((𝐺𝑊𝐼 ⊆ (𝑃 × 𝐿) ∧ ran 𝐼 = 𝐿) → ((𝑉 = 𝑃𝐸 = (𝑒𝐿 ↦ {𝑣𝑃𝑣𝐼𝑒})) → 𝐺 ∈ UHGraph))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 198  wa 385  w3a 1108   = wceq 1653  wcel 2157  wne 2971  wrex 3090  {crab 3093  cdif 3766  wss 3769  c0 4115  𝒫 cpw 4349  {csn 4368   class class class wbr 4843  cmpt 4922   × cxp 5310  dom cdm 5312  ran crn 5313  wf 6097  cfv 6101  Vtxcvtx 26231  iEdgciedg 26232  UHGraphcuhgr 26291
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1891  ax-4 1905  ax-5 2006  ax-6 2072  ax-7 2107  ax-9 2166  ax-10 2185  ax-11 2200  ax-12 2213  ax-13 2377  ax-ext 2777  ax-sep 4975  ax-nul 4983  ax-pr 5097
This theorem depends on definitions:  df-bi 199  df-an 386  df-or 875  df-3an 1110  df-tru 1657  df-ex 1876  df-nf 1880  df-sb 2065  df-mo 2591  df-eu 2609  df-clab 2786  df-cleq 2792  df-clel 2795  df-nfc 2930  df-ne 2972  df-ral 3094  df-rex 3095  df-rab 3098  df-v 3387  df-sbc 3634  df-dif 3772  df-un 3774  df-in 3776  df-ss 3783  df-nul 4116  df-if 4278  df-pw 4351  df-sn 4369  df-pr 4371  df-op 4375  df-uni 4629  df-br 4844  df-opab 4906  df-mpt 4923  df-id 5220  df-xp 5318  df-rel 5319  df-cnv 5320  df-co 5321  df-dm 5322  df-rn 5323  df-res 5324  df-ima 5325  df-iota 6064  df-fun 6103  df-fn 6104  df-f 6105  df-fv 6109  df-uhgr 26293
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator