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 30546

Description: Lemma 3 for konigsberg 30549: 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 7444	. . . . 5 ⊢ (0...3) ∈ V
2		s6cli 14921	. . . . . 6 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3}”⟩ ∈ Word V
3	2	elexi 3485	. . . . 5 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3}”⟩ ∈ V
4	1, 3	opvtxfvi 29300	. . . 4 ⊢ (Vtx‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3}”⟩⟩) = (0...3)
5	4	eqcomi 2778	. . 3 ⊢ (0...3) = (Vtx‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3}”⟩⟩)
6		3nn0 12522	. . . 4 ⊢ 3 ∈ ℕ₀
7		nn0fz0 13653	. . . 4 ⊢ (3 ∈ ℕ₀ ↔ 3 ∈ (0...3))
8	6, 7	mpbi 233	. . 3 ⊢ 3 ∈ (0...3)
9	1, 3	opiedgfvi 29301	. . . 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 2778	. . 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 14643	. . . 4 ⊢ ⟨“{2, 3}”⟩ ∈ Word V
12		df-s7 14890	. . . 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 2769	. . . . 5 ⊢ (0...3) = (0...3)
14		eqid 2769	. . . . 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 2769	. . . . 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 30542	. . . 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 1487	. . 3 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3}”⟩ ∈ Word {𝑥 ∈ (𝒫 (0...3) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}
18		s5cli 14920	. . . . . . . 8 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2}”⟩ ∈ Word V
19	18	elexi 3485	. . . . . . 7 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2}”⟩ ∈ V
20	1, 19	opvtxfvi 29300	. . . . . 6 ⊢ (Vtx‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2}”⟩⟩) = (0...3)
21	20	eqcomi 2778	. . . . 5 ⊢ (0...3) = (Vtx‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2}”⟩⟩)
22	1, 19	opiedgfvi 29301	. . . . . 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 2778	. . . . 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 14917	. . . . . 6 ⊢ ⟨“{2, 3} {2, 3}”⟩ ∈ Word V
25		s5s2 14972	. . . . . 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 30542	. . . . . 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 1487	. . . . 5 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2}”⟩ ∈ Word {𝑥 ∈ (𝒫 (0...3) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}
28		s4cli 14919	. . . . . . . . 9 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩ ∈ Word V
29	28	elexi 3485	. . . . . . . 8 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩ ∈ V
30	1, 29	opvtxfvi 29300	. . . . . . 7 ⊢ (Vtx‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩⟩) = (0...3)
31	30	eqcomi 2778	. . . . . 6 ⊢ (0...3) = (Vtx‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩⟩)
32	1, 29	opiedgfvi 29301	. . . . . . 7 ⊢ (iEdg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩⟩) = ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩
33	32	eqcomi 2778	. . . . . 6 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩ = (iEdg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩⟩)
34		s3cli 14918	. . . . . . 7 ⊢ ⟨“{1, 2} {2, 3} {2, 3}”⟩ ∈ Word V
35		s4s3 14968	. . . . . . 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 30542	. . . . . . 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 1487	. . . . . 6 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩ ∈ Word {𝑥 ∈ (𝒫 (0...3) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}
38		s3cli 14918	. . . . . . . . . 10 ⊢ ⟨“{0, 1} {0, 2} {0, 3}”⟩ ∈ Word V
39	38	elexi 3485	. . . . . . . . 9 ⊢ ⟨“{0, 1} {0, 2} {0, 3}”⟩ ∈ V
40	1, 39	opvtxfvi 29300	. . . . . . . 8 ⊢ (Vtx‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3}”⟩⟩) = (0...3)
41	40	eqcomi 2778	. . . . . . 7 ⊢ (0...3) = (Vtx‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3}”⟩⟩)
42	1, 39	opiedgfvi 29301	. . . . . . . 8 ⊢ (iEdg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3}”⟩⟩) = ⟨“{0, 1} {0, 2} {0, 3}”⟩
43	42	eqcomi 2778	. . . . . . 7 ⊢ ⟨“{0, 1} {0, 2} {0, 3}”⟩ = (iEdg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3}”⟩⟩)
44		s4cli 14919	. . . . . . . 8 ⊢ ⟨“{1, 2} {1, 2} {2, 3} {2, 3}”⟩ ∈ Word V
45		s3s4 14970	. . . . . . . 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 30542	. . . . . . . 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 1487	. . . . . . 7 ⊢ ⟨“{0, 1} {0, 2} {0, 3}”⟩ ∈ Word {𝑥 ∈ (𝒫 (0...3) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}
48		s2cli 14917	. . . . . . . . . . . 12 ⊢ ⟨“{0, 1} {0, 2}”⟩ ∈ Word V
49	48	elexi 3485	. . . . . . . . . . 11 ⊢ ⟨“{0, 1} {0, 2}”⟩ ∈ V
50	1, 49	opvtxfvi 29300	. . . . . . . . . 10 ⊢ (Vtx‘⟨(0...3), ⟨“{0, 1} {0, 2}”⟩⟩) = (0...3)
51	50	eqcomi 2778	. . . . . . . . 9 ⊢ (0...3) = (Vtx‘⟨(0...3), ⟨“{0, 1} {0, 2}”⟩⟩)
52	1, 49	opiedgfvi 29301	. . . . . . . . . 10 ⊢ (iEdg‘⟨(0...3), ⟨“{0, 1} {0, 2}”⟩⟩) = ⟨“{0, 1} {0, 2}”⟩
53	52	eqcomi 2778	. . . . . . . . 9 ⊢ ⟨“{0, 1} {0, 2}”⟩ = (iEdg‘⟨(0...3), ⟨“{0, 1} {0, 2}”⟩⟩)
54		s5cli 14920	. . . . . . . . . 10 ⊢ ⟨“{0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩ ∈ Word V
55		s2s5 14971	. . . . . . . . . 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 30542	. . . . . . . . . 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 1487	. . . . . . . . 9 ⊢ ⟨“{0, 1} {0, 2}”⟩ ∈ Word {𝑥 ∈ (𝒫 (0...3) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}
58		s1cli 14643	. . . . . . . . . . . . 13 ⊢ ⟨“{0, 1}”⟩ ∈ Word V
59	58	elexi 3485	. . . . . . . . . . . 12 ⊢ ⟨“{0, 1}”⟩ ∈ V
60	1, 59	opvtxfvi 29300	. . . . . . . . . . 11 ⊢ (Vtx‘⟨(0...3), ⟨“{0, 1}”⟩⟩) = (0...3)
61	60	eqcomi 2778	. . . . . . . . . 10 ⊢ (0...3) = (Vtx‘⟨(0...3), ⟨“{0, 1}”⟩⟩)
62	1, 59	opiedgfvi 29301	. . . . . . . . . . 11 ⊢ (iEdg‘⟨(0...3), ⟨“{0, 1}”⟩⟩) = ⟨“{0, 1}”⟩
63	62	eqcomi 2778	. . . . . . . . . 10 ⊢ ⟨“{0, 1}”⟩ = (iEdg‘⟨(0...3), ⟨“{0, 1}”⟩⟩)
64		s6cli 14921	. . . . . . . . . . 11 ⊢ ⟨“{0, 2} {0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩ ∈ Word V
65		s1s6 14964	. . . . . . . . . . 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 30542	. . . . . . . . . . 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 1487	. . . . . . . . . 10 ⊢ ⟨“{0, 1}”⟩ ∈ Word {𝑥 ∈ (𝒫 (0...3) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}
68		0ex 5272	. . . . . . . . . . . . 13 ⊢ ∅ ∈ V
69	1, 68	opvtxfvi 29300	. . . . . . . . . . . 12 ⊢ (Vtx‘⟨(0...3), ∅⟩) = (0...3)
70	69	eqcomi 2778	. . . . . . . . . . 11 ⊢ (0...3) = (Vtx‘⟨(0...3), ∅⟩)
71	1, 68	opiedgfvi 29301	. . . . . . . . . . . 12 ⊢ (iEdg‘⟨(0...3), ∅⟩) = ∅
72	71	eqcomi 2778	. . . . . . . . . . 11 ⊢ ∅ = (iEdg‘⟨(0...3), ∅⟩)
73		wrd0 14576	. . . . . . . . . . 11 ⊢ ∅ ∈ Word {𝑥 ∈ (𝒫 (0...3) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}
74		eqid 2769	. . . . . . . . . . . 12 ⊢ ∅ = ∅
75	70, 72	vtxdg0e 29765	. . . . . . . . . . . 12 ⊢ ((3 ∈ (0...3) ∧ ∅ = ∅) → ((VtxDeg‘⟨(0...3), ∅⟩)‘3) = 0)
76	8, 74, 75	mp2an 704	. . . . . . . . . . 11 ⊢ ((VtxDeg‘⟨(0...3), ∅⟩)‘3) = 0
77		0elfz 13652	. . . . . . . . . . . 12 ⊢ (3 ∈ ℕ₀ → 0 ∈ (0...3))
78	6, 77	ax-mp 5	. . . . . . . . . . 11 ⊢ 0 ∈ (0...3)
79		3ne0 12350	. . . . . . . . . . . 12 ⊢ 3 ≠ 0
80	79	necomi 3018	. . . . . . . . . . 11 ⊢ 0 ≠ 3
81		1nn0 12520	. . . . . . . . . . . 12 ⊢ 1 ∈ ℕ₀
82		1le3 12455	. . . . . . . . . . . 12 ⊢ 1 ≤ 3
83		elfz2nn0 13646	. . . . . . . . . . . 12 ⊢ (1 ∈ (0...3) ↔ (1 ∈ ℕ₀ ∧ 3 ∈ ℕ₀ ∧ 1 ≤ 3))
84	81, 6, 82, 83	mpbir3an 1358	. . . . . . . . . . 11 ⊢ 1 ∈ (0...3)
85		1re 11208	. . . . . . . . . . . 12 ⊢ 1 ∈ ℝ
86		1lt3 12416	. . . . . . . . . . . 12 ⊢ 1 < 3
87	85, 86	ltneii 11323	. . . . . . . . . . 11 ⊢ 1 ≠ 3
88		s0s1 14959	. . . . . . . . . . . 12 ⊢ ⟨“{0, 1}”⟩ = (∅ ++ ⟨“{0, 1}”⟩)
89	62, 88	eqtri 2792	. . . . . . . . . . 11 ⊢ (iEdg‘⟨(0...3), ⟨“{0, 1}”⟩⟩) = (∅ ++ ⟨“{0, 1}”⟩)
90	70, 8, 72, 73, 76, 60, 78, 80, 84, 87, 89	vdegp1ai 29827	. . . . . . . . . 10 ⊢ ((VtxDeg‘⟨(0...3), ⟨“{0, 1}”⟩⟩)‘3) = 0
91		2nn0 12521	. . . . . . . . . . 11 ⊢ 2 ∈ ℕ₀
92		2re 12315	. . . . . . . . . . . 12 ⊢ 2 ∈ ℝ
93		3re 12321	. . . . . . . . . . . 12 ⊢ 3 ∈ ℝ
94		2lt3 12414	. . . . . . . . . . . 12 ⊢ 2 < 3
95	92, 93, 94	ltleii 11333	. . . . . . . . . . 11 ⊢ 2 ≤ 3
96		elfz2nn0 13646	. . . . . . . . . . 11 ⊢ (2 ∈ (0...3) ↔ (2 ∈ ℕ₀ ∧ 3 ∈ ℕ₀ ∧ 2 ≤ 3))
97	91, 6, 95, 96	mpbir3an 1358	. . . . . . . . . 10 ⊢ 2 ∈ (0...3)
98	92, 94	ltneii 11323	. . . . . . . . . 10 ⊢ 2 ≠ 3
99		df-s2 14885	. . . . . . . . . . 11 ⊢ ⟨“{0, 1} {0, 2}”⟩ = (⟨“{0, 1}”⟩ ++ ⟨“{0, 2}”⟩)
100	52, 99	eqtri 2792	. . . . . . . . . 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 29827	. . . . . . . . 9 ⊢ ((VtxDeg‘⟨(0...3), ⟨“{0, 1} {0, 2}”⟩⟩)‘3) = 0
102		df-s3 14886	. . . . . . . . . 10 ⊢ ⟨“{0, 1} {0, 2} {0, 3}”⟩ = (⟨“{0, 1} {0, 2}”⟩ ++ ⟨“{0, 3}”⟩)
103	42, 102	eqtri 2792	. . . . . . . . 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 29829	. . . . . . . 8 ⊢ ((VtxDeg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3}”⟩⟩)‘3) = (0 + 1)
105		0p1e1 12361	. . . . . . . 8 ⊢ (0 + 1) = 1
106	104, 105	eqtri 2792	. . . . . . 7 ⊢ ((VtxDeg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3}”⟩⟩)‘3) = 1
107		df-s4 14887	. . . . . . . 8 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩ = (⟨“{0, 1} {0, 2} {0, 3}”⟩ ++ ⟨“{1, 2}”⟩)
108	32, 107	eqtri 2792	. . . . . . 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 29827	. . . . . 6 ⊢ ((VtxDeg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩⟩)‘3) = 1
110		df-s5 14888	. . . . . . 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 2792	. . . . . 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 29827	. . . . 5 ⊢ ((VtxDeg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2}”⟩⟩)‘3) = 1
113		df-s6 14889	. . . . . 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 2792	. . . . 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 29829	. . . 4 ⊢ ((VtxDeg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3}”⟩⟩)‘3) = (1 + 1)
116		1p1e2 12364	. . . 4 ⊢ (1 + 1) = 2
117	115, 116	eqtri 2792	. . 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 30538	. . 3 ⊢ (Vtx‘𝐺) = (0...3)
122	118, 119, 120	konigsbergiedg 30539	. . . 4 ⊢ (iEdg‘𝐺) = ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩
123	122, 12	eqtri 2792	. . 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 29829	. 2 ⊢ ((VtxDeg‘𝐺)‘3) = (2 + 1)
125		2p1e3 12382	. 2 ⊢ (2 + 1) = 3
126	124, 125	eqtri 2792	1 ⊢ ((VtxDeg‘𝐺)‘3) = 3

Colors of variables: wff setvar class

Syntax hints: = wceq 1567 ∈ wcel 2149 {crab 3423 Vcvv 3463 ∖ cdif 3910 ∅c0 4294 𝒫 cpw 4567 {csn 4594 {cpr 4596 ⟨cop 4600 class class class wbr 5113 ‘cfv 6537 (class class class)co 7411 0cc0 11100 1c1 11101 + caddc 11103 ≤ cle 11244 2c2 12295 3c3 12296 ℕ₀cn0 12504 ...cfz 13535 ♯chash 14366 Word cword 14550 ++ cconcat 14607 ⟨“cs1 14633 ⟨“cs2 14878 ⟨“cs3 14879 ⟨“cs4 14880 ⟨“cs5 14881 ⟨“cs6 14882 ⟨“cs7 14883 Vtxcvtx 29287 iEdgciedg 29288 VtxDegcvtxdg 29756

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1822 ax-4 1836 ax-5 1937 ax-6 1994 ax-7 2035 ax-8 2151 ax-9 2159 ax-10 2182 ax-11 2198 ax-12 2219 ax-ext 2741 ax-rep 5242 ax-sep 5261 ax-nul 5271 ax-pow 5337 ax-pr 5405 ax-un 7733 ax-cnex 11156 ax-resscn 11157 ax-1cn 11158 ax-icn 11159 ax-addcl 11160 ax-addrcl 11161 ax-mulcl 11162 ax-mulrcl 11163 ax-mulcom 11164 ax-addass 11165 ax-mulass 11166 ax-distr 11167 ax-i2m1 11168 ax-1ne0 11169 ax-1rid 11170 ax-rnegex 11171 ax-rrecex 11172 ax-cnre 11173 ax-pre-lttri 11174 ax-pre-lttrn 11175 ax-pre-ltadd 11176 ax-pre-mulgt0 11177

This theorem depends on definitions: df-bi 210 df-an 401 df-or 861 df-3or 1102 df-3an 1103 df-tru 1570 df-fal 1580 df-ex 1807 df-nf 1811 df-sb 2098 df-mo 2573 df-eu 2603 df-clab 2748 df-cleq 2761 df-clel 2844 df-nfc 2918 df-ne 2965 df-nel 3071 df-ral 3086 df-rex 3096 df-reu 3377 df-rab 3424 df-v 3465 df-sbc 3754 df-csb 3862 df-dif 3916 df-un 3918 df-in 3920 df-ss 3930 df-pss 3933 df-nul 4295 df-if 4493 df-pw 4569 df-sn 4595 df-pr 4597 df-op 4601 df-uni 4877 df-int 4917 df-iun 4962 df-br 5114 df-opab 5178 df-mpt 5197 df-tr 5223 df-id 5557 df-eprel 5562 df-po 5570 df-so 5571 df-fr 5615 df-we 5617 df-xp 5668 df-rel 5669 df-cnv 5670 df-co 5671 df-dm 5672 df-rn 5673 df-res 5674 df-ima 5675 df-pred 6303 df-ord 6364 df-on 6365 df-lim 6366 df-suc 6367 df-iota 6493 df-fun 6539 df-fn 6540 df-f 6541 df-f1 6542 df-fo 6543 df-f1o 6544 df-fv 6545 df-riota 7368 df-ov 7414 df-oprab 7415 df-mpo 7416 df-om 7863 df-1st 7986 df-2nd 7987 df-frecs 8278 df-wrecs 8309 df-recs 8358 df-rdg 8397 df-1o 8453 df-2o 8454 df-oadd 8457 df-er 8694 df-en 8944 df-dom 8945 df-sdom 8946 df-fin 8947 df-dju 9887 df-card 9925 df-pnf 11245 df-mnf 11246 df-xr 11247 df-ltxr 11248 df-le 11249 df-sub 11443 df-neg 11444 df-nn 12234 df-2 12303 df-3 12304 df-n0 12505 df-xnn0 12578 df-z 12592 df-uz 12863 df-xadd 13138 df-fz 13536 df-fzo 13683 df-hash 14367 df-word 14551 df-concat 14608 df-s1 14634 df-s2 14885 df-s3 14886 df-s4 14887 df-s5 14888 df-s6 14889 df-s7 14890 df-vtx 29289 df-iedg 29290 df-vtxdg 29757

This theorem is referenced by: konigsberglem4 30547

W3C validator