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 30737

Description: Lemma 3 for konigsberg 30740: 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 7447	. . . . 5 ⊢ (0...3) ∈ V
2		s6cli 14958	. . . . . 6 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3}”⟩ ∈ Word V
3	2	elexi 3472	. . . . 5 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3}”⟩ ∈ V
4	1, 3	opvtxfvi 29469	. . . 4 ⊢ (Vtx‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3}”⟩⟩) = (0...3)
5	4	eqcomi 2769	. . 3 ⊢ (0...3) = (Vtx‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3}”⟩⟩)
6		3nn0 12549	. . . 4 ⊢ 3 ∈ ℕ₀
7		nn0fz0 13683	. . . 4 ⊢ (3 ∈ ℕ₀ ↔ 3 ∈ (0...3))
8	6, 7	mpbi 233	. . 3 ⊢ 3 ∈ (0...3)
9	1, 3	opiedgfvi 29470	. . . 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 2769	. . 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 14675	. . . 4 ⊢ ⟨“{2, 3}”⟩ ∈ Word V
12		df-s7 14927	. . . 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 2760	. . . . 5 ⊢ (0...3) = (0...3)
14		eqid 2760	. . . . 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 2760	. . . . 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 30733	. . . 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 1490	. . 3 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3}”⟩ ∈ Word {𝑥 ∈ (𝒫 (0...3) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}
18		s5cli 14957	. . . . . . . 8 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2}”⟩ ∈ Word V
19	18	elexi 3472	. . . . . . 7 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2}”⟩ ∈ V
20	1, 19	opvtxfvi 29469	. . . . . 6 ⊢ (Vtx‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2}”⟩⟩) = (0...3)
21	20	eqcomi 2769	. . . . 5 ⊢ (0...3) = (Vtx‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2}”⟩⟩)
22	1, 19	opiedgfvi 29470	. . . . . 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 2769	. . . . 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 14954	. . . . . 6 ⊢ ⟨“{2, 3} {2, 3}”⟩ ∈ Word V
25		s5s2 15009	. . . . . 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 30733	. . . . . 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 1490	. . . . 5 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2}”⟩ ∈ Word {𝑥 ∈ (𝒫 (0...3) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}
28		s4cli 14956	. . . . . . . . 9 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩ ∈ Word V
29	28	elexi 3472	. . . . . . . 8 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩ ∈ V
30	1, 29	opvtxfvi 29469	. . . . . . 7 ⊢ (Vtx‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩⟩) = (0...3)
31	30	eqcomi 2769	. . . . . 6 ⊢ (0...3) = (Vtx‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩⟩)
32	1, 29	opiedgfvi 29470	. . . . . . 7 ⊢ (iEdg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩⟩) = ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩
33	32	eqcomi 2769	. . . . . 6 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩ = (iEdg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩⟩)
34		s3cli 14955	. . . . . . 7 ⊢ ⟨“{1, 2} {2, 3} {2, 3}”⟩ ∈ Word V
35		s4s3 15005	. . . . . . 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 30733	. . . . . . 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 1490	. . . . . 6 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩ ∈ Word {𝑥 ∈ (𝒫 (0...3) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}
38		s3cli 14955	. . . . . . . . . 10 ⊢ ⟨“{0, 1} {0, 2} {0, 3}”⟩ ∈ Word V
39	38	elexi 3472	. . . . . . . . 9 ⊢ ⟨“{0, 1} {0, 2} {0, 3}”⟩ ∈ V
40	1, 39	opvtxfvi 29469	. . . . . . . 8 ⊢ (Vtx‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3}”⟩⟩) = (0...3)
41	40	eqcomi 2769	. . . . . . 7 ⊢ (0...3) = (Vtx‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3}”⟩⟩)
42	1, 39	opiedgfvi 29470	. . . . . . . 8 ⊢ (iEdg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3}”⟩⟩) = ⟨“{0, 1} {0, 2} {0, 3}”⟩
43	42	eqcomi 2769	. . . . . . 7 ⊢ ⟨“{0, 1} {0, 2} {0, 3}”⟩ = (iEdg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3}”⟩⟩)
44		s4cli 14956	. . . . . . . 8 ⊢ ⟨“{1, 2} {1, 2} {2, 3} {2, 3}”⟩ ∈ Word V
45		s3s4 15007	. . . . . . . 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 30733	. . . . . . . 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 1490	. . . . . . 7 ⊢ ⟨“{0, 1} {0, 2} {0, 3}”⟩ ∈ Word {𝑥 ∈ (𝒫 (0...3) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}
48		s2cli 14954	. . . . . . . . . . . 12 ⊢ ⟨“{0, 1} {0, 2}”⟩ ∈ Word V
49	48	elexi 3472	. . . . . . . . . . 11 ⊢ ⟨“{0, 1} {0, 2}”⟩ ∈ V
50	1, 49	opvtxfvi 29469	. . . . . . . . . 10 ⊢ (Vtx‘⟨(0...3), ⟨“{0, 1} {0, 2}”⟩⟩) = (0...3)
51	50	eqcomi 2769	. . . . . . . . 9 ⊢ (0...3) = (Vtx‘⟨(0...3), ⟨“{0, 1} {0, 2}”⟩⟩)
52	1, 49	opiedgfvi 29470	. . . . . . . . . 10 ⊢ (iEdg‘⟨(0...3), ⟨“{0, 1} {0, 2}”⟩⟩) = ⟨“{0, 1} {0, 2}”⟩
53	52	eqcomi 2769	. . . . . . . . 9 ⊢ ⟨“{0, 1} {0, 2}”⟩ = (iEdg‘⟨(0...3), ⟨“{0, 1} {0, 2}”⟩⟩)
54		s5cli 14957	. . . . . . . . . 10 ⊢ ⟨“{0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩ ∈ Word V
55		s2s5 15008	. . . . . . . . . 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 30733	. . . . . . . . . 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 1490	. . . . . . . . 9 ⊢ ⟨“{0, 1} {0, 2}”⟩ ∈ Word {𝑥 ∈ (𝒫 (0...3) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}
58		s1cli 14675	. . . . . . . . . . . . 13 ⊢ ⟨“{0, 1}”⟩ ∈ Word V
59	58	elexi 3472	. . . . . . . . . . . 12 ⊢ ⟨“{0, 1}”⟩ ∈ V
60	1, 59	opvtxfvi 29469	. . . . . . . . . . 11 ⊢ (Vtx‘⟨(0...3), ⟨“{0, 1}”⟩⟩) = (0...3)
61	60	eqcomi 2769	. . . . . . . . . 10 ⊢ (0...3) = (Vtx‘⟨(0...3), ⟨“{0, 1}”⟩⟩)
62	1, 59	opiedgfvi 29470	. . . . . . . . . . 11 ⊢ (iEdg‘⟨(0...3), ⟨“{0, 1}”⟩⟩) = ⟨“{0, 1}”⟩
63	62	eqcomi 2769	. . . . . . . . . 10 ⊢ ⟨“{0, 1}”⟩ = (iEdg‘⟨(0...3), ⟨“{0, 1}”⟩⟩)
64		s6cli 14958	. . . . . . . . . . 11 ⊢ ⟨“{0, 2} {0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩ ∈ Word V
65		s1s6 15001	. . . . . . . . . . 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 30733	. . . . . . . . . . 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 1490	. . . . . . . . . 10 ⊢ ⟨“{0, 1}”⟩ ∈ Word {𝑥 ∈ (𝒫 (0...3) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}
68		0ex 5264	. . . . . . . . . . . . 13 ⊢ ∅ ∈ V
69	1, 68	opvtxfvi 29469	. . . . . . . . . . . 12 ⊢ (Vtx‘⟨(0...3), ∅⟩) = (0...3)
70	69	eqcomi 2769	. . . . . . . . . . 11 ⊢ (0...3) = (Vtx‘⟨(0...3), ∅⟩)
71	1, 68	opiedgfvi 29470	. . . . . . . . . . . 12 ⊢ (iEdg‘⟨(0...3), ∅⟩) = ∅
72	71	eqcomi 2769	. . . . . . . . . . 11 ⊢ ∅ = (iEdg‘⟨(0...3), ∅⟩)
73		wrd0 14607	. . . . . . . . . . 11 ⊢ ∅ ∈ Word {𝑥 ∈ (𝒫 (0...3) ∖ {∅}) ∣ (♯‘𝑥) ≤ 2}
74		eqid 2760	. . . . . . . . . . . 12 ⊢ ∅ = ∅
75	70, 72	vtxdg0e 29937	. . . . . . . . . . . 12 ⊢ ((3 ∈ (0...3) ∧ ∅ = ∅) → ((VtxDeg‘⟨(0...3), ∅⟩)‘3) = 0)
76	8, 74, 75	mp2an 705	. . . . . . . . . . 11 ⊢ ((VtxDeg‘⟨(0...3), ∅⟩)‘3) = 0
77		0elfz 13682	. . . . . . . . . . . 12 ⊢ (3 ∈ ℕ₀ → 0 ∈ (0...3))
78	6, 77	ax-mp 5	. . . . . . . . . . 11 ⊢ 0 ∈ (0...3)
79		3ne0 12377	. . . . . . . . . . . 12 ⊢ 3 ≠ 0
80	79	necomi 3009	. . . . . . . . . . 11 ⊢ 0 ≠ 3
81		1nn0 12547	. . . . . . . . . . . 12 ⊢ 1 ∈ ℕ₀
82		1le3 12482	. . . . . . . . . . . 12 ⊢ 1 ≤ 3
83		elfz2nn0 13676	. . . . . . . . . . . 12 ⊢ (1 ∈ (0...3) ↔ (1 ∈ ℕ₀ ∧ 3 ∈ ℕ₀ ∧ 1 ≤ 3))
84	81, 6, 82, 83	mpbir3an 1360	. . . . . . . . . . 11 ⊢ 1 ∈ (0...3)
85		1re 11235	. . . . . . . . . . . 12 ⊢ 1 ∈ ℝ
86		1lt3 12443	. . . . . . . . . . . 12 ⊢ 1 < 3
87	85, 86	ltneii 11350	. . . . . . . . . . 11 ⊢ 1 ≠ 3
88		s0s1 14996	. . . . . . . . . . . 12 ⊢ ⟨“{0, 1}”⟩ = (∅ ++ ⟨“{0, 1}”⟩)
89	62, 88	eqtri 2783	. . . . . . . . . . 11 ⊢ (iEdg‘⟨(0...3), ⟨“{0, 1}”⟩⟩) = (∅ ++ ⟨“{0, 1}”⟩)
90	70, 8, 72, 73, 76, 60, 78, 80, 84, 87, 89	vdegp1ai 29999	. . . . . . . . . 10 ⊢ ((VtxDeg‘⟨(0...3), ⟨“{0, 1}”⟩⟩)‘3) = 0
91		2nn0 12548	. . . . . . . . . . 11 ⊢ 2 ∈ ℕ₀
92		2re 12342	. . . . . . . . . . . 12 ⊢ 2 ∈ ℝ
93		3re 12348	. . . . . . . . . . . 12 ⊢ 3 ∈ ℝ
94		2lt3 12441	. . . . . . . . . . . 12 ⊢ 2 < 3
95	92, 93, 94	ltleii 11360	. . . . . . . . . . 11 ⊢ 2 ≤ 3
96		elfz2nn0 13676	. . . . . . . . . . 11 ⊢ (2 ∈ (0...3) ↔ (2 ∈ ℕ₀ ∧ 3 ∈ ℕ₀ ∧ 2 ≤ 3))
97	91, 6, 95, 96	mpbir3an 1360	. . . . . . . . . 10 ⊢ 2 ∈ (0...3)
98	92, 94	ltneii 11350	. . . . . . . . . 10 ⊢ 2 ≠ 3
99		df-s2 14922	. . . . . . . . . . 11 ⊢ ⟨“{0, 1} {0, 2}”⟩ = (⟨“{0, 1}”⟩ ++ ⟨“{0, 2}”⟩)
100	52, 99	eqtri 2783	. . . . . . . . . 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 29999	. . . . . . . . 9 ⊢ ((VtxDeg‘⟨(0...3), ⟨“{0, 1} {0, 2}”⟩⟩)‘3) = 0
102		df-s3 14923	. . . . . . . . . 10 ⊢ ⟨“{0, 1} {0, 2} {0, 3}”⟩ = (⟨“{0, 1} {0, 2}”⟩ ++ ⟨“{0, 3}”⟩)
103	42, 102	eqtri 2783	. . . . . . . . 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 30001	. . . . . . . 8 ⊢ ((VtxDeg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3}”⟩⟩)‘3) = (0 + 1)
105		0p1e1 12388	. . . . . . . 8 ⊢ (0 + 1) = 1
106	104, 105	eqtri 2783	. . . . . . 7 ⊢ ((VtxDeg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3}”⟩⟩)‘3) = 1
107		df-s4 14924	. . . . . . . 8 ⊢ ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩ = (⟨“{0, 1} {0, 2} {0, 3}”⟩ ++ ⟨“{1, 2}”⟩)
108	32, 107	eqtri 2783	. . . . . . 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 29999	. . . . . 6 ⊢ ((VtxDeg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2}”⟩⟩)‘3) = 1
110		df-s5 14925	. . . . . . 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 2783	. . . . . 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 29999	. . . . 5 ⊢ ((VtxDeg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2}”⟩⟩)‘3) = 1
113		df-s6 14926	. . . . . 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 2783	. . . . 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 30001	. . . 4 ⊢ ((VtxDeg‘⟨(0...3), ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3}”⟩⟩)‘3) = (1 + 1)
116		1p1e2 12391	. . . 4 ⊢ (1 + 1) = 2
117	115, 116	eqtri 2783	. . 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 30729	. . 3 ⊢ (Vtx‘𝐺) = (0...3)
122	118, 119, 120	konigsbergiedg 30730	. . . 4 ⊢ (iEdg‘𝐺) = ⟨“{0, 1} {0, 2} {0, 3} {1, 2} {1, 2} {2, 3} {2, 3}”⟩
123	122, 12	eqtri 2783	. . 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 30001	. 2 ⊢ ((VtxDeg‘𝐺)‘3) = (2 + 1)
125		2p1e3 12409	. 2 ⊢ (2 + 1) = 3
126	124, 125	eqtri 2783	1 ⊢ ((VtxDeg‘𝐺)‘3) = 3

