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

Theorem vtxdginducedm1 28790
Description: The degree of a vertex 𝑣 in the induced subgraph 𝑆 of a pseudograph 𝐺 obtained by removing one vertex 𝑁 plus the number of edges joining the vertex 𝑣 and the vertex 𝑁 is the degree of the vertex 𝑣 in the pseudograph 𝐺. (Contributed by AV, 17-Dec-2021.)
Hypotheses
Ref Expression
vtxdginducedm1.v 𝑉 = (Vtxβ€˜πΊ)
vtxdginducedm1.e 𝐸 = (iEdgβ€˜πΊ)
vtxdginducedm1.k 𝐾 = (𝑉 βˆ– {𝑁})
vtxdginducedm1.i 𝐼 = {𝑖 ∈ dom 𝐸 ∣ 𝑁 βˆ‰ (πΈβ€˜π‘–)}
vtxdginducedm1.p 𝑃 = (𝐸 β†Ύ 𝐼)
vtxdginducedm1.s 𝑆 = ⟨𝐾, π‘ƒβŸ©
vtxdginducedm1.j 𝐽 = {𝑖 ∈ dom 𝐸 ∣ 𝑁 ∈ (πΈβ€˜π‘–)}
Assertion
Ref Expression
vtxdginducedm1 βˆ€π‘£ ∈ (𝑉 βˆ– {𝑁})((VtxDegβ€˜πΊ)β€˜π‘£) = (((VtxDegβ€˜π‘†)β€˜π‘£) +𝑒 (β™―β€˜{𝑙 ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘™)}))
Distinct variable groups:   𝑖,𝐸   𝑖,𝑁   𝐸,𝑙   𝐽,𝑙   𝑣,𝑙
Allowed substitution hints:   𝑃(𝑣,𝑖,𝑙)   𝑆(𝑣,𝑖,𝑙)   𝐸(𝑣)   𝐺(𝑣,𝑖,𝑙)   𝐼(𝑣,𝑖,𝑙)   𝐽(𝑣,𝑖)   𝐾(𝑣,𝑖,𝑙)   𝑁(𝑣,𝑙)   𝑉(𝑣,𝑖,𝑙)

