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 48878
Description: Lemma 1 for pgnbgreunbgr 48890. (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 11195 . . . . . 6 0 ∈ V
2 vex 3459 . . . . . 6 𝑦 ∈ V
31, 2op2ndd 7993 . . . . 5 (𝑋 = ⟨0, 𝑦⟩ → (2nd𝑋) = 𝑦)
4 oveq1 7417 . . . . . . . . . . 11 ((2nd𝑋) = 𝑦 → ((2nd𝑋) + 1) = (𝑦 + 1))
54oveq1d 7425 . . . . . . . . . 10 ((2nd𝑋) = 𝑦 → (((2nd𝑋) + 1) mod 5) = ((𝑦 + 1) mod 5))
65opeq2d 4845 . . . . . . . . 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 4839 . . . . . . . . 9 ((2nd𝑋) = 𝑦 → ⟨1, (2nd𝑋)⟩ = ⟨1, 𝑦⟩)
98eqeq2d 2774 . . . . . . . 8 ((2nd𝑋) = 𝑦 → (𝐿 = ⟨1, (2nd𝑋)⟩ ↔ 𝐿 = ⟨1, 𝑦⟩))
10 oveq1 7417 . . . . . . . . . . 11 ((2nd𝑋) = 𝑦 → ((2nd𝑋) − 1) = (𝑦 − 1))
1110oveq1d 7425 . . . . . . . . . 10 ((2nd𝑋) = 𝑦 → (((2nd𝑋) − 1) mod 5) = ((𝑦 − 1) mod 5))
1211opeq2d 4845 . . . . . . . . 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 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 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 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 643 . . . . . 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 489 . . . . . . . . . . . . 13 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩)
21 simpl 487 . . . . . . . . . . . . 13 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → 𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩)
2220, 21neeq12d 3019 . . . . . . . . . . . 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 2969 . . . . . . . . . . . . 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 415 . . . . . . . . . 10 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
2827ex 417 . . . . . . . . 9 (𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ → (𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩ → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
29 5eluz3 12902 . . . . . . . . . . . . . . 15 5 ∈ (ℤ‘3)
30 pglem 48856 . . . . . . . . . . . . . . 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 48830 . . . . . . . . . . . . . . 15 (((5 ∈ (ℤ‘3) ∧ 2 ∈ (1..^(⌈‘(5 / 2)))) ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → ({⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸𝑏 = 𝑦))
3629, 30, 35mpanl12 714 . . . . . . . . . . . . . 14 ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → ({⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸𝑏 = 𝑦))
37 opeq2 4839 . . . . . . . . . . . . . . 15 (𝑦 = 𝑏 → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)
3837eqcoms 2771 . . . . . . . . . . . . . 14 (𝑏 = 𝑦 → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)
3936, 38biimtrdi 256 . . . . . . . . . . . . 13 ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → ({⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸 → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))
4039adantld 495 . . . . . . . . . . . 12 ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))
41 preq1 4699 . . . . . . . . . . . . . . 15 (𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩ → {𝐾, ⟨0, 𝑏⟩} = {⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩})
4241eleq1d 2848 . . . . . . . . . . . . . 14 (𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩ → ({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ↔ {⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸))
43 preq2 4700 . . . . . . . . . . . . . . 15 (𝐿 = ⟨1, 𝑦⟩ → {⟨0, 𝑏⟩, 𝐿} = {⟨0, 𝑏⟩, ⟨1, 𝑦⟩})
4443eleq1d 2848 . . . . . . . . . . . . . 14 (𝐿 = ⟨1, 𝑦⟩ → ({⟨0, 𝑏⟩, 𝐿} ∈ 𝐸 ↔ {⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸))
4542, 44bi2anan9r 650 . . . . . . . . . . . . 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 495 . . . . . . . . . 10 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
4948ex 417 . . . . . . . . 9 (𝐿 = ⟨1, 𝑦⟩ → (𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩ → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
50 prcom 4698 . . . . . . . . . . . . . . 15 {⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩} = {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩}
5150eleq1i 2854 . . . . . . . . . . . . . 14 ({⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ↔ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸)
52 prcom 4698 . . . . . . . . . . . . . . 15 {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩} = {⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩}
5352eleq1i 2854 . . . . . . . . . . . . . 14 ({⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩} ∈ 𝐸 ↔ {⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸)
5451, 53anbi12ci 640 . . . . . . . . . . . . 13 (({⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩} ∈ 𝐸) ↔ ({⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸))
55 5nn 12322 . . . . . . . . . . . . . . . . 17 5 ∈ ℕ
5655nnzi 12613 . . . . . . . . . . . . . . . 16 5 ∈ ℤ
57 uzid 12872 . . . . . . . . . . . . . . . 16 (5 ∈ ℤ → 5 ∈ (ℤ‘5))
5856, 57ax-mp 5 . . . . . . . . . . . . . . 15 5 ∈ (ℤ‘5)
5931, 32, 33, 34gpgedg2ov 48831 . . . . . . . . . . . . . . 15 (((5 ∈ (ℤ‘5) ∧ 2 ∈ (1..^(⌈‘(5 / 2)))) ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸) ↔ 𝑏 = 𝑦))
6058, 30, 59mpanl12 714 . . . . . . . . . . . . . 14 ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸) ↔ 𝑏 = 𝑦))
61 equcomiv 2044 . . . . . . . . . . . . . . 15 (𝑏 = 𝑦𝑦 = 𝑏)
6261opeq2d 4845 . . . . . . . . . . . . . 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 4700 . . . . . . . . . . . . . . 15 (𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ → {⟨0, 𝑏⟩, 𝐿} = {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩})
6665eleq1d 2848 . . . . . . . . . . . . . 14 (𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ → ({⟨0, 𝑏⟩, 𝐿} ∈ 𝐸 ↔ {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩} ∈ 𝐸))
6742, 66bi2anan9r 650 . . . . . . . . . . . . 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 495 . . . . . . . . . 10 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
7170ex 417 . . . . . . . . 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 4698 . . . . . . . . . . . . . . 15 {⟨1, 𝑦⟩, ⟨0, 𝑏⟩} = {⟨0, 𝑏⟩, ⟨1, 𝑦⟩}
7473eleq1i 2854 . . . . . . . . . . . . . 14 ({⟨1, 𝑦⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ↔ {⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸)
7574, 39biimtrid 245 . . . . . . . . . . . . 13 ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → ({⟨1, 𝑦⟩, ⟨0, 𝑏⟩} ∈ 𝐸 → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))
7675adantrd 496 . . . . . . . . . . . 12 ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({⟨1, 𝑦⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))
77 preq1 4699 . . . . . . . . . . . . . . 15 (𝐾 = ⟨1, 𝑦⟩ → {𝐾, ⟨0, 𝑏⟩} = {⟨1, 𝑦⟩, ⟨0, 𝑏⟩})
7877eleq1d 2848 . . . . . . . . . . . . . 14 (𝐾 = ⟨1, 𝑦⟩ → ({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ↔ {⟨1, 𝑦⟩, ⟨0, 𝑏⟩} ∈ 𝐸))
79 preq2 4700 . . . . . . . . . . . . . . 15 (𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ → {⟨0, 𝑏⟩, 𝐿} = {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩})
8079eleq1d 2848 . . . . . . . . . . . . . 14 (𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ → ({⟨0, 𝑏⟩, 𝐿} ∈ 𝐸 ↔ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸))
8178, 80bi2anan9r 650 . . . . . . . . . . . . 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 495 . . . . . . . . . 10 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
8584ex 417 . . . . . . . . 9 (𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ → (𝐾 = ⟨1, 𝑦⟩ → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
86 simpr 489 . . . . . . . . . . . . 13 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → 𝐾 = ⟨1, 𝑦⟩)
87 simpl 487 . . . . . . . . . . . . 13 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → 𝐿 = ⟨1, 𝑦⟩)
8886, 87neeq12d 3019 . . . . . . . . . . . 12 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → (𝐾𝐿 ↔ ⟨1, 𝑦⟩ ≠ ⟨1, 𝑦⟩))
89 eqid 2763 . . . . . . . . . . . . 13 ⟨1, 𝑦⟩ = ⟨1, 𝑦
90 eqneqall 2969 . . . . . . . . . . . . 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 415 . . . . . . . . . 10 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
9493ex 417 . . . . . . . . 9 (𝐿 = ⟨1, 𝑦⟩ → (𝐾 = ⟨1, 𝑦⟩ → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
9575adantrd 496 . . . . . . . . . . . 12 ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({⟨1, 𝑦⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))
9677adantl 486 . . . . . . . . . . . . . . 15 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → {𝐾, ⟨0, 𝑏⟩} = {⟨1, 𝑦⟩, ⟨0, 𝑏⟩})
9796eleq1d 2848 . . . . . . . . . . . . . 14 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → ({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ↔ {⟨1, 𝑦⟩, ⟨0, 𝑏⟩} ∈ 𝐸))
9865adantr 485 . . . . . . . . . . . . . . 15 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → {⟨0, 𝑏⟩, 𝐿} = {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩})
9998eleq1d 2848 . . . . . . . . . . . . . 14 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → ({⟨0, 𝑏⟩, 𝐿} ∈ 𝐸 ↔ {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩} ∈ 𝐸))
10097, 99anbi12d 643 . . . . . . . . . . . . 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 495 . . . . . . . . . 10 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
104103ex 417 . . . . . . . . 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 486 . . . . . . . . . . . 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 487 . . . . . . . . . . . . . 14 ((𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩) → 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩)
110 simpr 489 . . . . . . . . . . . . . 14 ((𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩) → 𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩)
111109, 110neeq12d 3019 . . . . . . . . . . . . 13 ((𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩) → (𝐾𝐿 ↔ ⟨0, ((𝑦 − 1) mod 5)⟩ ≠ ⟨0, ((𝑦 + 1) mod 5)⟩))
112111ancoms 463 . . . . . . . . . . . 12 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩) → (𝐾𝐿 ↔ ⟨0, ((𝑦 − 1) mod 5)⟩ ≠ ⟨0, ((𝑦 + 1) mod 5)⟩))
113112anbi1d 642 . . . . . . . . . . 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 4699 . . . . . . . . . . . . . 14 (𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩ → {𝐾, ⟨0, 𝑏⟩} = {⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩})
115114eleq1d 2848 . . . . . . . . . . . . 13 (𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩ → ({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ↔ {⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸))
116115, 80bi2anan9r 650 . . . . . . . . . . . 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 417 . . . . . . . . 9 (𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ → (𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩ → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
12039adantld 495 . . . . . . . . . . . 12 ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))
121120adantl 486 . . . . . . . . . . 11 ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))
122114adantl 486 . . . . . . . . . . . . . 14 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩) → {𝐾, ⟨0, 𝑏⟩} = {⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩})
123122eleq1d 2848 . . . . . . . . . . . . 13 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩) → ({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ↔ {⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸))
12444adantr 485 . . . . . . . . . . . . 13 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩) → ({⟨0, 𝑏⟩, 𝐿} ∈ 𝐸 ↔ {⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸))
125123, 124anbi12d 643 . . . . . . . . . . . 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 417 . . . . . . . . 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 2969 . . . . . . . . . . 11 (𝐾 = 𝐿 → (𝐾𝐿 → ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
132131impd 415 . . . . . . . . . 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 411 . . . . . 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 486 . 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 419 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
Syntax hints:  wi 4  wb 209  wa 400  w3o 1102   = wceq 1570  wcel 2143  wne 2958  {cpr 4591  cop 4595  cfv 6536  (class class class)co 7410  2nd c2nd 7981  0cc0 11095  1c1 11096   + caddc 11098  cmin 11436   / cdiv 11866  2c2 12290  3c3 12291  5c5 12293  cz 12586  cuz 12857  ..^cfzo 13678  cceil 13820   mod cmo 13898  Vtxcvtx 29346  Edgcedg 29397   NeighbVtx cnbgr 29682   gPetersenGr cgpg 48805
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5238  ax-sep 5257  ax-nul 5269  ax-pow 5336  ax-pr 5404  ax-un 7732  ax-cnex 11151  ax-resscn 11152  ax-1cn 11153  ax-icn 11154  ax-addcl 11155  ax-addrcl 11156  ax-mulcl 11157  ax-mulrcl 11158  ax-mulcom 11159  ax-addass 11160  ax-mulass 11161  ax-distr 11162  ax-i2m1 11163  ax-1ne0 11164  ax-1rid 11165  ax-rnegex 11166  ax-rrecex 11167  ax-cnre 11168  ax-pre-lttri 11169  ax-pre-lttrn 11170  ax-pre-ltadd 11171  ax-pre-mulgt0 11172  ax-pre-sup 11173
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-nel 3065  df-ral 3080  df-rex 3090  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3745  df-csb 3854  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-pss 3925  df-nul 4287  df-if 4488  df-pw 4564  df-sn 4590  df-pr 4592  df-op 4596  df-uni 4873  df-int 4913  df-iun 4958  df-br 5110  df-opab 5174  df-mpt 5193  df-tr 5219  df-id 5556  df-eprel 5561  df-po 5569  df-so 5570  df-fr 5614  df-we 5616  df-xp 5667  df-rel 5668  df-cnv 5669  df-co 5670  df-dm 5671  df-rn 5672  df-res 5673  df-ima 5674  df-pred 6302  df-ord 6363  df-on 6364  df-lim 6365  df-suc 6366  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-riota 7367  df-ov 7413  df-oprab 7414  df-mpo 7415  df-om 7859  df-1st 7982  df-2nd 7983  df-frecs 8274  df-wrecs 8305  df-recs 8354  df-rdg 8393  df-1o 8449  df-oadd 8453  df-er 8690  df-en 8940  df-dom 8941  df-sdom 8942  df-fin 8943  df-sup 9398  df-inf 9399  df-dju 9883  df-card 9921  df-pnf 11240  df-mnf 11241  df-xr 11242  df-ltxr 11243  df-le 11244  df-sub 11438  df-neg 11439  df-div 11867  df-nn 12229  df-2 12298  df-3 12299  df-4 12300  df-5 12301  df-6 12302  df-7 12303  df-8 12304  df-9 12305  df-n0 12500  df-xnn0 12573  df-z 12587  df-dec 12707  df-uz 12858  df-rp 13012  df-ico 13373  df-fz 13531  df-fzo 13679  df-fl 13821  df-ceil 13822  df-mod 13899  df-hash 14363  df-dvds 16306  df-struct 17202  df-slot 17237  df-ndx 17249  df-base 17265  df-edgf 29339  df-vtx 29348  df-iedg 29349  df-edg 29398  df-umgr 29433  df-usgr 29501  df-gpg 48806
This theorem is referenced by:  pgnbgreunbgrlem3  48883
  Copyright terms: Public domain W3C validator