Colors of variables: wff setvar class

This proof depends on syntax axioms: = wceq 1570 ∈ wcel 2145 {crab 3412 Vcvv 3450 ∖ cdif 3896 ∅c0 4279 𝒫 cpw 4557 {csn 4584 {cpr 4586 ⟨cop 4590 class class class wbr 5103 ‘cfv 6533 (class class class)co 7414 0cc0 11127 1c1 11128 + caddc 11130 ≤ cle 11271 2c2 12322 3c3 12323 ℕ₀cn0 12531 ...cfz 13564 ♯chash 14397 Word cword 14581 ++ cconcat 14638 ⟨“cs1 14665 ⟨“cs2 14915 ⟨“cs3 14916 ⟨“cs4 14917 ⟨“cs5 14918 ⟨“cs6 14919 ⟨“cs7 14920 Vtxcvtx 29456 iEdgciedg 29457 VtxDegcvtxdg 29928

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1828 ax-4 1842 ax-5 1943 ax-6 2000 ax-7 2041 ax-8 2147 ax-9 2155 ax-10 2178 ax-11 2194 ax-12 2213 ax-ext 2732 ax-rep 5232 ax-sep 5251 ax-nul 5263 ax-pow 5330 ax-pr 5398 ax-un 7737 ax-cnex 11183 ax-resscn 11184 ax-1cn 11185 ax-icn 11186 ax-addcl 11187 ax-addrcl 11188 ax-mulcl 11189 ax-mulrcl 11190 ax-mulcom 11191 ax-addass 11192 ax-mulass 11193 ax-distr 11194 ax-i2m1 11195 ax-1ne0 11196 ax-1rid 11197 ax-rnegex 11198 ax-rrecex 11199 ax-cnre 11200 ax-pre-lttri 11201 ax-pre-lttrn 11202 ax-pre-ltadd 11203 ax-pre-mulgt0 11204

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1813 df-nf 1817 df-sb 2100 df-mo 2564 df-eu 2594 df-clab 2739 df-cleq 2752 df-clel 2835 df-nfc 2909 df-ne 2956 df-nel 3062 df-ral 3077 df-rex 3087 df-reu 3366 df-rab 3413 df-v 3452 df-sbc 3740 df-csb 3848 df-dif 3902 df-un 3904 df-in 3906 df-ss 3916 df-pss 3919 df-nul 4280 df-if 4483 df-pw 4559 df-sn 4585 df-pr 4587 df-op 4591 df-uni 4868 df-int 4908 df-iun 4953 df-br 5104 df-opab 5168 df-mpt 5187 df-tr 5213 df-id 5550 df-eprel 5555 df-po 5563 df-so 5564 df-fr 5608 df-we 5610 df-xp 5661 df-rel 5662 df-cnv 5663 df-co 5664 df-dm 5665 df-rn 5666 df-res 5667 df-ima 5668 df-pred 6299 df-ord 6360 df-on 6361 df-lim 6362 df-suc 6363 df-iota 6489 df-fun 6535 df-fn 6536 df-f 6537 df-f1 6538 df-fo 6539 df-f1o 6540 df-fv 6541 df-riota 7371 df-ov 7417 df-oprab 7418 df-mpo 7419 df-om 7864 df-1st 7987 df-2nd 7988 df-frecs 8281 df-wrecs 8312 df-recs 8361 df-rdg 8400 df-1o 8458 df-2o 8459 df-oadd 8462 df-er 8699 df-en 8956 df-dom 8957 df-sdom 8958 df-fin 8959 df-dju 9909 df-card 9947 df-pnf 11272 df-mnf 11273 df-xr 11274 df-ltxr 11275 df-le 11276 df-sub 11470 df-neg 11471 df-nn 12261 df-2 12330 df-3 12331 df-n0 12532 df-xnn0 12605 df-z 12619 df-uz 12891 df-xadd 13167 df-fz 13565 df-fzo 13713 df-hash 14398 df-word 14582 df-concat 14639 df-s1 14666 df-s2 14922 df-s3 14923 df-s4 14924 df-s5 14925 df-s6 14926 df-s7 14927 df-vtx 29458 df-iedg 29459 df-vtxdg 29929

This theorem is used by: konigsberglem4 30738

W3C validator