Proof of Theorem vtxdginducedm1
Dummy variable π‘˜ is distinct from all other variables.
StepHypRef Expression
1 vtxdginducedm1.j . . . . . . . . . . . 12 𝐽 = {𝑖 ∈ dom 𝐸 ∣ 𝑁 ∈ (πΈβ€˜π‘–)}
2 vtxdginducedm1.i . . . . . . . . . . . 12 𝐼 = {𝑖 ∈ dom 𝐸 ∣ 𝑁 βˆ‰ (πΈβ€˜π‘–)}
31, 2elnelun 4389 . . . . . . . . . . 11 (𝐽 βˆͺ 𝐼) = dom 𝐸
43eqcomi 2742 . . . . . . . . . 10 dom 𝐸 = (𝐽 βˆͺ 𝐼)
54rabeqi 3446 . . . . . . . . 9 {π‘˜ ∈ dom 𝐸 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)} = {π‘˜ ∈ (𝐽 βˆͺ 𝐼) ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}
6 rabun2 4313 . . . . . . . . 9 {π‘˜ ∈ (𝐽 βˆͺ 𝐼) ∣ 𝑣 ∈ (πΈβ€˜π‘˜)} = ({π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)} βˆͺ {π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)})
75, 6eqtri 2761 . . . . . . . 8 {π‘˜ ∈ dom 𝐸 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)} = ({π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)} βˆͺ {π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)})
87fveq2i 6892 . . . . . . 7 (β™―β€˜{π‘˜ ∈ dom 𝐸 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) = (β™―β€˜({π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)} βˆͺ {π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}))
9 vtxdginducedm1.e . . . . . . . . . . 11 𝐸 = (iEdgβ€˜πΊ)
109fvexi 6903 . . . . . . . . . 10 𝐸 ∈ V
1110dmex 7899 . . . . . . . . 9 dom 𝐸 ∈ V
121, 11rab2ex 5335 . . . . . . . 8 {π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)} ∈ V
132, 11rab2ex 5335 . . . . . . . 8 {π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)} ∈ V
14 ssrab2 4077 . . . . . . . . . 10 {π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)} βŠ† 𝐽
15 ssrab2 4077 . . . . . . . . . 10 {π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)} βŠ† 𝐼
16 ss2in 4236 . . . . . . . . . 10 (({π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)} βŠ† 𝐽 ∧ {π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)} βŠ† 𝐼) β†’ ({π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)} ∩ {π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) βŠ† (𝐽 ∩ 𝐼))
1714, 15, 16mp2an 691 . . . . . . . . 9 ({π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)} ∩ {π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) βŠ† (𝐽 ∩ 𝐼)
181, 2elneldisj 4388 . . . . . . . . . . 11 (𝐽 ∩ 𝐼) = βˆ…
1918sseq2i 4011 . . . . . . . . . 10 (({π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)} ∩ {π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) βŠ† (𝐽 ∩ 𝐼) ↔ ({π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)} ∩ {π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) βŠ† βˆ…)
20 ss0 4398 . . . . . . . . . 10 (({π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)} ∩ {π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) βŠ† βˆ… β†’ ({π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)} ∩ {π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) = βˆ…)
2119, 20sylbi 216 . . . . . . . . 9 (({π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)} ∩ {π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) βŠ† (𝐽 ∩ 𝐼) β†’ ({π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)} ∩ {π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) = βˆ…)
2217, 21ax-mp 5 . . . . . . . 8 ({π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)} ∩ {π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) = βˆ…
23 hashunx 14343 . . . . . . . 8 (({π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)} ∈ V ∧ {π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)} ∈ V ∧ ({π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)} ∩ {π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) = βˆ…) β†’ (β™―β€˜({π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)} βˆͺ {π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)})) = ((β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)})))
2412, 13, 22, 23mp3an 1462 . . . . . . 7 (β™―β€˜({π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)} βˆͺ {π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)})) = ((β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}))
258, 24eqtri 2761 . . . . . 6 (β™―β€˜{π‘˜ ∈ dom 𝐸 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) = ((β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}))
264rabeqi 3446 . . . . . . . . 9 {π‘˜ ∈ dom 𝐸 ∣ (πΈβ€˜π‘˜) = {𝑣}} = {π‘˜ ∈ (𝐽 βˆͺ 𝐼) ∣ (πΈβ€˜π‘˜) = {𝑣}}
27 rabun2 4313 . . . . . . . . 9 {π‘˜ ∈ (𝐽 βˆͺ 𝐼) ∣ (πΈβ€˜π‘˜) = {𝑣}} = ({π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}} βˆͺ {π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}})
2826, 27eqtri 2761 . . . . . . . 8 {π‘˜ ∈ dom 𝐸 ∣ (πΈβ€˜π‘˜) = {𝑣}} = ({π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}} βˆͺ {π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}})
2928fveq2i 6892 . . . . . . 7 (β™―β€˜{π‘˜ ∈ dom 𝐸 ∣ (πΈβ€˜π‘˜) = {𝑣}}) = (β™―β€˜({π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}} βˆͺ {π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}}))
301, 11rab2ex 5335 . . . . . . . 8 {π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}} ∈ V
312, 11rab2ex 5335 . . . . . . . 8 {π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}} ∈ V
32 ssrab2 4077 . . . . . . . . . 10 {π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}} βŠ† 𝐽
33 ssrab2 4077 . . . . . . . . . 10 {π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}} βŠ† 𝐼
34 ss2in 4236 . . . . . . . . . 10 (({π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}} βŠ† 𝐽 ∧ {π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}} βŠ† 𝐼) β†’ ({π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}} ∩ {π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}}) βŠ† (𝐽 ∩ 𝐼))
3532, 33, 34mp2an 691 . . . . . . . . 9 ({π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}} ∩ {π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}}) βŠ† (𝐽 ∩ 𝐼)
3618sseq2i 4011 . . . . . . . . . 10 (({π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}} ∩ {π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}}) βŠ† (𝐽 ∩ 𝐼) ↔ ({π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}} ∩ {π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}}) βŠ† βˆ…)
37 ss0 4398 . . . . . . . . . 10 (({π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}} ∩ {π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}}) βŠ† βˆ… β†’ ({π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}} ∩ {π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}}) = βˆ…)
3836, 37sylbi 216 . . . . . . . . 9 (({π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}} ∩ {π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}}) βŠ† (𝐽 ∩ 𝐼) β†’ ({π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}} ∩ {π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}}) = βˆ…)
3935, 38ax-mp 5 . . . . . . . 8 ({π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}} ∩ {π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}}) = βˆ…
40 hashunx 14343 . . . . . . . 8 (({π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}} ∈ V ∧ {π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}} ∈ V ∧ ({π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}} ∩ {π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}}) = βˆ…) β†’ (β™―β€˜({π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}} βˆͺ {π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}})) = ((β™―β€˜{π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}})))
4130, 31, 39, 40mp3an 1462 . . . . . . 7 (β™―β€˜({π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}} βˆͺ {π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}})) = ((β™―β€˜{π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}}))
4229, 41eqtri 2761 . . . . . 6 (β™―β€˜{π‘˜ ∈ dom 𝐸 ∣ (πΈβ€˜π‘˜) = {𝑣}}) = ((β™―β€˜{π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}}))
4325, 42oveq12i 7418 . . . . 5 ((β™―β€˜{π‘˜ ∈ dom 𝐸 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ dom 𝐸 ∣ (πΈβ€˜π‘˜) = {𝑣}})) = (((β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)})) +𝑒 ((β™―β€˜{π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}})))
44 hashxnn0 14296 . . . . . . . . 9 ({π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)} ∈ V β†’ (β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) ∈ β„•0*)
4512, 44ax-mp 5 . . . . . . . 8 (β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) ∈ β„•0*
4645a1i 11 . . . . . . 7 (𝑣 ∈ (𝑉 βˆ– {𝑁}) β†’ (β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) ∈ β„•0*)
47 hashxnn0 14296 . . . . . . . . 9 ({π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)} ∈ V β†’ (β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) ∈ β„•0*)
4813, 47ax-mp 5 . . . . . . . 8 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) ∈ β„•0*
4948a1i 11 . . . . . . 7 (𝑣 ∈ (𝑉 βˆ– {𝑁}) β†’ (β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) ∈ β„•0*)
50 hashxnn0 14296 . . . . . . . . 9 ({π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}} ∈ V β†’ (β™―β€˜{π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}}) ∈ β„•0*)
5130, 50ax-mp 5 . . . . . . . 8 (β™―β€˜{π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}}) ∈ β„•0*
5251a1i 11 . . . . . . 7 (𝑣 ∈ (𝑉 βˆ– {𝑁}) β†’ (β™―β€˜{π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}}) ∈ β„•0*)
53 hashxnn0 14296 . . . . . . . . 9 ({π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}} ∈ V β†’ (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}}) ∈ β„•0*)
5431, 53ax-mp 5 . . . . . . . 8 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}}) ∈ β„•0*
5554a1i 11 . . . . . . 7 (𝑣 ∈ (𝑉 βˆ– {𝑁}) β†’ (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}}) ∈ β„•0*)
5646, 49, 52, 55xnn0add4d 13280 . . . . . 6 (𝑣 ∈ (𝑉 βˆ– {𝑁}) β†’ (((β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)})) +𝑒 ((β™―β€˜{π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}}))) = (((β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}})) +𝑒 ((β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}}))))
57 xnn0xaddcl 13211 . . . . . . . . . 10 (((β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) ∈ β„•0* ∧ (β™―β€˜{π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}}) ∈ β„•0*) β†’ ((β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}})) ∈ β„•0*)
5845, 51, 57mp2an 691 . . . . . . . . 9 ((β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}})) ∈ β„•0*
59 xnn0xr 12546 . . . . . . . . 9 (((β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}})) ∈ β„•0* β†’ ((β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}})) ∈ ℝ*)
6058, 59ax-mp 5 . . . . . . . 8 ((β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}})) ∈ ℝ*
61 xnn0xaddcl 13211 . . . . . . . . . 10 (((β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) ∈ β„•0* ∧ (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}}) ∈ β„•0*) β†’ ((β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}})) ∈ β„•0*)
6248, 54, 61mp2an 691 . . . . . . . . 9 ((β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}})) ∈ β„•0*
63 xnn0xr 12546 . . . . . . . . 9 (((β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}})) ∈ β„•0* β†’ ((β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}})) ∈ ℝ*)
6462, 63ax-mp 5 . . . . . . . 8 ((β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}})) ∈ ℝ*
65 xaddcom 13216 . . . . . . . 8 ((((β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}})) ∈ ℝ* ∧ ((β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}})) ∈ ℝ*) β†’ (((β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}})) +𝑒 ((β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}}))) = (((β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}})) +𝑒 ((β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}}))))
6660, 64, 65mp2an 691 . . . . . . 7 (((β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}})) +𝑒 ((β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}}))) = (((β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}})) +𝑒 ((β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}})))
67 vtxdginducedm1.v . . . . . . . . . . . 12 𝑉 = (Vtxβ€˜πΊ)
68 vtxdginducedm1.k . . . . . . . . . . . 12 𝐾 = (𝑉 βˆ– {𝑁})
69 vtxdginducedm1.p . . . . . . . . . . . 12 𝑃 = (𝐸 β†Ύ 𝐼)
70 vtxdginducedm1.s . . . . . . . . . . . 12 𝑆 = ⟨𝐾, π‘ƒβŸ©
7167, 9, 68, 2, 69, 70, 1vtxdginducedm1lem4 28789 . . . . . . . . . . 11 (𝑣 ∈ (𝑉 βˆ– {𝑁}) β†’ (β™―β€˜{π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}}) = 0)
7271oveq2d 7422 . . . . . . . . . 10 (𝑣 ∈ (𝑉 βˆ– {𝑁}) β†’ ((β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}})) = ((β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 0))
73 xnn0xr 12546 . . . . . . . . . . . 12 ((β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) ∈ β„•0* β†’ (β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) ∈ ℝ*)
7445, 73ax-mp 5 . . . . . . . . . . 11 (β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) ∈ ℝ*
75 xaddrid 13217 . . . . . . . . . . 11 ((β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) ∈ ℝ* β†’ ((β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 0) = (β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}))
7674, 75ax-mp 5 . . . . . . . . . 10 ((β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 0) = (β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)})
7772, 76eqtrdi 2789 . . . . . . . . 9 (𝑣 ∈ (𝑉 βˆ– {𝑁}) β†’ ((β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}})) = (β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}))
78 fveq2 6889 . . . . . . . . . . . 12 (π‘˜ = 𝑙 β†’ (πΈβ€˜π‘˜) = (πΈβ€˜π‘™))
7978eleq2d 2820 . . . . . . . . . . 11 (π‘˜ = 𝑙 β†’ (𝑣 ∈ (πΈβ€˜π‘˜) ↔ 𝑣 ∈ (πΈβ€˜π‘™)))
8079cbvrabv 3443 . . . . . . . . . 10 {π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)} = {𝑙 ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘™)}
8180fveq2i 6892 . . . . . . . . 9 (β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) = (β™―β€˜{𝑙 ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘™)})
8277, 81eqtrdi 2789 . . . . . . . 8 (𝑣 ∈ (𝑉 βˆ– {𝑁}) β†’ ((β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}})) = (β™―β€˜{𝑙 ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘™)}))
8382oveq2d 7422 . . . . . . 7 (𝑣 ∈ (𝑉 βˆ– {𝑁}) β†’ (((β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}})) +𝑒 ((β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}}))) = (((β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}})) +𝑒 (β™―β€˜{𝑙 ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘™)})))
8466, 83eqtrid 2785 . . . . . 6 (𝑣 ∈ (𝑉 βˆ– {𝑁}) β†’ (((β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}})) +𝑒 ((β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}}))) = (((β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}})) +𝑒 (β™―β€˜{𝑙 ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘™)})))
8556, 84eqtrd 2773 . . . . 5 (𝑣 ∈ (𝑉 βˆ– {𝑁}) β†’ (((β™―β€˜{π‘˜ ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)})) +𝑒 ((β™―β€˜{π‘˜ ∈ 𝐽 ∣ (πΈβ€˜π‘˜) = {𝑣}}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}}))) = (((β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}})) +𝑒 (β™―β€˜{𝑙 ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘™)})))
8643, 85eqtrid 2785 . . . 4 (𝑣 ∈ (𝑉 βˆ– {𝑁}) β†’ ((β™―β€˜{π‘˜ ∈ dom 𝐸 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ dom 𝐸 ∣ (πΈβ€˜π‘˜) = {𝑣}})) = (((β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}})) +𝑒 (β™―β€˜{𝑙 ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘™)})))
8767, 9, 68, 2, 69, 70vtxdginducedm1lem2 28787 . . . . . . . . . 10 dom (iEdgβ€˜π‘†) = 𝐼
8887rabeqi 3446 . . . . . . . . 9 {π‘˜ ∈ dom (iEdgβ€˜π‘†) ∣ 𝑣 ∈ ((iEdgβ€˜π‘†)β€˜π‘˜)} = {π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ ((iEdgβ€˜π‘†)β€˜π‘˜)}
8967, 9, 68, 2, 69, 70vtxdginducedm1lem3 28788 . . . . . . . . . . 11 (π‘˜ ∈ 𝐼 β†’ ((iEdgβ€˜π‘†)β€˜π‘˜) = (πΈβ€˜π‘˜))
9089eleq2d 2820 . . . . . . . . . 10 (π‘˜ ∈ 𝐼 β†’ (𝑣 ∈ ((iEdgβ€˜π‘†)β€˜π‘˜) ↔ 𝑣 ∈ (πΈβ€˜π‘˜)))
9190rabbiia 3437 . . . . . . . . 9 {π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ ((iEdgβ€˜π‘†)β€˜π‘˜)} = {π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}
9288, 91eqtri 2761 . . . . . . . 8 {π‘˜ ∈ dom (iEdgβ€˜π‘†) ∣ 𝑣 ∈ ((iEdgβ€˜π‘†)β€˜π‘˜)} = {π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}
9392fveq2i 6892 . . . . . . 7 (β™―β€˜{π‘˜ ∈ dom (iEdgβ€˜π‘†) ∣ 𝑣 ∈ ((iEdgβ€˜π‘†)β€˜π‘˜)}) = (β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)})
9487rabeqi 3446 . . . . . . . . 9 {π‘˜ ∈ dom (iEdgβ€˜π‘†) ∣ ((iEdgβ€˜π‘†)β€˜π‘˜) = {𝑣}} = {π‘˜ ∈ 𝐼 ∣ ((iEdgβ€˜π‘†)β€˜π‘˜) = {𝑣}}
9589eqeq1d 2735 . . . . . . . . . 10 (π‘˜ ∈ 𝐼 β†’ (((iEdgβ€˜π‘†)β€˜π‘˜) = {𝑣} ↔ (πΈβ€˜π‘˜) = {𝑣}))
9695rabbiia 3437 . . . . . . . . 9 {π‘˜ ∈ 𝐼 ∣ ((iEdgβ€˜π‘†)β€˜π‘˜) = {𝑣}} = {π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}}
9794, 96eqtri 2761 . . . . . . . 8 {π‘˜ ∈ dom (iEdgβ€˜π‘†) ∣ ((iEdgβ€˜π‘†)β€˜π‘˜) = {𝑣}} = {π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}}
9897fveq2i 6892 . . . . . . 7 (β™―β€˜{π‘˜ ∈ dom (iEdgβ€˜π‘†) ∣ ((iEdgβ€˜π‘†)β€˜π‘˜) = {𝑣}}) = (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}})
9993, 98oveq12i 7418 . . . . . 6 ((β™―β€˜{π‘˜ ∈ dom (iEdgβ€˜π‘†) ∣ 𝑣 ∈ ((iEdgβ€˜π‘†)β€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ dom (iEdgβ€˜π‘†) ∣ ((iEdgβ€˜π‘†)β€˜π‘˜) = {𝑣}})) = ((β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}}))
10099eqcomi 2742 . . . . 5 ((β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}})) = ((β™―β€˜{π‘˜ ∈ dom (iEdgβ€˜π‘†) ∣ 𝑣 ∈ ((iEdgβ€˜π‘†)β€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ dom (iEdgβ€˜π‘†) ∣ ((iEdgβ€˜π‘†)β€˜π‘˜) = {𝑣}}))
101100oveq1i 7416 . . . 4 (((β™―β€˜{π‘˜ ∈ 𝐼 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ 𝐼 ∣ (πΈβ€˜π‘˜) = {𝑣}})) +𝑒 (β™―β€˜{𝑙 ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘™)})) = (((β™―β€˜{π‘˜ ∈ dom (iEdgβ€˜π‘†) ∣ 𝑣 ∈ ((iEdgβ€˜π‘†)β€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ dom (iEdgβ€˜π‘†) ∣ ((iEdgβ€˜π‘†)β€˜π‘˜) = {𝑣}})) +𝑒 (β™―β€˜{𝑙 ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘™)}))
10286, 101eqtrdi 2789 . . 3 (𝑣 ∈ (𝑉 βˆ– {𝑁}) β†’ ((β™―β€˜{π‘˜ ∈ dom 𝐸 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ dom 𝐸 ∣ (πΈβ€˜π‘˜) = {𝑣}})) = (((β™―β€˜{π‘˜ ∈ dom (iEdgβ€˜π‘†) ∣ 𝑣 ∈ ((iEdgβ€˜π‘†)β€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ dom (iEdgβ€˜π‘†) ∣ ((iEdgβ€˜π‘†)β€˜π‘˜) = {𝑣}})) +𝑒 (β™―β€˜{𝑙 ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘™)})))
103 eldifi 4126 . . . 4 (𝑣 ∈ (𝑉 βˆ– {𝑁}) β†’ 𝑣 ∈ 𝑉)
104 eqid 2733 . . . . 5 dom 𝐸 = dom 𝐸
10567, 9, 104vtxdgval 28715 . . . 4 (𝑣 ∈ 𝑉 β†’ ((VtxDegβ€˜πΊ)β€˜π‘£) = ((β™―β€˜{π‘˜ ∈ dom 𝐸 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ dom 𝐸 ∣ (πΈβ€˜π‘˜) = {𝑣}})))
106103, 105syl 17 . . 3 (𝑣 ∈ (𝑉 βˆ– {𝑁}) β†’ ((VtxDegβ€˜πΊ)β€˜π‘£) = ((β™―β€˜{π‘˜ ∈ dom 𝐸 ∣ 𝑣 ∈ (πΈβ€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ dom 𝐸 ∣ (πΈβ€˜π‘˜) = {𝑣}})))
10770fveq2i 6892 . . . . . . . 8 (Vtxβ€˜π‘†) = (Vtxβ€˜βŸ¨πΎ, π‘ƒβŸ©)
10867fvexi 6903 . . . . . . . . . 10 𝑉 ∈ V
109 difexg 5327 . . . . . . . . . . 11 (𝑉 ∈ V β†’ (𝑉 βˆ– {𝑁}) ∈ V)
11068, 109eqeltrid 2838 . . . . . . . . . 10 (𝑉 ∈ V β†’ 𝐾 ∈ V)
111108, 110ax-mp 5 . . . . . . . . 9 𝐾 ∈ V
112 resexg 6026 . . . . . . . . . . 11 (𝐸 ∈ V β†’ (𝐸 β†Ύ 𝐼) ∈ V)
11369, 112eqeltrid 2838 . . . . . . . . . 10 (𝐸 ∈ V β†’ 𝑃 ∈ V)
11410, 113ax-mp 5 . . . . . . . . 9 𝑃 ∈ V
115111, 114opvtxfvi 28259 . . . . . . . 8 (Vtxβ€˜βŸ¨πΎ, π‘ƒβŸ©) = 𝐾
116107, 115eqtri 2761 . . . . . . 7 (Vtxβ€˜π‘†) = 𝐾
117116eleq2i 2826 . . . . . 6 (𝑣 ∈ (Vtxβ€˜π‘†) ↔ 𝑣 ∈ 𝐾)
11868eleq2i 2826 . . . . . 6 (𝑣 ∈ 𝐾 ↔ 𝑣 ∈ (𝑉 βˆ– {𝑁}))
119117, 118sylbbr 235 . . . . 5 (𝑣 ∈ (𝑉 βˆ– {𝑁}) β†’ 𝑣 ∈ (Vtxβ€˜π‘†))
120 eqid 2733 . . . . . 6 (Vtxβ€˜π‘†) = (Vtxβ€˜π‘†)
121 eqid 2733 . . . . . 6 (iEdgβ€˜π‘†) = (iEdgβ€˜π‘†)
122 eqid 2733 . . . . . 6 dom (iEdgβ€˜π‘†) = dom (iEdgβ€˜π‘†)
123120, 121, 122vtxdgval 28715 . . . . 5 (𝑣 ∈ (Vtxβ€˜π‘†) β†’ ((VtxDegβ€˜π‘†)β€˜π‘£) = ((β™―β€˜{π‘˜ ∈ dom (iEdgβ€˜π‘†) ∣ 𝑣 ∈ ((iEdgβ€˜π‘†)β€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ dom (iEdgβ€˜π‘†) ∣ ((iEdgβ€˜π‘†)β€˜π‘˜) = {𝑣}})))
124119, 123syl 17 . . . 4 (𝑣 ∈ (𝑉 βˆ– {𝑁}) β†’ ((VtxDegβ€˜π‘†)β€˜π‘£) = ((β™―β€˜{π‘˜ ∈ dom (iEdgβ€˜π‘†) ∣ 𝑣 ∈ ((iEdgβ€˜π‘†)β€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ dom (iEdgβ€˜π‘†) ∣ ((iEdgβ€˜π‘†)β€˜π‘˜) = {𝑣}})))
125124oveq1d 7421 . . 3 (𝑣 ∈ (𝑉 βˆ– {𝑁}) β†’ (((VtxDegβ€˜π‘†)β€˜π‘£) +𝑒 (β™―β€˜{𝑙 ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘™)})) = (((β™―β€˜{π‘˜ ∈ dom (iEdgβ€˜π‘†) ∣ 𝑣 ∈ ((iEdgβ€˜π‘†)β€˜π‘˜)}) +𝑒 (β™―β€˜{π‘˜ ∈ dom (iEdgβ€˜π‘†) ∣ ((iEdgβ€˜π‘†)β€˜π‘˜) = {𝑣}})) +𝑒 (β™―β€˜{𝑙 ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘™)})))
126102, 106, 1253eqtr4d 2783 . 2 (𝑣 ∈ (𝑉 βˆ– {𝑁}) β†’ ((VtxDegβ€˜πΊ)β€˜π‘£) = (((VtxDegβ€˜π‘†)β€˜π‘£) +𝑒 (β™―β€˜{𝑙 ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘™)})))
127126rgen 3064 1 βˆ€π‘£ ∈ (𝑉 βˆ– {𝑁})((VtxDegβ€˜πΊ)β€˜π‘£) = (((VtxDegβ€˜π‘†)β€˜π‘£) +𝑒 (β™―β€˜{𝑙 ∈ 𝐽 ∣ 𝑣 ∈ (πΈβ€˜π‘™)}))
Colors of variables: wff setvar class
Syntax hints:   = wceq 1542   ∈ wcel 2107   βˆ‰ wnel 3047  βˆ€wral 3062  {crab 3433  Vcvv 3475   βˆ– cdif 3945   βˆͺ cun 3946   ∩ cin 3947   βŠ† wss 3948  βˆ…c0 4322  {csn 4628  βŸ¨cop 4634  dom cdm 5676   β†Ύ cres 5678  β€˜cfv 6541  (class class class)co 7406  0cc0 11107  β„*cxr 11244  β„•0*cxnn0 12541   +𝑒 cxad 13087  β™―chash 14287  Vtxcvtx 28246  iEdgciedg 28247  VtxDegcvtxdg 28712
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2704  ax-rep 5285  ax-sep 5299  ax-nul 5306  ax-pow 5363  ax-pr 5427  ax-un 7722  ax-cnex 11163  ax-resscn 11164  ax-1cn 11165  ax-icn 11166  ax-addcl 11167  ax-addrcl 11168  ax-mulcl 11169  ax-mulrcl 11170  ax-mulcom 11171  ax-addass 11172  ax-mulass 11173  ax-distr 11174  ax-i2m1 11175  ax-1ne0 11176  ax-1rid 11177  ax-rnegex 11178  ax-rrecex 11179  ax-cnre 11180  ax-pre-lttri 11181  ax-pre-lttrn 11182  ax-pre-ltadd 11183  ax-pre-mulgt0 11184
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2535  df-eu 2564  df-clab 2711  df-cleq 2725  df-clel 2811  df-nfc 2886  df-ne 2942  df-nel 3048  df-ral 3063  df-rex 3072  df-reu 3378  df-rab 3434  df-v 3477  df-sbc 3778  df-csb 3894  df-dif 3951  df-un 3953  df-in 3955  df-ss 3965  df-pss 3967  df-nul 4323  df-if 4529  df-pw 4604  df-sn 4629  df-pr 4631  df-op 4635  df-uni 4909  df-int 4951  df-iun 4999  df-br 5149  df-opab 5211  df-mpt 5232  df-tr 5266  df-id 5574  df-eprel 5580  df-po 5588  df-so 5589  df-fr 5631  df-we 5633  df-xp 5682  df-rel 5683  df-cnv 5684  df-co 5685  df-dm 5686  df-rn 5687  df-res 5688  df-ima 5689  df-pred 6298  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6493  df-fun 6543  df-fn 6544  df-f 6545  df-f1 6546  df-fo 6547  df-f1o 6548  df-fv 6549  df-riota 7362  df-ov 7409  df-oprab 7410  df-mpo 7411  df-om 7853  df-1st 7972  df-2nd 7973  df-frecs 8263  df-wrecs 8294  df-recs 8368  df-rdg 8407  df-1o 8463  df-oadd 8467  df-er 8700  df-en 8937  df-dom 8938  df-sdom 8939  df-fin 8940  df-dju 9893  df-card 9931  df-pnf 11247  df-mnf 11248  df-xr 11249  df-ltxr 11250  df-le 11251  df-sub 11443  df-neg 11444  df-nn 12210  df-n0 12470  df-xnn0 12542  df-z 12556  df-uz 12820  df-xadd 13090  df-fz 13482  df-hash 14288  df-vtx 28248  df-iedg 28249  df-vtxdg 28713
This theorem is referenced by:  vtxdginducedm1fi  28791
  Copyright terms: Public domain W3C validator