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 48144
Description: Lemma 1 for pgnbgreunbgr 48156. (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 11101 . . . . . 6 0 ∈ V
2 vex 3440 . . . . . 6 𝑦 ∈ V
31, 2op2ndd 7927 . . . . 5 (𝑋 = ⟨0, 𝑦⟩ → (2nd𝑋) = 𝑦)
4 oveq1 7348 . . . . . . . . . . 11 ((2nd𝑋) = 𝑦 → ((2nd𝑋) + 1) = (𝑦 + 1))
54oveq1d 7356 . . . . . . . . . 10 ((2nd𝑋) = 𝑦 → (((2nd𝑋) + 1) mod 5) = ((𝑦 + 1) mod 5))
65opeq2d 4827 . . . . . . . . 9 ((2nd𝑋) = 𝑦 → ⟨0, (((2nd𝑋) + 1) mod 5)⟩ = ⟨0, ((𝑦 + 1) mod 5)⟩)
76eqeq2d 2742 . . . . . . . 8 ((2nd𝑋) = 𝑦 → (𝐿 = ⟨0, (((2nd𝑋) + 1) mod 5)⟩ ↔ 𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩))
8 opeq2 4821 . . . . . . . . 9 ((2nd𝑋) = 𝑦 → ⟨1, (2nd𝑋)⟩ = ⟨1, 𝑦⟩)
98eqeq2d 2742 . . . . . . . 8 ((2nd𝑋) = 𝑦 → (𝐿 = ⟨1, (2nd𝑋)⟩ ↔ 𝐿 = ⟨1, 𝑦⟩))
10 oveq1 7348 . . . . . . . . . . 11 ((2nd𝑋) = 𝑦 → ((2nd𝑋) − 1) = (𝑦 − 1))
1110oveq1d 7356 . . . . . . . . . 10 ((2nd𝑋) = 𝑦 → (((2nd𝑋) − 1) mod 5) = ((𝑦 − 1) mod 5))
1211opeq2d 4827 . . . . . . . . 9 ((2nd𝑋) = 𝑦 → ⟨0, (((2nd𝑋) − 1) mod 5)⟩ = ⟨0, ((𝑦 − 1) mod 5)⟩)
1312eqeq2d 2742 . . . . . . . 8 ((2nd𝑋) = 𝑦 → (𝐿 = ⟨0, (((2nd𝑋) − 1) mod 5)⟩ ↔ 𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩))
147, 9, 133orbi123d 1437 . . . . . . 7 ((2nd𝑋) = 𝑦 → ((𝐿 = ⟨0, (((2nd𝑋) + 1) mod 5)⟩ ∨ 𝐿 = ⟨1, (2nd𝑋)⟩ ∨ 𝐿 = ⟨0, (((2nd𝑋) − 1) mod 5)⟩) ↔ (𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∨ 𝐿 = ⟨1, 𝑦⟩ ∨ 𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩)))
156eqeq2d 2742 . . . . . . . 8 ((2nd𝑋) = 𝑦 → (𝐾 = ⟨0, (((2nd𝑋) + 1) mod 5)⟩ ↔ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩))
168eqeq2d 2742 . . . . . . . 8 ((2nd𝑋) = 𝑦 → (𝐾 = ⟨1, (2nd𝑋)⟩ ↔ 𝐾 = ⟨1, 𝑦⟩))
1712eqeq2d 2742 . . . . . . . 8 ((2nd𝑋) = 𝑦 → (𝐾 = ⟨0, (((2nd𝑋) − 1) mod 5)⟩ ↔ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩))
1815, 16, 173orbi123d 1437 . . . . . . 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 632 . . . . . 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 484 . . . . . . . . . . . . 13 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩)
21 simpl 482 . . . . . . . . . . . . 13 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → 𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩)
2220, 21neeq12d 2989 . . . . . . . . . . . 12 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → (𝐾𝐿 ↔ ⟨0, ((𝑦 + 1) mod 5)⟩ ≠ ⟨0, ((𝑦 + 1) mod 5)⟩))
23 eqid 2731 . . . . . . . . . . . . 13 ⟨0, ((𝑦 + 1) mod 5)⟩ = ⟨0, ((𝑦 + 1) mod 5)⟩
24 eqneqall 2939 . . . . . . . . . . . . 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 253 . . . . . . . . . . 11 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → (𝐾𝐿 → ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
2726impd 410 . . . . . . . . . 10 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
2827ex 412 . . . . . . . . 9 (𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ → (𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩ → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
29 5eluz3 12776 . . . . . . . . . . . . . . 15 5 ∈ (ℤ‘3)
30 pglem 48122 . . . . . . . . . . . . . . 15 2 ∈ (1..^(⌈‘(5 / 2)))
31 eqid 2731 . . . . . . . . . . . . . . . 16 (1..^(⌈‘(5 / 2))) = (1..^(⌈‘(5 / 2)))
32 eqid 2731 . . . . . . . . . . . . . . . 16 (0..^5) = (0..^5)
33 pgnbgreunbgr.g . . . . . . . . . . . . . . . 16 𝐺 = (5 gPetersenGr 2)
34 pgnbgreunbgr.e . . . . . . . . . . . . . . . 16 𝐸 = (Edg‘𝐺)
3531, 32, 33, 34gpgedgiov 48096 . . . . . . . . . . . . . . 15 (((5 ∈ (ℤ‘3) ∧ 2 ∈ (1..^(⌈‘(5 / 2)))) ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → ({⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸𝑏 = 𝑦))
3629, 30, 35mpanl12 702 . . . . . . . . . . . . . 14 ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → ({⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸𝑏 = 𝑦))
37 opeq2 4821 . . . . . . . . . . . . . . 15 (𝑦 = 𝑏 → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)
3837eqcoms 2739 . . . . . . . . . . . . . 14 (𝑏 = 𝑦 → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)
3936, 38biimtrdi 253 . . . . . . . . . . . . 13 ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → ({⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸 → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))
4039adantld 490 . . . . . . . . . . . 12 ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))
41 preq1 4681 . . . . . . . . . . . . . . 15 (𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩ → {𝐾, ⟨0, 𝑏⟩} = {⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩})
4241eleq1d 2816 . . . . . . . . . . . . . 14 (𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩ → ({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ↔ {⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸))
43 preq2 4682 . . . . . . . . . . . . . . 15 (𝐿 = ⟨1, 𝑦⟩ → {⟨0, 𝑏⟩, 𝐿} = {⟨0, 𝑏⟩, ⟨1, 𝑦⟩})
4443eleq1d 2816 . . . . . . . . . . . . . 14 (𝐿 = ⟨1, 𝑦⟩ → ({⟨0, 𝑏⟩, 𝐿} ∈ 𝐸 ↔ {⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸))
4542, 44bi2anan9r 639 . . . . . . . . . . . . 13 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) ↔ ({⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸)))
4645imbi1d 341 . . . . . . . . . . . 12 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → ((({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩) ↔ (({⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
4740, 46imbitrrid 246 . . . . . . . . . . 11 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
4847adantld 490 . . . . . . . . . 10 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
4948ex 412 . . . . . . . . 9 (𝐿 = ⟨1, 𝑦⟩ → (𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩ → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
50 prcom 4680 . . . . . . . . . . . . . . 15 {⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩} = {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩}
5150eleq1i 2822 . . . . . . . . . . . . . 14 ({⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ↔ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸)
52 prcom 4680 . . . . . . . . . . . . . . 15 {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩} = {⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩}
5352eleq1i 2822 . . . . . . . . . . . . . 14 ({⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩} ∈ 𝐸 ↔ {⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸)
5451, 53anbi12ci 629 . . . . . . . . . . . . 13 (({⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩} ∈ 𝐸) ↔ ({⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸))
55 5nn 12206 . . . . . . . . . . . . . . . . 17 5 ∈ ℕ
5655nnzi 12491 . . . . . . . . . . . . . . . 16 5 ∈ ℤ
57 uzid 12742 . . . . . . . . . . . . . . . 16 (5 ∈ ℤ → 5 ∈ (ℤ‘5))
5856, 57ax-mp 5 . . . . . . . . . . . . . . 15 5 ∈ (ℤ‘5)
5931, 32, 33, 34gpgedg2ov 48097 . . . . . . . . . . . . . . 15 (((5 ∈ (ℤ‘5) ∧ 2 ∈ (1..^(⌈‘(5 / 2)))) ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸) ↔ 𝑏 = 𝑦))
6058, 30, 59mpanl12 702 . . . . . . . . . . . . . 14 ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸) ↔ 𝑏 = 𝑦))
61 equcomiv 2015 . . . . . . . . . . . . . . 15 (𝑏 = 𝑦𝑦 = 𝑏)
6261opeq2d 4827 . . . . . . . . . . . . . 14 (𝑏 = 𝑦 → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)
6360, 62biimtrdi 253 . . . . . . . . . . . . 13 ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))
6454, 63biimtrid 242 . . . . . . . . . . . 12 ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))
65 preq2 4682 . . . . . . . . . . . . . . 15 (𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ → {⟨0, 𝑏⟩, 𝐿} = {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩})
6665eleq1d 2816 . . . . . . . . . . . . . 14 (𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ → ({⟨0, 𝑏⟩, 𝐿} ∈ 𝐸 ↔ {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩} ∈ 𝐸))
6742, 66bi2anan9r 639 . . . . . . . . . . . . 13 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) ↔ ({⟨0, ((𝑦 + 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩} ∈ 𝐸)))
6867imbi1d 341 . . . . . . . . . . . 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 246 . . . . . . . . . . 11 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
7069adantld 490 . . . . . . . . . 10 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
7170ex 412 . . . . . . . . 9 (𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ → (𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩ → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
7228, 49, 713jaoi 1430 . . . . . . . 8 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∨ 𝐿 = ⟨1, 𝑦⟩ ∨ 𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩) → (𝐾 = ⟨0, ((𝑦 + 1) mod 5)⟩ → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
73 prcom 4680 . . . . . . . . . . . . . . 15 {⟨1, 𝑦⟩, ⟨0, 𝑏⟩} = {⟨0, 𝑏⟩, ⟨1, 𝑦⟩}
7473eleq1i 2822 . . . . . . . . . . . . . 14 ({⟨1, 𝑦⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ↔ {⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸)
7574, 39biimtrid 242 . . . . . . . . . . . . 13 ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → ({⟨1, 𝑦⟩, ⟨0, 𝑏⟩} ∈ 𝐸 → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))
7675adantrd 491 . . . . . . . . . . . 12 ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({⟨1, 𝑦⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))
77 preq1 4681 . . . . . . . . . . . . . . 15 (𝐾 = ⟨1, 𝑦⟩ → {𝐾, ⟨0, 𝑏⟩} = {⟨1, 𝑦⟩, ⟨0, 𝑏⟩})
7877eleq1d 2816 . . . . . . . . . . . . . 14 (𝐾 = ⟨1, 𝑦⟩ → ({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ↔ {⟨1, 𝑦⟩, ⟨0, 𝑏⟩} ∈ 𝐸))
79 preq2 4682 . . . . . . . . . . . . . . 15 (𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ → {⟨0, 𝑏⟩, 𝐿} = {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩})
8079eleq1d 2816 . . . . . . . . . . . . . 14 (𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ → ({⟨0, 𝑏⟩, 𝐿} ∈ 𝐸 ↔ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸))
8178, 80bi2anan9r 639 . . . . . . . . . . . . 13 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) ↔ ({⟨1, 𝑦⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸)))
8281imbi1d 341 . . . . . . . . . . . 12 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → ((({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩) ↔ (({⟨1, 𝑦⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
8376, 82imbitrrid 246 . . . . . . . . . . 11 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
8483adantld 490 . . . . . . . . . 10 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
8584ex 412 . . . . . . . . 9 (𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ → (𝐾 = ⟨1, 𝑦⟩ → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
86 simpr 484 . . . . . . . . . . . . 13 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → 𝐾 = ⟨1, 𝑦⟩)
87 simpl 482 . . . . . . . . . . . . 13 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → 𝐿 = ⟨1, 𝑦⟩)
8886, 87neeq12d 2989 . . . . . . . . . . . 12 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → (𝐾𝐿 ↔ ⟨1, 𝑦⟩ ≠ ⟨1, 𝑦⟩))
89 eqid 2731 . . . . . . . . . . . . 13 ⟨1, 𝑦⟩ = ⟨1, 𝑦
90 eqneqall 2939 . . . . . . . . . . . . 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 253 . . . . . . . . . . 11 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → (𝐾𝐿 → ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
9392impd 410 . . . . . . . . . 10 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
9493ex 412 . . . . . . . . 9 (𝐿 = ⟨1, 𝑦⟩ → (𝐾 = ⟨1, 𝑦⟩ → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
9575adantrd 491 . . . . . . . . . . . 12 ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({⟨1, 𝑦⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))
9677adantl 481 . . . . . . . . . . . . . . 15 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → {𝐾, ⟨0, 𝑏⟩} = {⟨1, 𝑦⟩, ⟨0, 𝑏⟩})
9796eleq1d 2816 . . . . . . . . . . . . . 14 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → ({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ↔ {⟨1, 𝑦⟩, ⟨0, 𝑏⟩} ∈ 𝐸))
9865adantr 480 . . . . . . . . . . . . . . 15 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → {⟨0, 𝑏⟩, 𝐿} = {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩})
9998eleq1d 2816 . . . . . . . . . . . . . 14 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → ({⟨0, 𝑏⟩, 𝐿} ∈ 𝐸 ↔ {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩} ∈ 𝐸))
10097, 99anbi12d 632 . . . . . . . . . . . . 13 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) ↔ ({⟨1, 𝑦⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩} ∈ 𝐸)))
101100imbi1d 341 . . . . . . . . . . . 12 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → ((({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩) ↔ (({⟨1, 𝑦⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 − 1) mod 5)⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
10295, 101imbitrrid 246 . . . . . . . . . . 11 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
103102adantld 490 . . . . . . . . . 10 ((𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐾 = ⟨1, 𝑦⟩) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
104103ex 412 . . . . . . . . 9 (𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ → (𝐾 = ⟨1, 𝑦⟩ → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
10585, 94, 1043jaoi 1430 . . . . . . . 8 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∨ 𝐿 = ⟨1, 𝑦⟩ ∨ 𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩) → (𝐾 = ⟨1, 𝑦⟩ → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
10660, 38biimtrdi 253 . . . . . . . . . . . . 13 ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))
107106adantl 481 . . . . . . . . . . . 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 482 . . . . . . . . . . . . . 14 ((𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩) → 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩)
110 simpr 484 . . . . . . . . . . . . . 14 ((𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩) → 𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩)
111109, 110neeq12d 2989 . . . . . . . . . . . . 13 ((𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩ ∧ 𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩) → (𝐾𝐿 ↔ ⟨0, ((𝑦 − 1) mod 5)⟩ ≠ ⟨0, ((𝑦 + 1) mod 5)⟩))
112111ancoms 458 . . . . . . . . . . . 12 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩) → (𝐾𝐿 ↔ ⟨0, ((𝑦 − 1) mod 5)⟩ ≠ ⟨0, ((𝑦 + 1) mod 5)⟩))
113112anbi1d 631 . . . . . . . . . . 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 4681 . . . . . . . . . . . . . 14 (𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩ → {𝐾, ⟨0, 𝑏⟩} = {⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩})
115114eleq1d 2816 . . . . . . . . . . . . 13 (𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩ → ({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ↔ {⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸))
116115, 80bi2anan9r 639 . . . . . . . . . . . 12 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) ↔ ({⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨0, ((𝑦 + 1) mod 5)⟩} ∈ 𝐸)))
117116imbi1d 341 . . . . . . . . . . 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 294 . . . . . . . . . 10 ((𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ ∧ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
119118ex 412 . . . . . . . . 9 (𝐿 = ⟨0, ((𝑦 + 1) mod 5)⟩ → (𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩ → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
12039adantld 490 . . . . . . . . . . . 12 ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))
121120adantl 481 . . . . . . . . . . 11 ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))
122114adantl 481 . . . . . . . . . . . . . 14 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩) → {𝐾, ⟨0, 𝑏⟩} = {⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩})
123122eleq1d 2816 . . . . . . . . . . . . 13 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩) → ({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ↔ {⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸))
12444adantr 480 . . . . . . . . . . . . 13 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩) → ({⟨0, 𝑏⟩, 𝐿} ∈ 𝐸 ↔ {⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸))
125123, 124anbi12d 632 . . . . . . . . . . . 12 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) ↔ ({⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸)))
126125imbi1d 341 . . . . . . . . . . 11 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩) → ((({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩) ↔ (({⟨0, ((𝑦 − 1) mod 5)⟩, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, ⟨1, 𝑦⟩} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
127121, 126imbitrrid 246 . . . . . . . . . 10 ((𝐿 = ⟨1, 𝑦⟩ ∧ 𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩) → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
128127ex 412 . . . . . . . . 9 (𝐿 = ⟨1, 𝑦⟩ → (𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩ → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
129 eqeq2 2743 . . . . . . . . . . 11 (⟨0, ((𝑦 − 1) mod 5)⟩ = 𝐿 → (𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩ ↔ 𝐾 = 𝐿))
130129eqcoms 2739 . . . . . . . . . 10 (𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ → (𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩ ↔ 𝐾 = 𝐿))
131 eqneqall 2939 . . . . . . . . . . 11 (𝐾 = 𝐿 → (𝐾𝐿 → ((𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5)) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
132131impd 410 . . . . . . . . . 10 (𝐾 = 𝐿 → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
133130, 132biimtrdi 253 . . . . . . . . 9 (𝐿 = ⟨0, ((𝑦 − 1) mod 5)⟩ → (𝐾 = ⟨0, ((𝑦 − 1) mod 5)⟩ → ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
134119, 128, 1333jaoi 1430 . . . . . . . 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 1431 . . . . . . 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 406 . . . . . 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 253 . . . . 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 17 . . . 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 2735 . . . . . 6 (𝑋 = ⟨0, 𝑦⟩ → (𝑋 = ⟨0, 𝑏⟩ ↔ ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))
140139imbi2d 340 . . . . 5 (𝑋 = ⟨0, 𝑦⟩ → ((({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → 𝑋 = ⟨0, 𝑏⟩) ↔ (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩)))
141140imbi2d 340 . . . 4 (𝑋 = ⟨0, 𝑦⟩ → (((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → 𝑋 = ⟨0, 𝑏⟩)) ↔ ((𝐾𝐿 ∧ (𝑏 ∈ (0..^5) ∧ 𝑦 ∈ (0..^5))) → (({𝐾, ⟨0, 𝑏⟩} ∈ 𝐸 ∧ {⟨0, 𝑏⟩, 𝐿} ∈ 𝐸) → ⟨0, 𝑦⟩ = ⟨0, 𝑏⟩))))
142138, 141sylibrd 259 . . 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 481 . 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 414 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 206  wa 395  w3o 1085   = wceq 1541  wcel 2111  wne 2928  {cpr 4573  cop 4577  cfv 6476  (class class class)co 7341  2nd c2nd 7915  0cc0 11001  1c1 11002   + caddc 11004  cmin 11339   / cdiv 11769  2c2 12175  3c3 12176  5c5 12178  cz 12463  cuz 12727  ..^cfzo 13549  cceil 13690   mod cmo 13768  Vtxcvtx 28969  Edgcedg 29020   NeighbVtx cnbgr 29305   gPetersenGr cgpg 48071
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2113  ax-9 2121  ax-10 2144  ax-11 2160  ax-12 2180  ax-ext 2703  ax-rep 5212  ax-sep 5229  ax-nul 5239  ax-pow 5298  ax-pr 5365  ax-un 7663  ax-cnex 11057  ax-resscn 11058  ax-1cn 11059  ax-icn 11060  ax-addcl 11061  ax-addrcl 11062  ax-mulcl 11063  ax-mulrcl 11064  ax-mulcom 11065  ax-addass 11066  ax-mulass 11067  ax-distr 11068  ax-i2m1 11069  ax-1ne0 11070  ax-1rid 11071  ax-rnegex 11072  ax-rrecex 11073  ax-cnre 11074  ax-pre-lttri 11075  ax-pre-lttrn 11076  ax-pre-ltadd 11077  ax-pre-mulgt0 11078  ax-pre-sup 11079
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2535  df-eu 2564  df-clab 2710  df-cleq 2723  df-clel 2806  df-nfc 2881  df-ne 2929  df-nel 3033  df-ral 3048  df-rex 3057  df-rmo 3346  df-reu 3347  df-rab 3396  df-v 3438  df-sbc 3737  df-csb 3846  df-dif 3900  df-un 3902  df-in 3904  df-ss 3914  df-pss 3917  df-nul 4279  df-if 4471  df-pw 4547  df-sn 4572  df-pr 4574  df-op 4578  df-uni 4855  df-int 4893  df-iun 4938  df-br 5087  df-opab 5149  df-mpt 5168  df-tr 5194  df-id 5506  df-eprel 5511  df-po 5519  df-so 5520  df-fr 5564  df-we 5566  df-xp 5617  df-rel 5618  df-cnv 5619  df-co 5620  df-dm 5621  df-rn 5622  df-res 5623  df-ima 5624  df-pred 6243  df-ord 6304  df-on 6305  df-lim 6306  df-suc 6307  df-iota 6432  df-fun 6478  df-fn 6479  df-f 6480  df-f1 6481  df-fo 6482  df-f1o 6483  df-fv 6484  df-riota 7298  df-ov 7344  df-oprab 7345  df-mpo 7346  df-om 7792  df-1st 7916  df-2nd 7917  df-frecs 8206  df-wrecs 8237  df-recs 8286  df-rdg 8324  df-1o 8380  df-oadd 8384  df-er 8617  df-en 8865  df-dom 8866  df-sdom 8867  df-fin 8868  df-sup 9321  df-inf 9322  df-dju 9789  df-card 9827  df-pnf 11143  df-mnf 11144  df-xr 11145  df-ltxr 11146  df-le 11147  df-sub 11341  df-neg 11342  df-div 11770  df-nn 12121  df-2 12183  df-3 12184  df-4 12185  df-5 12186  df-6 12187  df-7 12188  df-8 12189  df-9 12190  df-n0 12377  df-xnn0 12450  df-z 12464  df-dec 12584  df-uz 12728  df-rp 12886  df-ico 13246  df-fz 13403  df-fzo 13550  df-fl 13691  df-ceil 13692  df-mod 13769  df-hash 14233  df-dvds 16159  df-struct 17053  df-slot 17088  df-ndx 17100  df-base 17116  df-edgf 28962  df-vtx 28971  df-iedg 28972  df-edg 29021  df-umgr 29056  df-usgr 29124  df-gpg 48072
This theorem is referenced by:  pgnbgreunbgrlem3  48149
  Copyright terms: Public domain W3C validator