Users' Mathboxes Mathbox for Alexander van der Vekens < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  pgnbgreunbgrlem1 Structured version   Visualization version   GIF version

Theorem pgnbgreunbgrlem1 49029
Description: Lemma 1 for pgnbgreunbgr 49041. (Contributed by AV, 15-Nov-2025.)
Hypotheses
Ref Expression
pgnbgreunbgr.g 𝐺 = (5 gPetersenGr 2)
pgnbgreunbgr.v 𝑉 = (Vtx‘𝐺)
pgnbgreunbgr.e 𝐸 = (Edg‘𝐺)
pgnbgreunbgr.n 𝑁 = (𝐺 NeighbVtx 𝑋)
Assertion
Ref Expression
pgnbgreunbgrlem1 ((𝐿 = ⟨0, (((2nd𝑋) + 1) mod 5)⟩ ∨ 𝐿 = ⟨1, (2nd𝑋)⟩ ∨ 𝐿 = ⟨0, (((2nd𝑋) − 1) mod 5)⟩) → ((𝐾 = ⟨0, (((2nd𝑋) + 1) mod 5)⟩ ∨ 𝐾 = ⟨1, (2nd𝑋)⟩ ∨ 𝐾 = ⟨0, (((2nd𝑋) − 1) mod 5)⟩) → ((𝑋𝑉𝑋 = ⟨0, 𝑦⟩) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → 𝑋 = ⟨0, 𝑏⟩)))))
Distinct variable group:   𝑦,𝑏
Allowed substitution hints:   𝐸(𝑦, 𝑏)   𝐺(𝑦, 𝑏)   𝐾(𝑦, 𝑏)   𝐿(𝑦, 𝑏)   𝑁(𝑦, 𝑏)   𝑉(𝑦, 𝑏)   𝑋(𝑦, 𝑏)

