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 49484
Description: Lemma 1 for pgnbgreunbgr 49496. (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 11339 . . . . . 6 0 ∈ V
2 vex 3458 . . . . . 6 𝑦 ∈ V
31, 2op2ndd 8046 . . . . 5 (𝑋 = ⟨0, 𝑦⟩ → (2nd ‘𝑋) = 𝑦)
4 oveq1 7458 . . . . . . . . . . 11 ((2nd ‘𝑋) = 𝑦 → ((2nd ‘𝑋) + 1) = (𝑦 + 1))
54oveq1d 7466 . . . . . . . . . 10 ((2nd ‘𝑋) = 𝑦 → (((2nd ‘𝑋) + 1) mod 5) = ((𝑦 + 1) mod 5))
65opeq2d 4852 . . . . . . . . 9 ((2nd ‘𝑋) = 𝑦 → ⟨0, (((2nd ‘𝑋) + 1) mod 5)⟩ = ⟨0, ((𝑦 + 1) mod 5)⟩)
76eqeq2d 2774 . . . . . . . 8 ((2nd ‘𝑋) = 𝑦 → (𝐿 = ⟨0, (((2nd ‘𝑋) + 1) mod 5)⟩ ↔ 𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩))
8 opeq2 4846 . . . . . . . . 9 ((2nd ‘𝑋) = 𝑦 → ⟨1, (2nd ‘𝑋)⟩ = ⟨1, 𝑦⟩)
98eqeq2d 2774 . . . . . . . 8 ((2nd ‘𝑋) = 𝑦 → (𝐿 = ⟨1, (2nd ‘𝑋)⟩ ↔ 𝐿 = ⟨1, 𝑦⟩))
10 oveq1 7458 . . . . . . . . . . 11 ((2nd ‘𝑋) = 𝑦 → ((2nd ‘𝑋) − 1) = (𝑦 − 1))
1110oveq1d 7466 . . . . . . . . . 10 ((2nd ‘𝑋) = 𝑦 → (((2nd ‘𝑋) − 1) mod 5) = ((𝑦 − 1) mod 5))
1211opeq2d 4852 . . . . . . . . 9 ((2nd ‘𝑋) = 𝑦 → ⟨0, (((2nd ‘𝑋) − 1) mod 5)⟩ = ⟨0, ((𝑦 − 1) mod 5)⟩)
1312eqeq2d 2774 . . . . . . . 8 ((2nd ‘𝑋) = 𝑦 → (𝐿 = ⟨0, (((2nd ‘𝑋) − 1) mod 5)⟩ ↔ 𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩))
147, 9, 133orbi123d 1464 . . . . . . 7 ((2nd ‘𝑋) = 𝑦 → ((𝐿 = ⟨0, (((2nd ‘𝑋) + 1) mod 5)⟩ ∨ 𝐿 = ⟨1, (2nd ‘𝑋)⟩ ∨ 𝐿 = ⟨0, (((2nd ‘𝑋) − 1) mod 5)⟩) ↔ (𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∨ 𝐿 = ⟨1, 𝑦⟩ ∨ 𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩)))
156eqeq2d 2774 . . . . . . . 8 ((2nd ‘𝑋) = 𝑦 → (𝐾 = ⟨0, (((2nd ‘𝑋) + 1) mod 5)⟩ ↔ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩))
168eqeq2d 2774 . . . . . . . 8 ((2nd ‘𝑋) = 𝑦 → (𝐾 = ⟨1, (2nd ‘𝑋)⟩ ↔ 𝐾 = ⟨1, 𝑦⟩))
1712eqeq2d 2774 . . . . . . . 8 ((2nd ‘𝑋) = 𝑦 → (𝐾 = ⟨0, (((2nd ‘𝑋) − 1) mod 5)⟩ ↔ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩))
1815, 16, 173orbi123d 1464 . . . . . . 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 3020 . . . . . . . . . . . 12 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → (𝐾 ≠ 𝐿 ↔ ⟨0, ((𝑦 + 1) mod 5)⟩ ≠ ⟨0, ((𝑦 + 1) mod 5)⟩))
23 eqid 2763 . . . . . . . . . . . . 13 ⟨0, ((𝑦 + 1) mod 5)⟩ = ⟨0, ((𝑦 + 1) mod 5)⟩
24 eqneqall 2970 . . . . . . . . . . . . 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 13050 . . . . . . . . . . . . . . 15 5 ∈ (ℤ≥‘3)
30 pglem 49462 . . . . . . . . . . . . . . 15 2 ∈ (1..^(⌈‘(5 / 2)))
31 eqid 2763 . . . . . . . . . . . . . . . 16 (1..^(⌈‘(5 / 2))) = (1..^(⌈‘(5 / 2)))
32 eqid 2763 . . . . . . . . . . . . . . . 16 (0..^5) = (0..^5)
33 pgnbgreunbgr.g . . . . . . . . . . . . . . . 16 𝐺 = (5 gPetersenGr 2)
34 pgnbgreunbgr.e . . . . . . . . . . . . . . . 16 𝐸 = (Edg‘𝐺)
3531, 32, 33, 34gpgedgiov 49436 . . . . . . . . . . . . . . 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 4846 . . . . . . . . . . . . . . 15 (𝑦 = 𝑏 → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)
3837eqcoms 2771 . . . . . . . . . . . . . 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 4696 . . . . . . . . . . . . . . 15 (𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩ → {𝐾, ⟨0, 𝑏⟩} = {⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩})
4241eleq1d 2849 . . . . . . . . . . . . . 14 (𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩ → ({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ↔ {⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸))
43 preq2 4697 . . . . . . . . . . . . . . 15 (𝐿 = ⟨1, 𝑦⟩ → {⟨0, 𝑏⟩, 𝐿} = {⟨0, 𝑏⟩, ⟨1, 𝑦⟩})
4443eleq1d 2849 . . . . . . . . . . . . . 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 4695 . . . . . . . . . . . . . . 15 {⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩} = {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩}
5150eleq1i 2855 . . . . . . . . . . . . . 14 ({⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ↔ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸)
52 prcom 4695 . . . . . . . . . . . . . . 15 {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩} = {⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩}
5352eleq1i 2855 . . . . . . . . . . . . . 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 12469 . . . . . . . . . . . . . . . . 17 5 ∈ ℕ
5655nnzi 12760 . . . . . . . . . . . . . . . 16 5 ∈ ℤ
57 uzid 13020 . . . . . . . . . . . . . . . 16 (5 ∈ ℤ → 5 ∈ (ℤ≥‘5))
5856, 57ax-mp 5 . . . . . . . . . . . . . . 15 5 ∈ (ℤ≥‘5)
5931, 32, 33, 34gpgedg2ov 49437 . . . . . . . . . . . . . . 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 2049 . . . . . . . . . . . . . . 15 (𝑏 = 𝑦 → 𝑦 = 𝑏)
6261opeq2d 4852 . . . . . . . . . . . . . 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 4697 . . . . . . . . . . . . . . 15 (𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ → {⟨0, 𝑏⟩, 𝐿} = {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩})
6665eleq1d 2849 . . . . . . . . . . . . . 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 1455 . . . . . . . 8 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∨ 𝐿 = ⟨1, 𝑦⟩ ∨ 𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩) → (𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩ → ((𝐾 ≠ 𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
73 prcom 4695 . . . . . . . . . . . . . . 15 {⟨1, 𝑦⟩, ⟨0, 𝑏⟩} = {⟨0, 𝑏⟩, ⟨1, 𝑦⟩}
7473eleq1i 2855 . . . . . . . . . . . . . 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 4696 . . . . . . . . . . . . . . 15 (𝐾 = ⟨1, 𝑦⟩ → {𝐾, ⟨0, 𝑏⟩} = {⟨1, 𝑦⟩, ⟨0, 𝑏⟩})
7877eleq1d 2849 . . . . . . . . . . . . . 14 (𝐾 = ⟨1, 𝑦⟩ → ({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ↔ {⟨1, 𝑦⟩, ⟨0, 𝑏⟩} ∈ 𝐸))
79 preq2 4697 . . . . . . . . . . . . . . 15 (𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ → {⟨0, 𝑏⟩, 𝐿} = {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩})
8079eleq1d 2849 . . . . . . . . . . . . . 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 3020 . . . . . . . . . . . 12 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → (𝐾 ≠ 𝐿 ↔ ⟨1, 𝑦⟩ ≠ ⟨1, 𝑦⟩))
89 eqid 2763 . . . . . . . . . . . . 13 ⟨1, 𝑦⟩ = ⟨1, 𝑦⟩
90 eqneqall 2970 . . . . . . . . . . . . 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 2849 . . . . . . . . . . . . . 14 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → ({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ↔ {⟨1, 𝑦⟩, ⟨0, 𝑏⟩} ∈ 𝐸))
9865adantr 486 . . . . . . . . . . . . . . 15 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → {⟨0, 𝑏⟩, 𝐿} = {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩})
9998eleq1d 2849 . . . . . . . . . . . . . 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 1455 . . . . . . . 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 3020 . . . . . . . . . . . . 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 4696 . . . . . . . . . . . . . 14 (𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩ → {𝐾, ⟨0, 𝑏⟩} = {⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩})
115114eleq1d 2849 . . . . . . . . . . . . 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 2849 . . . . . . . . . . . . 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 2775 . . . . . . . . . . 11 (⟨0, ((𝑦 − 1) mod 5)⟩ = 𝐿 → (𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩ ↔ 𝐾 = 𝐿))
130129eqcoms 2771 . . . . . . . . . 10 (𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ → (𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩ ↔ 𝐾 = 𝐿))
131 eqneqall 2970 . . . . . . . . . . 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 1455 . . . . . . . 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 1457 . . . . . . 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 2767 . . . . . 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 2147   ≠ wne 2959  {cpr 4590  ⟨cop 4840  ‘cfv 6566  (class class class)co 7451  2nd c2nd 8034  0cc0 11239  1c1 11240   + caddc 11242   − cmin 11580   / cdiv 12013  2c2 12437  3c3 12438  5c5 12440  ℤcz 12733  ℤ≥cuz 13005  ..^cfzo 13828  ⌈cceil 13971   mod cmo 14049  Vtxcvtx 29631  Edgcedg 29682   NeighbVtx cnbgr 29970   gPetersenGr cgpg 49411
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 1945  ax-6 2002  ax-7 2043  ax-8 2149  ax-9 2157  ax-10 2180  ax-11 2197  ax-12 2216  ax-ext 2735  ax-rep 5238  ax-sep 5255  ax-nul 5266  ax-pow 5334  ax-pr 5398  ax-un 7783  ax-cnex 11295  ax-resscn 11296  ax-1cn 11297  ax-icn 11298  ax-addcl 11299  ax-addrcl 11300  ax-mulcl 11301  ax-mulrcl 11302  ax-mulcom 11303  ax-addass 11304  ax-mulass 11305  ax-distr 11306  ax-i2m1 11307  ax-1ne0 11308  ax-1rid 11309  ax-rnegex 11310  ax-rrecex 11311  ax-cnre 11312  ax-pre-lttri 11313  ax-pre-lttrn 11314  ax-pre-ltadd 11315  ax-pre-mulgt0 11316  ax-pre-sup 11317
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 2102  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2839  df-nfc 2913  df-ne 2960  df-nel 3066  df-ral 3081  df-rex 3091  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3456  df-sbc 3743  df-csb 3852  df-ss 3901  df-pss 4017  df-dif 4050  df-in 4094  df-un 4154  df-nul 4282  df-if 4486  df-pw 4562  df-sn 4589  df-pr 4591  df-op 4841  df-uni 4873  df-int 4913  df-iun 4958  df-br 5109  df-opab 5174  df-mpt 5193  df-tr 5219  df-id 5553  df-eprel 5558  df-po 5566  df-so 5567  df-fr 5611  df-we 5613  df-xp 5664  df-rel 5665  df-cnv 5666  df-co 5667  df-dm 5668  df-rn 5669  df-res 5670  df-ima 5671  df-pred 6330  df-ord 6391  df-on 6392  df-lim 6393  df-suc 6394  df-iota 6520  df-fun 6568  df-fn 6569  df-f 6570  df-f1 6571  df-fo 6572  df-f1o 6573  df-fv 6574  df-riota 7408  df-ov 7454  df-oprab 7455  df-mpo 7456  df-om 7912  df-1st 8035  df-2nd 8036  df-frecs 8337  df-wrecs 8368  df-recs 8417  df-rdg 8456  df-1o 8514  df-oadd 8518  df-er 8755  df-en 9012  df-dom 9013  df-sdom 9014  df-fin 9015  df-sup 9471  df-inf 9472  df-dju 10019  df-card 10057  df-pnf 11384  df-mnf 11385  df-xr 11386  df-ltxr 11387  df-le 11388  df-sub 11582  df-neg 11583  df-div 12014  df-nn 12376  df-2 12445  df-3 12446  df-4 12447  df-5 12448  df-6 12449  df-7 12450  df-8 12451  df-9 12452  df-n0 12647  df-xnn0 12720  df-z 12734  df-dec 12855  df-uz 13006  df-rp 13161  df-ico 13522  df-fz 13680  df-fzo 13829  df-fl 13972  df-ceil 13973  df-mod 14050  df-hash 14516  df-dvds 16467  df-struct 17369  df-slot 17404  df-ndx 17416  df-base 17432  df-edgf 29624  df-vtx 29633  df-iedg 29634  df-edg 29683  df-umgr 29718  df-usgr 29789  df-gpg 49412
This theorem is used by:  pgnbgreunbgrlem3  49489
  Copyright terms: Public domain W3C validator