konigsberglem3 - Metamath Proof Explorer

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

Theorem konigsberglem3 29497

Description: Lemma 3 for konigsberg 29500: Vertex 3 has degree three. (Contributed by Mario Carneiro, 11-Mar-2015.) (Revised by Mario Carneiro, 28-Feb-2016.) (Revised by AV, 4-Mar-2021.)

**Hypotheses**
Ref	Expression
konigsberg.v	⊢ 𝑉 = (0...3)
konigsberg.e	⊢ 𝐸 = ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩
konigsberg.g	⊢ 𝐺 = ⟨𝑉, 𝐸⟩

**Assertion**
Ref	Expression
konigsberglem3	⊢ ((VtxDeg‘𝐺)‘3) = 3

Proof of Theorem konigsberglem3 Dummy variable 𝑥 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		ovex 7439	. . . . 5 ⊢ (0...3) ∈ V
2		s6cli 14832	. . . . . 6 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3}”⟩ ∈ Word V
3	2	elexi 3494	. . . . 5 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3}”⟩ ∈ V
4	1, 3	opvtxfvi 28259	. . . 4 ⊢ (Vtx‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3}”⟩⟩) = (0...3)
5	4	eqcomi 2742	. . 3 ⊢ (0...3) = (Vtx‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3}”⟩⟩)
6		3nn0 12487	. . . 4 ⊢ 3 ∈ ℕ₀
7		nn0fz0 13596	. . . 4 ⊢ (3 ∈ ℕ₀ ↔ 3 ∈ (0...3))
8	6, 7	mpbi 229	. . 3 ⊢ 3 ∈ (0...3)
9	1, 3	opiedgfvi 28260	. . . 4 ⊢ (iEdg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3}”⟩⟩) = ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3}”⟩
10	9	eqcomi 2742	. . 3 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3}”⟩ = (iEdg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3}”⟩⟩)
11		s1cli 14552	. . . 4 ⊢ ⟨“{2, 3}”⟩ ∈ Word V
12		df-s7 14801	. . . 4 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩ = (⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3}”⟩ ++ ⟨“{2, 3}”⟩)
13		eqid 2733	. . . . 5 ⊢ (0...3) = (0...3)
14		eqid 2733	. . . . 5 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩ = ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩
15		eqid 2733	. . . . 5 ⊢ ⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩⟩ = ⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩⟩
16	13, 14, 15	konigsbergssiedgw 29493	. . . 4 ⊢ ((⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3}”⟩ ∈ Word V ∧ ⟨“{2, 3}”⟩ ∈ Word V ∧ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩ = (⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3}”⟩ ++ ⟨“{2, 3}”⟩)) → ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3}”⟩ ∈ Word {𝑥 ∈ (𝒫 (0...3) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2})
17	2, 11, 12, 16	mp3an 1462	. . 3 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3}”⟩ ∈ Word {𝑥 ∈ (𝒫 (0...3) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}
18		s5cli 14831	. . . . . . . 8 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2}”⟩ ∈ Word V
19	18	elexi 3494	. . . . . . 7 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2}”⟩ ∈ V
20	1, 19	opvtxfvi 28259	. . . . . 6 ⊢ (Vtx‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2}”⟩⟩) = (0...3)
21	20	eqcomi 2742	. . . . 5 ⊢ (0...3) = (Vtx‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2}”⟩⟩)
22	1, 19	opiedgfvi 28260	. . . . . 6 ⊢ (iEdg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2}”⟩⟩) = ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2}”⟩
23	22	eqcomi 2742	. . . . 5 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2}”⟩ = (iEdg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2}”⟩⟩)
24		s2cli 14828	. . . . . 6 ⊢ ⟨“{2, 3} {2, 3}”⟩ ∈ Word V
25		s5s2 14883	. . . . . 6 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩ = (⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2}”⟩ ++ ⟨“{2, 3} {2, 3}”⟩)
26	13, 14, 15	konigsbergssiedgw 29493	. . . . . 6 ⊢ ((⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2}”⟩ ∈ Word V ∧ ⟨“{2, 3} {2, 3}”⟩ ∈ Word V ∧ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩ = (⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2}”⟩ ++ ⟨“{2, 3} {2, 3}”⟩)) → ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2}”⟩ ∈ Word {𝑥 ∈ (𝒫 (0...3) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2})
27	18, 24, 25, 26	mp3an 1462	. . . . 5 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2}”⟩ ∈ Word {𝑥 ∈ (𝒫 (0...3) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}
28		s4cli 14830	. . . . . . . . 9 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩ ∈ Word V
29	28	elexi 3494	. . . . . . . 8 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩ ∈ V
30	1, 29	opvtxfvi 28259	. . . . . . 7 ⊢ (Vtx‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩⟩) = (0...3)
31	30	eqcomi 2742	. . . . . 6 ⊢ (0...3) = (Vtx‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩⟩)
32	1, 29	opiedgfvi 28260	. . . . . . 7 ⊢ (iEdg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩⟩) = ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩
33	32	eqcomi 2742	. . . . . 6 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩ = (iEdg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩⟩)
34		s3cli 14829	. . . . . . 7 ⊢ ⟨“{1, 2} {2, 3} {2, 3}”⟩ ∈ Word V
35		s4s3 14879	. . . . . . 7 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩ = (⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩ ++ ⟨“{1, 2} {2, 3} {2, 3}”⟩)
36	13, 14, 15	konigsbergssiedgw 29493	. . . . . . 7 ⊢ ((⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩ ∈ Word V ∧ ⟨“{1, 2} {2, 3} {2, 3}”⟩ ∈ Word V ∧ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩ = (⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩ ++ ⟨“{1, 2} {2, 3} {2, 3}”⟩)) → ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩ ∈ Word {𝑥 ∈ (𝒫 (0...3) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2})
37	28, 34, 35, 36	mp3an 1462	. . . . . 6 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩ ∈ Word {𝑥 ∈ (𝒫 (0...3) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}
38		s3cli 14829	. . . . . . . . . 10 ⊢ ⟨“{0, 1} {0, 2} {0, 3}”⟩ ∈ Word V
39	38	elexi 3494	. . . . . . . . 9 ⊢ ⟨“{0, 1} {0, 2} {0, 3}”⟩ ∈ V
40	1, 39	opvtxfvi 28259	. . . . . . . 8 ⊢ (Vtx‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3}”⟩⟩) = (0...3)
41	40	eqcomi 2742	. . . . . . 7 ⊢ (0...3) = (Vtx‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3}”⟩⟩)
42	1, 39	opiedgfvi 28260	. . . . . . . 8 ⊢ (iEdg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3}”⟩⟩) = ⟨“{0, 1} {0, 2} {0, 3}”⟩
43	42	eqcomi 2742	. . . . . . 7 ⊢ ⟨“{0, 1} {0, 2} {0, 3}”⟩ = (iEdg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3}”⟩⟩)
44		s4cli 14830	. . . . . . . 8 ⊢ ⟨“{1, 2} {1, 2} {2, 3} {2, 3}”⟩ ∈ Word V
45		s3s4 14881	. . . . . . . 8 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩ = (⟨“{0, 1} {0, 2} {0, 3}”⟩ ++ ⟨“{1, 2} {1, 2} {2, 3} {2, 3}”⟩)
46	13, 14, 15	konigsbergssiedgw 29493	. . . . . . . 8 ⊢ ((⟨“{0, 1} {0, 2} {0, 3}”⟩ ∈ Word V ∧ ⟨“{1, 2} {1, 2} {2, 3} {2, 3}”⟩ ∈ Word V ∧ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩ = (⟨“{0, 1} {0, 2} {0, 3}”⟩ ++ ⟨“{1, 2} {1, 2} {2, 3} {2, 3}”⟩)) → ⟨“{0, 1} {0, 2} {0, 3}”⟩ ∈ Word {𝑥 ∈ (𝒫 (0...3) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2})
47	38, 44, 45, 46	mp3an 1462	. . . . . . 7 ⊢ ⟨“{0, 1} {0, 2} {0, 3}”⟩ ∈ Word {𝑥 ∈ (𝒫 (0...3) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}
48		s2cli 14828	. . . . . . . . . . . 12 ⊢ ⟨“{0, 1} {0, 2}”⟩ ∈ Word V
49	48	elexi 3494	. . . . . . . . . . 11 ⊢ ⟨“{0, 1} {0, 2}”⟩ ∈ V
50	1, 49	opvtxfvi 28259	. . . . . . . . . 10 ⊢ (Vtx‘⟨(0...3), ⟨“{0, 1} {0, 2}”⟩⟩) = (0...3)
51	50	eqcomi 2742	. . . . . . . . 9 ⊢ (0...3) = (Vtx‘⟨(0...3), ⟨“{0, 1} {0, 2}”⟩⟩)
52	1, 49	opiedgfvi 28260	. . . . . . . . . 10 ⊢ (iEdg‘⟨(0...3), ⟨“{0, 1} {0, 2}”⟩⟩) = ⟨“{0, 1} {0, 2}”⟩
53	52	eqcomi 2742	. . . . . . . . 9 ⊢ ⟨“{0, 1} {0, 2}”⟩ = (iEdg‘⟨(0...3), ⟨“{0, 1} {0, 2}”⟩⟩)
54		s5cli 14831	. . . . . . . . . 10 ⊢ ⟨“{0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩ ∈ Word V
55		s2s5 14882	. . . . . . . . . 10 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩ = (⟨“{0, 1} {0, 2}”⟩ ++ ⟨“{0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩)
56	13, 14, 15	konigsbergssiedgw 29493	. . . . . . . . . 10 ⊢ ((⟨“{0, 1} {0, 2}”⟩ ∈ Word V ∧ ⟨“{0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩ ∈ Word V ∧ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩ = (⟨“{0, 1} {0, 2}”⟩ ++ ⟨“{0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩)) → ⟨“{0, 1} {0, 2}”⟩ ∈ Word {𝑥 ∈ (𝒫 (0...3) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2})
57	48, 54, 55, 56	mp3an 1462	. . . . . . . . 9 ⊢ ⟨“{0, 1} {0, 2}”⟩ ∈ Word {𝑥 ∈ (𝒫 (0...3) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}
58		s1cli 14552	. . . . . . . . . . . . 13 ⊢ ⟨“{0, 1}”⟩ ∈ Word V
59	58	elexi 3494	. . . . . . . . . . . 12 ⊢ ⟨“{0, 1}”⟩ ∈ V
60	1, 59	opvtxfvi 28259	. . . . . . . . . . 11 ⊢ (Vtx‘⟨(0...3), ⟨“{0, 1}”⟩⟩) = (0...3)
61	60	eqcomi 2742	. . . . . . . . . 10 ⊢ (0...3) = (Vtx‘⟨(0...3), ⟨“{0, 1}”⟩⟩)
62	1, 59	opiedgfvi 28260	. . . . . . . . . . 11 ⊢ (iEdg‘⟨(0...3), ⟨“{0, 1}”⟩⟩) = ⟨“{0, 1}”⟩
63	62	eqcomi 2742	. . . . . . . . . 10 ⊢ ⟨“{0, 1}”⟩ = (iEdg‘⟨(0...3), ⟨“{0, 1}”⟩⟩)
64		s6cli 14832	. . . . . . . . . . 11 ⊢ ⟨“{0, 2} {0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩ ∈ Word V
65		s1s6 14875	. . . . . . . . . . 11 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩ = (⟨“{0, 1}”⟩ ++ ⟨“{0, 2} {0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩)
66	13, 14, 15	konigsbergssiedgw 29493	. . . . . . . . . . 11 ⊢ ((⟨“{0, 1}”⟩ ∈ Word V ∧ ⟨“{0, 2} {0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩ ∈ Word V ∧ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩ = (⟨“{0, 1}”⟩ ++ ⟨“{0, 2} {0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩)) → ⟨“{0, 1}”⟩ ∈ Word {𝑥 ∈ (𝒫 (0...3) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2})
67	58, 64, 65, 66	mp3an 1462	. . . . . . . . . 10 ⊢ ⟨“{0, 1}”⟩ ∈ Word {𝑥 ∈ (𝒫 (0...3) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}
68		0ex 5307	. . . . . . . . . . . . 13 ⊢ ∅ ∈ V
69	1, 68	opvtxfvi 28259	. . . . . . . . . . . 12 ⊢ (Vtx‘⟨(0...3), ∅⟩) = (0...3)
70	69	eqcomi 2742	. . . . . . . . . . 11 ⊢ (0...3) = (Vtx‘⟨(0...3), ∅⟩)
71	1, 68	opiedgfvi 28260	. . . . . . . . . . . 12 ⊢ (iEdg‘⟨(0...3), ∅⟩) = ∅
72	71	eqcomi 2742	. . . . . . . . . . 11 ⊢ ∅ = (iEdg‘⟨(0...3), ∅⟩)
73		wrd0 14486	. . . . . . . . . . 11 ⊢ ∅ ∈ Word {𝑥 ∈ (𝒫 (0...3) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}
74		eqid 2733	. . . . . . . . . . . 12 ⊢ ∅ = ∅
75	70, 72	vtxdg0e 28721	. . . . . . . . . . . 12 ⊢ ((3 ∈ (0...3) ∧ ∅ = ∅) → ((VtxDeg‘⟨(0...3), ∅⟩)‘3) = 0)
76	8, 74, 75	mp2an 691	. . . . . . . . . . 11 ⊢ ((VtxDeg‘⟨(0...3), ∅⟩)‘3) = 0
77		0elfz 13595	. . . . . . . . . . . 12 ⊢ (3 ∈ ℕ₀ → 0 ∈ (0...3))
78	6, 77	ax-mp 5	. . . . . . . . . . 11 ⊢ 0 ∈ (0...3)
79		3ne0 12315	. . . . . . . . . . . 12 ⊢ 3 ≠ 0
80	79	necomi 2996	. . . . . . . . . . 11 ⊢ 0 ≠ 3
81		1nn0 12485	. . . . . . . . . . . 12 ⊢ 1 ∈ ℕ₀
82		1le3 12421	. . . . . . . . . . . 12 ⊢ 1 ≤ 3
83		elfz2nn0 13589	. . . . . . . . . . . 12 ⊢ (1 ∈ (0...3) ↔ (1 ∈ ℕ₀ ∧ 3 ∈ ℕ₀ ∧ 1 ≤ 3))
84	81, 6, 82, 83	mpbir3an 1342	. . . . . . . . . . 11 ⊢ 1 ∈ (0...3)
85		1re 11211	. . . . . . . . . . . 12 ⊢ 1 ∈ ℝ
86		1lt3 12382	. . . . . . . . . . . 12 ⊢ 1 < 3
87	85, 86	ltneii 11324	. . . . . . . . . . 11 ⊢ 1 ≠ 3
88		s0s1 14870	. . . . . . . . . . . 12 ⊢ ⟨“{0, 1}”⟩ = (∅ ++ ⟨“{0, 1}”⟩)
89	62, 88	eqtri 2761	. . . . . . . . . . 11 ⊢ (iEdg‘⟨(0...3), ⟨“{0, 1}”⟩⟩) = (∅ ++ ⟨“{0, 1}”⟩)
90	70, 8, 72, 73, 76, 60, 78, 80, 84, 87, 89	vdegp1ai 28783	. . . . . . . . . 10 ⊢ ((VtxDeg‘⟨(0...3), ⟨“{0, 1}”⟩⟩)‘3) = 0
91		2nn0 12486	. . . . . . . . . . 11 ⊢ 2 ∈ ℕ₀
92		2re 12283	. . . . . . . . . . . 12 ⊢ 2 ∈ ℝ
93		3re 12289	. . . . . . . . . . . 12 ⊢ 3 ∈ ℝ
94		2lt3 12381	. . . . . . . . . . . 12 ⊢ 2 < 3
95	92, 93, 94	ltleii 11334	. . . . . . . . . . 11 ⊢ 2 ≤ 3
96		elfz2nn0 13589	. . . . . . . . . . 11 ⊢ (2 ∈ (0...3) ↔ (2 ∈ ℕ₀ ∧ 3 ∈ ℕ₀ ∧ 2 ≤ 3))
97	91, 6, 95, 96	mpbir3an 1342	. . . . . . . . . 10 ⊢ 2 ∈ (0...3)
98	92, 94	ltneii 11324	. . . . . . . . . 10 ⊢ 2 ≠ 3
99		df-s2 14796	. . . . . . . . . . 11 ⊢ ⟨“{0, 1} {0, 2}”⟩ = (⟨“{0, 1}”⟩ ++ ⟨“{0, 2}”⟩)
100	52, 99	eqtri 2761	. . . . . . . . . 10 ⊢ (iEdg‘⟨(0...3), ⟨“{0, 1} {0, 2}”⟩⟩) = (⟨“{0, 1}”⟩ ++ ⟨“{0, 2}”⟩)
101	61, 8, 63, 67, 90, 50, 78, 80, 97, 98, 100	vdegp1ai 28783	. . . . . . . . 9 ⊢ ((VtxDeg‘⟨(0...3), ⟨“{0, 1} {0, 2}”⟩⟩)‘3) = 0
102		df-s3 14797	. . . . . . . . . 10 ⊢ ⟨“{0, 1} {0, 2} {0, 3}”⟩ = (⟨“{0, 1} {0, 2}”⟩ ++ ⟨“{0, 3}”⟩)
103	42, 102	eqtri 2761	. . . . . . . . 9 ⊢ (iEdg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3}”⟩⟩) = (⟨“{0, 1} {0, 2}”⟩ ++ ⟨“{0, 3}”⟩)
104	51, 8, 53, 57, 101, 40, 78, 80, 103	vdegp1ci 28785	. . . . . . . 8 ⊢ ((VtxDeg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3}”⟩⟩)‘3) = (0 + 1)
105		0p1e1 12331	. . . . . . . 8 ⊢ (0 + 1) = 1
106	104, 105	eqtri 2761	. . . . . . 7 ⊢ ((VtxDeg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3}”⟩⟩)‘3) = 1
107		df-s4 14798	. . . . . . . 8 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩ = (⟨“{0, 1} {0, 2} {0, 3}”⟩ ++ ⟨“{1, 2}”⟩)
108	32, 107	eqtri 2761	. . . . . . 7 ⊢ (iEdg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩⟩) = (⟨“{0, 1} {0, 2} {0, 3}”⟩ ++ ⟨“{1, 2}”⟩)
109	41, 8, 43, 47, 106, 30, 84, 87, 97, 98, 108	vdegp1ai 28783	. . . . . 6 ⊢ ((VtxDeg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩⟩)‘3) = 1
110		df-s5 14799	. . . . . . 7 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2}”⟩ = (⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩ ++ ⟨“{1, 2}”⟩)
111	22, 110	eqtri 2761	. . . . . 6 ⊢ (iEdg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2}”⟩⟩) = (⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩ ++ ⟨“{1, 2}”⟩)
112	31, 8, 33, 37, 109, 20, 84, 87, 97, 98, 111	vdegp1ai 28783	. . . . 5 ⊢ ((VtxDeg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2}”⟩⟩)‘3) = 1
113		df-s6 14800	. . . . . 6 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3}”⟩ = (⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2}”⟩ ++ ⟨“{2, 3}”⟩)
114	9, 113	eqtri 2761	. . . . 5 ⊢ (iEdg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3}”⟩⟩) = (⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2}”⟩ ++ ⟨“{2, 3}”⟩)
115	21, 8, 23, 27, 112, 4, 97, 98, 114	vdegp1ci 28785	. . . 4 ⊢ ((VtxDeg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3}”⟩⟩)‘3) = (1 + 1)
116		1p1e2 12334	. . . 4 ⊢ (1 + 1) = 2
117	115, 116	eqtri 2761	. . 3 ⊢ ((VtxDeg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3}”⟩⟩)‘3) = 2
118		konigsberg.v	. . . 4 ⊢ 𝑉 = (0...3)
119		konigsberg.e	. . . 4 ⊢ 𝐸 = ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩
120		konigsberg.g	. . . 4 ⊢ 𝐺 = ⟨𝑉, 𝐸⟩
121	118, 119, 120	konigsbergvtx 29489	. . 3 ⊢ (Vtx‘𝐺) = (0...3)
122	118, 119, 120	konigsbergiedg 29490	. . . 4 ⊢ (iEdg‘𝐺) = ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩
123	122, 12	eqtri 2761	. . 3 ⊢ (iEdg‘𝐺) = (⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3}”⟩ ++ ⟨“{2, 3}”⟩)
124	5, 8, 10, 17, 117, 121, 97, 98, 123	vdegp1ci 28785	. 2 ⊢ ((VtxDeg‘𝐺)‘3) = (2 + 1)
125		2p1e3 12351	. 2 ⊢ (2 + 1) = 3
126	124, 125	eqtri 2761	1 ⊢ ((VtxDeg‘𝐺)‘3) = 3

Colors of variables: wff setvar class

Syntax hints: = wceq 1542 ∈ wcel 2107 {crab 3433 Vcvv 3475 ∖ cdif 3945 ∅c0 4322 𝒫 cpw 4602 {csn 4628 {cpr 4630 ⟨cop 4634 class class class wbr 5148 ‘cfv 6541 (class class class)co 7406 0cc0 11107 1c1 11108 + caddc 11110 ≤ cle 11246 2c2 12264 3c3 12265 ℕ₀cn0 12469 ...cfz 13481 ♯chash 14287 Word cword 14461 ++ cconcat 14517 ⟨“cs1 14542 ⟨“cs2 14789 ⟨“cs3 14790 ⟨“cs4 14791 ⟨“cs5 14792 ⟨“cs6 14793 ⟨“cs7 14794 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-2 12272 df-3 12273 df-n0 12470 df-xnn0 12542 df-z 12556 df-uz 12820 df-xadd 13090 df-fz 13482 df-fzo 13625 df-hash 14288 df-word 14462 df-concat 14518 df-s1 14543 df-s2 14796 df-s3 14797 df-s4 14798 df-s5 14799 df-s6 14800 df-s7 14801 df-vtx 28248 df-iedg 28249 df-vtxdg 28713

This theorem is referenced by: konigsberglem4 29498

W3C validator