Proof of Theorem pgnbgreunbgrlem1
StepHypRef Expression
1 c0ex 11224 . . . . . 6 0 ∈ V
2 vex 3454 . . . . . 6 𝑦 ∈ V
31, 2op2ndd 7997 . . . . 5 (𝑋 = ⟨0, 𝑦⟩ → (2nd𝑋) = 𝑦)
4 oveq1 7420 . . . . . . . . . . 11 ((2nd𝑋) = 𝑦 → ((2nd𝑋) + 1) = (𝑦 + 1))
54oveq1d 7428 . . . . . . . . . 10 ((2nd𝑋) = 𝑦 → (((2nd𝑋) + 1) mod 5) = ((𝑦 + 1) mod 5))
65opeq2d 4840 . . . . . . . . 9 ((2nd𝑋) = 𝑦 → ⟨0, (((2nd𝑋) + 1) mod 5)⟩ = ⟨0, ((𝑦 + 1) mod 5)⟩)
76eqeq2d 2771 . . . . . . . 8 ((2nd𝑋) = 𝑦 → (𝐿 = ⟨0, (((2nd𝑋) + 1) mod 5)⟩ ↔ 𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩))
8 opeq2 4834 . . . . . . . . 9 ((2nd𝑋) = 𝑦 → ⟨1, (2nd𝑋)⟩ = ⟨1, 𝑦⟩)
98eqeq2d 2771 . . . . . . . 8 ((2nd𝑋) = 𝑦 → (𝐿 = ⟨1, (2nd𝑋)⟩ ↔ 𝐿 = ⟨1, 𝑦⟩))
10 oveq1 7420 . . . . . . . . . . 11 ((2nd𝑋) = 𝑦 → ((2nd𝑋) − 1) = (𝑦 − 1))
1110oveq1d 7428 . . . . . . . . . 10 ((2nd𝑋) = 𝑦 → (((2nd𝑋) − 1) mod 5) = ((𝑦 − 1) mod 5))
1211opeq2d 4840 . . . . . . . . 9 ((2nd𝑋) = 𝑦 → ⟨0, (((2nd𝑋) − 1) mod 5)⟩ = ⟨0, ((𝑦 − 1) mod 5)⟩)
1312eqeq2d 2771 . . . . . . . 8 ((2nd𝑋) = 𝑦 → (𝐿 = ⟨0, (((2nd𝑋) − 1) mod 5)⟩ ↔ 𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩))
147, 9, 133orbi123d 1463 . . . . . . 7 ((2nd𝑋) = 𝑦 → ((𝐿 = ⟨0, (((2nd𝑋) + 1) mod 5)⟩ ∨ 𝐿 = ⟨1, (2nd𝑋)⟩ ∨ 𝐿 = ⟨0, (((2nd𝑋) − 1) mod 5)⟩) ↔ (𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∨ 𝐿 = ⟨1, 𝑦⟩ ∨ 𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩)))
156eqeq2d 2771 . . . . . . . 8 ((2nd𝑋) = 𝑦 → (𝐾 = ⟨0, (((2nd𝑋) + 1) mod 5)⟩ ↔ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩))
168eqeq2d 2771 . . . . . . . 8 ((2nd𝑋) = 𝑦 → (𝐾 = ⟨1, (2nd𝑋)⟩ ↔ 𝐾 = ⟨1, 𝑦⟩))
1712eqeq2d 2771 . . . . . . . 8 ((2nd𝑋) = 𝑦 → (𝐾 = ⟨0, (((2nd𝑋) − 1) mod 5)⟩ ↔ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩))
1815, 16, 173orbi123d 1463 . . . . . . 7 ((2nd𝑋) = 𝑦 → ((𝐾 = ⟨0, (((2nd𝑋) + 1) mod 5)⟩ ∨ 𝐾 = ⟨1, (2nd𝑋)⟩ ∨ 𝐾 = ⟨0, (((2nd𝑋) − 1) mod 5)⟩) ↔ (𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∨ 𝐾 = ⟨1, 𝑦⟩ ∨ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩)))
1914, 18anbi12d 644 . . . . . 6 ((2nd𝑋) = 𝑦 → (((𝐿 = ⟨0, (((2nd𝑋) + 1) mod 5)⟩ ∨ 𝐿 = ⟨1, (2nd𝑋)⟩ ∨ 𝐿 = ⟨0, (((2nd𝑋) − 1) mod 5)⟩) ∧ (𝐾 = ⟨0, (((2nd𝑋) + 1) mod 5)⟩ ∨ 𝐾 = ⟨1, (2nd𝑋)⟩ ∨ 𝐾 = ⟨0, (((2nd𝑋) − 1) mod 5)⟩)) ↔ ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∨ 𝐿 = ⟨1, 𝑦⟩ ∨ 𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩) ∧ (𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∨ 𝐾 = ⟨1, 𝑦⟩ ∨ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩))))
20 simpr 490 . . . . . . . . . . . . 13 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩)
21 simpl 488 . . . . . . . . . . . . 13 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → 𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩)
2220, 21neeq12d 3016 . . . . . . . . . . . 12 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → (𝐾𝐿 ↔ ⟨0, ((𝑦 + 1) mod 5)⟩ ≠ ⟨0, ((𝑦 + 1) mod 5)⟩))
23 eqid 2760 . . . . . . . . . . . . 13 ⟨0, ((𝑦 + 1) mod 5)⟩ = ⟨0, ((𝑦 + 1) mod 5)⟩
24 eqneqall 2966 . . . . . . . . . . . . 13 (⟨0, ((𝑦 + 1) mod 5)⟩ = ⟨0, ((𝑦 + 1) mod 5)⟩ → (⟨0, ((𝑦 + 1) mod 5)⟩ ≠ ⟨0, ((𝑦 + 1) mod 5)⟩ → ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
2523, 24ax-mp 5 . . . . . . . . . . . 12 (⟨0, ((𝑦 + 1) mod 5)⟩ ≠ ⟨0, ((𝑦 + 1) mod 5)⟩ → ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
2622, 25biimtrdi 256 . . . . . . . . . . 11 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → (𝐾𝐿 → ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
2726impd 416 . . . . . . . . . 10 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
2827ex 418 . . . . . . . . 9 (𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ → (𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩ → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
29 5eluz3 12932 . . . . . . . . . . . . . . 15 5 ∈ (ℤ‘3)
30 pglem 49007 . . . . . . . . . . . . . . 15 2 ∈ (1..^(⌈‘(5 / 2)))
31 eqid 2760 . . . . . . . . . . . . . . . 16 (1..^(⌈‘(5 / 2))) = (1..^(⌈‘(5 / 2)))
32 eqid 2760 . . . . . . . . . . . . . . . 16 (0..^5) = (0..^5)
33 pgnbgreunbgr.g . . . . . . . . . . . . . . . 16 𝐺 = (5 gPetersenGr 2)
34 pgnbgreunbgr.e . . . . . . . . . . . . . . . 16 𝐸 = (Edg‘𝐺)
3531, 32, 33, 34gpgedgiov 48981 . . . . . . . . . . . . . . 15 (((5 ∈ (ℤ‘3) ∧ 2 ∈ (1..^(⌈‘(5 / 2)))) ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → ({⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸𝑏 = 𝑦))
3629, 30, 35mpanl12 715 . . . . . . . . . . . . . 14 ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → ({⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸𝑏 = 𝑦))
37 opeq2 4834 . . . . . . . . . . . . . . 15 (𝑦 = 𝑏 → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)
3837eqcoms 2768 . . . . . . . . . . . . . 14 (𝑏 = 𝑦 → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)
3936, 38biimtrdi 256 . . . . . . . . . . . . 13 ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → ({⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸 → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))
4039adantld 496 . . . . . . . . . . . 12 ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))
41 preq1 4694 . . . . . . . . . . . . . . 15 (𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩ → {𝐾, ⟨0, 𝑏⟩} = {⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩})
4241eleq1d 2845 . . . . . . . . . . . . . 14 (𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩ → ({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ↔ {⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸))
43 preq2 4695 . . . . . . . . . . . . . . 15 (𝐿 = ⟨1, 𝑦⟩ → {⟨0, 𝑏⟩, 𝐿} = {⟨0, 𝑏⟩, ⟨1, 𝑦⟩})
4443eleq1d 2845 . . . . . . . . . . . . . 14 (𝐿 = ⟨1, 𝑦⟩ → ({⟨0, 𝑏⟩, 𝐿} ∈ 𝐸 ↔ {⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸))
4542, 44bi2anan9r 651 . . . . . . . . . . . . 13 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) ↔ ({⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸)))
4645imbi1d 344 . . . . . . . . . . . 12 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → ((({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩) ↔ (({⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
4740, 46imbitrrid 249 . . . . . . . . . . 11 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
4847adantld 496 . . . . . . . . . 10 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
4948ex 418 . . . . . . . . 9 (𝐿 = ⟨1, 𝑦⟩ → (𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩ → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
50 prcom 4693 . . . . . . . . . . . . . . 15 {⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩} = {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩}
5150eleq1i 2851 . . . . . . . . . . . . . 14 ({⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ↔ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸)
52 prcom 4693 . . . . . . . . . . . . . . 15 {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩} = {⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩}
5352eleq1i 2851 . . . . . . . . . . . . . 14 ({⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩} ∈ 𝐸 ↔ {⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸)
5451, 53anbi12ci 641 . . . . . . . . . . . . 13 (({⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩} ∈ 𝐸) ↔ ({⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸))
55 5nn 12351 . . . . . . . . . . . . . . . . 17 5 ∈ ℕ
5655nnzi 12642 . . . . . . . . . . . . . . . 16 5 ∈ ℤ
57 uzid 12902 . . . . . . . . . . . . . . . 16 (5 ∈ ℤ → 5 ∈ (ℤ‘5))
5856, 57ax-mp 5 . . . . . . . . . . . . . . 15 5 ∈ (ℤ‘5)
5931, 32, 33, 34gpgedg2ov 48982 . . . . . . . . . . . . . . 15 (((5 ∈ (ℤ‘5) ∧ 2 ∈ (1..^(⌈‘(5 / 2)))) ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸) ↔ 𝑏 = 𝑦))
6058, 30, 59mpanl12 715 . . . . . . . . . . . . . 14 ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸) ↔ 𝑏 = 𝑦))
61 equcomiv 2047 . . . . . . . . . . . . . . 15 (𝑏 = 𝑦𝑦 = 𝑏)
6261opeq2d 4840 . . . . . . . . . . . . . 14 (𝑏 = 𝑦 → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)
6360, 62biimtrdi 256 . . . . . . . . . . . . 13 ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))
6454, 63biimtrid 245 . . . . . . . . . . . 12 ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))
65 preq2 4695 . . . . . . . . . . . . . . 15 (𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ → {⟨0, 𝑏⟩, 𝐿} = {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩})
6665eleq1d 2845 . . . . . . . . . . . . . 14 (𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ → ({⟨0, 𝑏⟩, 𝐿} ∈ 𝐸 ↔ {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩} ∈ 𝐸))
6742, 66bi2anan9r 651 . . . . . . . . . . . . 13 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) ↔ ({⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩} ∈ 𝐸)))
6867imbi1d 344 . . . . . . . . . . . 12 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → ((({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩) ↔ (({⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
6964, 68imbitrrid 249 . . . . . . . . . . 11 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
7069adantld 496 . . . . . . . . . 10 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
7170ex 418 . . . . . . . . 9 (𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ → (𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩ → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
7228, 49, 713jaoi 1454 . . . . . . . 8 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∨ 𝐿 = ⟨1, 𝑦⟩ ∨ 𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩) → (𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩ → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
73 prcom 4693 . . . . . . . . . . . . . . 15 {⟨1, 𝑦⟩, ⟨0, 𝑏⟩} = {⟨0, 𝑏⟩, ⟨1, 𝑦⟩}
7473eleq1i 2851 . . . . . . . . . . . . . 14 ({⟨1, 𝑦⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ↔ {⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸)
7574, 39biimtrid 245 . . . . . . . . . . . . 13 ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → ({⟨1, 𝑦⟩, ⟨0, 𝑏⟩} ∈ 𝐸 → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))
7675adantrd 497 . . . . . . . . . . . 12 ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({⟨1, 𝑦⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))
77 preq1 4694 . . . . . . . . . . . . . . 15 (𝐾 = ⟨1, 𝑦⟩ → {𝐾, ⟨0, 𝑏⟩} = {⟨1, 𝑦⟩, ⟨0, 𝑏⟩})
7877eleq1d 2845 . . . . . . . . . . . . . 14 (𝐾 = ⟨1, 𝑦⟩ → ({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ↔ {⟨1, 𝑦⟩, ⟨0, 𝑏⟩} ∈ 𝐸))
79 preq2 4695 . . . . . . . . . . . . . . 15 (𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ → {⟨0, 𝑏⟩, 𝐿} = {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩})
8079eleq1d 2845 . . . . . . . . . . . . . 14 (𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ → ({⟨0, 𝑏⟩, 𝐿} ∈ 𝐸 ↔ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸))
8178, 80bi2anan9r 651 . . . . . . . . . . . . 13 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) ↔ ({⟨1, 𝑦⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸)))
8281imbi1d 344 . . . . . . . . . . . 12 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → ((({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩) ↔ (({⟨1, 𝑦⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
8376, 82imbitrrid 249 . . . . . . . . . . 11 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
8483adantld 496 . . . . . . . . . 10 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
8584ex 418 . . . . . . . . 9 (𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ → (𝐾 = ⟨1, 𝑦⟩ → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
86 simpr 490 . . . . . . . . . . . . 13 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → 𝐾 = ⟨1, 𝑦⟩)
87 simpl 488 . . . . . . . . . . . . 13 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → 𝐿 = ⟨1, 𝑦⟩)
8886, 87neeq12d 3016 . . . . . . . . . . . 12 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → (𝐾𝐿 ↔ ⟨1, 𝑦⟩ ≠ ⟨1, 𝑦⟩))
89 eqid 2760 . . . . . . . . . . . . 13 ⟨1, 𝑦⟩ = ⟨1, 𝑦
90 eqneqall 2966 . . . . . . . . . . . . 13 (⟨1, 𝑦⟩ = ⟨1, 𝑦⟩ → (⟨1, 𝑦⟩ ≠ ⟨1, 𝑦⟩ → ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
9189, 90ax-mp 5 . . . . . . . . . . . 12 (⟨1, 𝑦⟩ ≠ ⟨1, 𝑦⟩ → ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
9288, 91biimtrdi 256 . . . . . . . . . . 11 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → (𝐾𝐿 → ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
9392impd 416 . . . . . . . . . 10 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
9493ex 418 . . . . . . . . 9 (𝐿 = ⟨1, 𝑦⟩ → (𝐾 = ⟨1, 𝑦⟩ → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
9575adantrd 497 . . . . . . . . . . . 12 ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({⟨1, 𝑦⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))
9677adantl 487 . . . . . . . . . . . . . . 15 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → {𝐾, ⟨0, 𝑏⟩} = {⟨1, 𝑦⟩, ⟨0, 𝑏⟩})
9796eleq1d 2845 . . . . . . . . . . . . . 14 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → ({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ↔ {⟨1, 𝑦⟩, ⟨0, 𝑏⟩} ∈ 𝐸))
9865adantr 486 . . . . . . . . . . . . . . 15 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → {⟨0, 𝑏⟩, 𝐿} = {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩})
9998eleq1d 2845 . . . . . . . . . . . . . 14 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → ({⟨0, 𝑏⟩, 𝐿} ∈ 𝐸 ↔ {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩} ∈ 𝐸))
10097, 99anbi12d 644 . . . . . . . . . . . . 13 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) ↔ ({⟨1, 𝑦⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩} ∈ 𝐸)))
101100imbi1d 344 . . . . . . . . . . . 12 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → ((({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩) ↔ (({⟨1, 𝑦⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
10295, 101imbitrrid 249 . . . . . . . . . . 11 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
103102adantld 496 . . . . . . . . . 10 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
104103ex 418 . . . . . . . . 9 (𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ → (𝐾 = ⟨1, 𝑦⟩ → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
10585, 94, 1043jaoi 1454 . . . . . . . 8 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∨ 𝐿 = ⟨1, 𝑦⟩ ∨ 𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩) → (𝐾 = ⟨1, 𝑦⟩ → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
10660, 38biimtrdi 256 . . . . . . . . . . . . 13 ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))
107106adantl 487 . . . . . . . . . . . 12 ((⟨0, ((𝑦 − 1) mod 5)⟩ ≠ ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))
108107a1i 11 . . . . . . . . . . 11 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩) → ((⟨0, ((𝑦 − 1) mod 5)⟩ ≠ ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
109 simpl 488 . . . . . . . . . . . . . 14 ((𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩) → 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩)
110 simpr 490 . . . . . . . . . . . . . 14 ((𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩) → 𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩)
111109, 110neeq12d 3016 . . . . . . . . . . . . 13 ((𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩) → (𝐾𝐿 ↔ ⟨0, ((𝑦 − 1) mod 5)⟩ ≠ ⟨0, ((𝑦 + 1) mod 5)⟩))
112111ancoms 464 . . . . . . . . . . . 12 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩) → (𝐾𝐿 ↔ ⟨0, ((𝑦 − 1) mod 5)⟩ ≠ ⟨0, ((𝑦 + 1) mod 5)⟩))
113112anbi1d 643 . . . . . . . . . . 11 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) ↔ (⟨0, ((𝑦 − 1) mod 5)⟩ ≠ ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)))))
114 preq1 4694 . . . . . . . . . . . . . 14 (𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩ → {𝐾, ⟨0, 𝑏⟩} = {⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩})
115114eleq1d 2845 . . . . . . . . . . . . 13 (𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩ → ({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ↔ {⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸))
116115, 80bi2anan9r 651 . . . . . . . . . . . 12 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) ↔ ({⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸)))
117116imbi1d 344 . . . . . . . . . . 11 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩) → ((({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩) ↔ (({⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
118108, 113, 1173imtr4d 297 . . . . . . . . . 10 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
119118ex 418 . . . . . . . . 9 (𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ → (𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩ → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
12039adantld 496 . . . . . . . . . . . 12 ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))
121120adantl 487 . . . . . . . . . . 11 ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))
122114adantl 487 . . . . . . . . . . . . . 14 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩) → {𝐾, ⟨0, 𝑏⟩} = {⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩})
123122eleq1d 2845 . . . . . . . . . . . . 13 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩) → ({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ↔ {⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸))
12444adantr 486 . . . . . . . . . . . . 13 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩) → ({⟨0, 𝑏⟩, 𝐿} ∈ 𝐸 ↔ {⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸))
125123, 124anbi12d 644 . . . . . . . . . . . 12 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) ↔ ({⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸)))
126125imbi1d 344 . . . . . . . . . . 11 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩) → ((({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩) ↔ (({⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
127121, 126imbitrrid 249 . . . . . . . . . 10 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
128127ex 418 . . . . . . . . 9 (𝐿 = ⟨1, 𝑦⟩ → (𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩ → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
129 eqeq2 2772 . . . . . . . . . . 11 (⟨0, ((𝑦 − 1) mod 5)⟩ = 𝐿 → (𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩ ↔ 𝐾 = 𝐿))
130129eqcoms 2768 . . . . . . . . . 10 (𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ → (𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩ ↔ 𝐾 = 𝐿))
131 eqneqall 2966 . . . . . . . . . . 11 (𝐾 = 𝐿 → (𝐾𝐿 → ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
132131impd 416 . . . . . . . . . 10 (𝐾 = 𝐿 → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
133130, 132biimtrdi 256 . . . . . . . . 9 (𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ → (𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩ → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
134119, 128, 1333jaoi 1454 . . . . . . . 8 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∨ 𝐿 = ⟨1, 𝑦⟩ ∨ 𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩) → (𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩ → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
13572, 105, 1343jaod 1456 . . . . . . 7 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∨ 𝐿 = ⟨1, 𝑦⟩ ∨ 𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩) → ((𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∨ 𝐾 = ⟨1, 𝑦⟩ ∨ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
136135imp 412 . . . . . 6 (((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∨ 𝐿 = ⟨1, 𝑦⟩ ∨ 𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩) ∧ (𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∨ 𝐾 = ⟨1, 𝑦⟩ ∨ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩)) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
13719, 136biimtrdi 256 . . . . 5 ((2nd𝑋) = 𝑦 → (((𝐿 = ⟨0, (((2nd𝑋) + 1) mod 5)⟩ ∨ 𝐿 = ⟨1, (2nd𝑋)⟩ ∨ 𝐿 = ⟨0, (((2nd𝑋) − 1) mod 5)⟩) ∧ (𝐾 = ⟨0, (((2nd𝑋) + 1) mod 5)⟩ ∨ 𝐾 = ⟨1, (2nd𝑋)⟩ ∨ 𝐾 = ⟨0, (((2nd𝑋) − 1) mod 5)⟩)) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
1383, 137syl 18 . . . 4 (𝑋 = ⟨0, 𝑦⟩ → (((𝐿 = ⟨0, (((2nd𝑋) + 1) mod 5)⟩ ∨ 𝐿 = ⟨1, (2nd𝑋)⟩ ∨ 𝐿 = ⟨0, (((2nd𝑋) − 1) mod 5)⟩) ∧ (𝐾 = ⟨0, (((2nd𝑋) + 1) mod 5)⟩ ∨ 𝐾 = ⟨1, (2nd𝑋)⟩ ∨ 𝐾 = ⟨0, (((2nd𝑋) − 1) mod 5)⟩)) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
139 eqeq1 2764 . . . . . 6 (𝑋 = ⟨0, 𝑦⟩ → (𝑋 = ⟨0, 𝑏⟩ ↔ ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))
140139imbi2d 343 . . . . 5 (𝑋 = ⟨0, 𝑦⟩ → ((({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → 𝑋 = ⟨0, 𝑏⟩) ↔ (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
141140imbi2d 343 . . . 4 (𝑋 = ⟨0, 𝑦⟩ → (((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → 𝑋 = ⟨0, 𝑏⟩)) ↔ ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
142138, 141sylibrd 262 . . 3 (𝑋 = ⟨0, 𝑦⟩ → (((𝐿 = ⟨0, (((2nd𝑋) + 1) mod 5)⟩ ∨ 𝐿 = ⟨1, (2nd𝑋)⟩ ∨ 𝐿 = ⟨0, (((2nd𝑋) − 1) mod 5)⟩) ∧ (𝐾 = ⟨0, (((2nd𝑋) + 1) mod 5)⟩ ∨ 𝐾 = ⟨1, (2nd𝑋)⟩ ∨ 𝐾 = ⟨0, (((2nd𝑋) − 1) mod 5)⟩)) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → 𝑋 = ⟨0, 𝑏⟩))))
143142adantl 487 . 2 ((𝑋𝑉𝑋 = ⟨0, 𝑦⟩) → (((𝐿 = ⟨0, (((2nd𝑋) + 1) mod 5)⟩ ∨ 𝐿 = ⟨1, (2nd𝑋)⟩ ∨ 𝐿 = ⟨0, (((2nd𝑋) − 1) mod 5)⟩) ∧ (𝐾 = ⟨0, (((2nd𝑋) + 1) mod 5)⟩ ∨ 𝐾 = ⟨1, (2nd𝑋)⟩ ∨ 𝐾 = ⟨0, (((2nd𝑋) − 1) mod 5)⟩)) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → 𝑋 = ⟨0, 𝑏⟩))))
144143expdcom 420 1 ((𝐿 = ⟨0, (((2nd𝑋) + 1) mod 5)⟩ ∨ 𝐿 = ⟨1, (2nd𝑋)⟩ ∨ 𝐿 = ⟨0, (((2nd𝑋) − 1) mod 5)⟩) → ((𝐾 = ⟨0, (((2nd𝑋) + 1) mod 5)⟩ ∨ 𝐾 = ⟨1, (2nd𝑋)⟩ ∨ 𝐾 = ⟨0, (((2nd𝑋) − 1) mod 5)⟩) → ((𝑋𝑉𝑋 = ⟨0, 𝑦⟩) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → 𝑋 = ⟨0, 𝑏⟩)))))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  wb 209  wa 401  w3o 1102   = wceq 1570  wcel 2145  wne 2955  {cpr 4586  cop 4590  cfv 6533  (class class class)co 7413  2nd c2nd 7985  0cc0 11124  1c1 11125   + caddc 11127  cmin 11465   / cdiv 11895  2c2 12319  3c3 12320  5c5 12322  cz 12615  cuz 12887  ..^cfzo 13709  cceil 13852   mod cmo 13930  Vtxcvtx 29453  Edgcedg 29504   NeighbVtx cnbgr 29792   gPetersenGr cgpg 48956
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 7736  ax-cnex 11180  ax-resscn 11181  ax-1cn 11182  ax-icn 11183  ax-addcl 11184  ax-addrcl 11185  ax-mulcl 11186  ax-mulrcl 11187  ax-mulcom 11188  ax-addass 11189  ax-mulass 11190  ax-distr 11191  ax-i2m1 11192  ax-1ne0 11193  ax-1rid 11194  ax-rnegex 11195  ax-rrecex 11196  ax-cnre 11197  ax-pre-lttri 11198  ax-pre-lttrn 11199  ax-pre-ltadd 11200  ax-pre-mulgt0 11201  ax-pre-sup 11202
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-rmo 3365  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 7370  df-ov 7416  df-oprab 7417  df-mpo 7418  df-om 7863  df-1st 7986  df-2nd 7987  df-frecs 8280  df-wrecs 8311  df-recs 8360  df-rdg 8399  df-1o 8455  df-oadd 8459  df-er 8696  df-en 8953  df-dom 8954  df-sdom 8955  df-fin 8956  df-sup 9412  df-inf 9413  df-dju 9906  df-card 9944  df-pnf 11269  df-mnf 11270  df-xr 11271  df-ltxr 11272  df-le 11273  df-sub 11467  df-neg 11468  df-div 11896  df-nn 12258  df-2 12327  df-3 12328  df-4 12329  df-5 12330  df-6 12331  df-7 12332  df-8 12333  df-9 12334  df-n0 12529  df-xnn0 12602  df-z 12616  df-dec 12737  df-uz 12888  df-rp 13043  df-ico 13404  df-fz 13562  df-fzo 13710  df-fl 13853  df-ceil 13854  df-mod 13931  df-hash 14395  df-dvds 16343  df-struct 17239  df-slot 17274  df-ndx 17286  df-base 17302  df-edgf 29446  df-vtx 29455  df-iedg 29456  df-edg 29505  df-umgr 29540  df-usgr 29611  df-gpg 48957
This theorem is used by:  pgnbgreunbgrlem3  49034
  Copyright terms: Public domain W3C validator