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

Theorem gpgov 48288
Description: The generalized Petersen graph GPG(N,K). (Contributed by AV, 26-Aug-2025.)
Hypotheses
Ref Expression
gpgov.j 𝐽 = (1..^(⌈‘(𝑁 / 2)))
gpgov.i 𝐼 = (0..^𝑁)
Assertion
Ref Expression
gpgov ((𝑁 ∈ ℕ ∧ 𝐾𝐽) → (𝑁 gPetersenGr 𝐾) = {⟨(Base‘ndx), ({0, 1} × 𝐼)⟩, ⟨(.ef‘ndx), ( I ↾ {𝑒 ∈ 𝒫 ({0, 1} × 𝐼) ∣ ∃𝑥𝐼 (𝑒 = {⟨0, 𝑥⟩, ⟨0, ((𝑥 + 1) mod 𝑁)⟩} ∨ 𝑒 = {⟨0, 𝑥⟩, ⟨1, 𝑥⟩} ∨ 𝑒 = {⟨1, 𝑥⟩, ⟨1, ((𝑥 + 𝐾) mod 𝑁)⟩})})⟩})
Distinct variable groups:   𝑒,𝐼,𝑥   𝑒,𝐾,𝑥   𝑒,𝑁,𝑥
Allowed substitution hints:   𝐽(𝑥,𝑒)

Proof of Theorem gpgov
Dummy variables 𝑘 𝑛 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 prex 5382 . 2 {⟨(Base‘ndx), ({0, 1} × 𝐼)⟩, ⟨(.ef‘ndx), ( I ↾ {𝑒 ∈ 𝒫 ({0, 1} × 𝐼) ∣ ∃𝑥𝐼 (𝑒 = {⟨0, 𝑥⟩, ⟨0, ((𝑥 + 1) mod 𝑁)⟩} ∨ 𝑒 = {⟨0, 𝑥⟩, ⟨1, 𝑥⟩} ∨ 𝑒 = {⟨1, 𝑥⟩, ⟨1, ((𝑥 + 𝐾) mod 𝑁)⟩})})⟩} ∈ V
2 oveq2 7366 . . . . . . . 8 (𝑛 = 𝑁 → (0..^𝑛) = (0..^𝑁))
3 gpgov.i . . . . . . . 8 𝐼 = (0..^𝑁)
42, 3eqtr4di 2789 . . . . . . 7 (𝑛 = 𝑁 → (0..^𝑛) = 𝐼)
54xpeq2d 5654 . . . . . 6 (𝑛 = 𝑁 → ({0, 1} × (0..^𝑛)) = ({0, 1} × 𝐼))
65opeq2d 4836 . . . . 5 (𝑛 = 𝑁 → ⟨(Base‘ndx), ({0, 1} × (0..^𝑛))⟩ = ⟨(Base‘ndx), ({0, 1} × 𝐼)⟩)
76adantr 480 . . . 4 ((𝑛 = 𝑁𝑘 = 𝐾) → ⟨(Base‘ndx), ({0, 1} × (0..^𝑛))⟩ = ⟨(Base‘ndx), ({0, 1} × 𝐼)⟩)
85pweqd 4571 . . . . . . . 8 (𝑛 = 𝑁 → 𝒫 ({0, 1} × (0..^𝑛)) = 𝒫 ({0, 1} × 𝐼))
98adantr 480 . . . . . . 7 ((𝑛 = 𝑁𝑘 = 𝐾) → 𝒫 ({0, 1} × (0..^𝑛)) = 𝒫 ({0, 1} × 𝐼))
104rexeqdv 3297 . . . . . . . . 9 (𝑛 = 𝑁 → (∃𝑥 ∈ (0..^𝑛)(𝑒 = {⟨0, 𝑥⟩, ⟨0, ((𝑥 + 1) mod 𝑛)⟩} ∨ 𝑒 = {⟨0, 𝑥⟩, ⟨1, 𝑥⟩} ∨ 𝑒 = {⟨1, 𝑥⟩, ⟨1, ((𝑥 + 𝑘) mod 𝑛)⟩}) ↔ ∃𝑥𝐼 (𝑒 = {⟨0, 𝑥⟩, ⟨0, ((𝑥 + 1) mod 𝑛)⟩} ∨ 𝑒 = {⟨0, 𝑥⟩, ⟨1, 𝑥⟩} ∨ 𝑒 = {⟨1, 𝑥⟩, ⟨1, ((𝑥 + 𝑘) mod 𝑛)⟩})))
1110adantr 480 . . . . . . . 8 ((𝑛 = 𝑁𝑘 = 𝐾) → (∃𝑥 ∈ (0..^𝑛)(𝑒 = {⟨0, 𝑥⟩, ⟨0, ((𝑥 + 1) mod 𝑛)⟩} ∨ 𝑒 = {⟨0, 𝑥⟩, ⟨1, 𝑥⟩} ∨ 𝑒 = {⟨1, 𝑥⟩, ⟨1, ((𝑥 + 𝑘) mod 𝑛)⟩}) ↔ ∃𝑥𝐼 (𝑒 = {⟨0, 𝑥⟩, ⟨0, ((𝑥 + 1) mod 𝑛)⟩} ∨ 𝑒 = {⟨0, 𝑥⟩, ⟨1, 𝑥⟩} ∨ 𝑒 = {⟨1, 𝑥⟩, ⟨1, ((𝑥 + 𝑘) mod 𝑛)⟩})))
12 oveq2 7366 . . . . . . . . . . . . . 14 (𝑛 = 𝑁 → ((𝑥 + 1) mod 𝑛) = ((𝑥 + 1) mod 𝑁))
1312opeq2d 4836 . . . . . . . . . . . . 13 (𝑛 = 𝑁 → ⟨0, ((𝑥 + 1) mod 𝑛)⟩ = ⟨0, ((𝑥 + 1) mod 𝑁)⟩)
1413preq2d 4697 . . . . . . . . . . . 12 (𝑛 = 𝑁 → {⟨0, 𝑥⟩, ⟨0, ((𝑥 + 1) mod 𝑛)⟩} = {⟨0, 𝑥⟩, ⟨0, ((𝑥 + 1) mod 𝑁)⟩})
1514adantr 480 . . . . . . . . . . 11 ((𝑛 = 𝑁𝑘 = 𝐾) → {⟨0, 𝑥⟩, ⟨0, ((𝑥 + 1) mod 𝑛)⟩} = {⟨0, 𝑥⟩, ⟨0, ((𝑥 + 1) mod 𝑁)⟩})
1615eqeq2d 2747 . . . . . . . . . 10 ((𝑛 = 𝑁𝑘 = 𝐾) → (𝑒 = {⟨0, 𝑥⟩, ⟨0, ((𝑥 + 1) mod 𝑛)⟩} ↔ 𝑒 = {⟨0, 𝑥⟩, ⟨0, ((𝑥 + 1) mod 𝑁)⟩}))
17 biidd 262 . . . . . . . . . 10 ((𝑛 = 𝑁𝑘 = 𝐾) → (𝑒 = {⟨0, 𝑥⟩, ⟨1, 𝑥⟩} ↔ 𝑒 = {⟨0, 𝑥⟩, ⟨1, 𝑥⟩}))
18 oveq2 7366 . . . . . . . . . . . . . . 15 (𝑘 = 𝐾 → (𝑥 + 𝑘) = (𝑥 + 𝐾))
1918adantl 481 . . . . . . . . . . . . . 14 ((𝑛 = 𝑁𝑘 = 𝐾) → (𝑥 + 𝑘) = (𝑥 + 𝐾))
20 simpl 482 . . . . . . . . . . . . . 14 ((𝑛 = 𝑁𝑘 = 𝐾) → 𝑛 = 𝑁)
2119, 20oveq12d 7376 . . . . . . . . . . . . 13 ((𝑛 = 𝑁𝑘 = 𝐾) → ((𝑥 + 𝑘) mod 𝑛) = ((𝑥 + 𝐾) mod 𝑁))
2221opeq2d 4836 . . . . . . . . . . . 12 ((𝑛 = 𝑁𝑘 = 𝐾) → ⟨1, ((𝑥 + 𝑘) mod 𝑛)⟩ = ⟨1, ((𝑥 + 𝐾) mod 𝑁)⟩)
2322preq2d 4697 . . . . . . . . . . 11 ((𝑛 = 𝑁𝑘 = 𝐾) → {⟨1, 𝑥⟩, ⟨1, ((𝑥 + 𝑘) mod 𝑛)⟩} = {⟨1, 𝑥⟩, ⟨1, ((𝑥 + 𝐾) mod 𝑁)⟩})
2423eqeq2d 2747 . . . . . . . . . 10 ((𝑛 = 𝑁𝑘 = 𝐾) → (𝑒 = {⟨1, 𝑥⟩, ⟨1, ((𝑥 + 𝑘) mod 𝑛)⟩} ↔ 𝑒 = {⟨1, 𝑥⟩, ⟨1, ((𝑥 + 𝐾) mod 𝑁)⟩}))
2516, 17, 243orbi123d 1437 . . . . . . . . 9 ((𝑛 = 𝑁𝑘 = 𝐾) → ((𝑒 = {⟨0, 𝑥⟩, ⟨0, ((𝑥 + 1) mod 𝑛)⟩} ∨ 𝑒 = {⟨0, 𝑥⟩, ⟨1, 𝑥⟩} ∨ 𝑒 = {⟨1, 𝑥⟩, ⟨1, ((𝑥 + 𝑘) mod 𝑛)⟩}) ↔ (𝑒 = {⟨0, 𝑥⟩, ⟨0, ((𝑥 + 1) mod 𝑁)⟩} ∨ 𝑒 = {⟨0, 𝑥⟩, ⟨1, 𝑥⟩} ∨ 𝑒 = {⟨1, 𝑥⟩, ⟨1, ((𝑥 + 𝐾) mod 𝑁)⟩})))
2625rexbidv 3160 . . . . . . . 8 ((𝑛 = 𝑁𝑘 = 𝐾) → (∃𝑥𝐼 (𝑒 = {⟨0, 𝑥⟩, ⟨0, ((𝑥 + 1) mod 𝑛)⟩} ∨ 𝑒 = {⟨0, 𝑥⟩, ⟨1, 𝑥⟩} ∨ 𝑒 = {⟨1, 𝑥⟩, ⟨1, ((𝑥 + 𝑘) mod 𝑛)⟩}) ↔ ∃𝑥𝐼 (𝑒 = {⟨0, 𝑥⟩, ⟨0, ((𝑥 + 1) mod 𝑁)⟩} ∨ 𝑒 = {⟨0, 𝑥⟩, ⟨1, 𝑥⟩} ∨ 𝑒 = {⟨1, 𝑥⟩, ⟨1, ((𝑥 + 𝐾) mod 𝑁)⟩})))
2711, 26bitrd 279 . . . . . . 7 ((𝑛 = 𝑁𝑘 = 𝐾) → (∃𝑥 ∈ (0..^𝑛)(𝑒 = {⟨0, 𝑥⟩, ⟨0, ((𝑥 + 1) mod 𝑛)⟩} ∨ 𝑒 = {⟨0, 𝑥⟩, ⟨1, 𝑥⟩} ∨ 𝑒 = {⟨1, 𝑥⟩, ⟨1, ((𝑥 + 𝑘) mod 𝑛)⟩}) ↔ ∃𝑥𝐼 (𝑒 = {⟨0, 𝑥⟩, ⟨0, ((𝑥 + 1) mod 𝑁)⟩} ∨ 𝑒 = {⟨0, 𝑥⟩, ⟨1, 𝑥⟩} ∨ 𝑒 = {⟨1, 𝑥⟩, ⟨1, ((𝑥 + 𝐾) mod 𝑁)⟩})))
289, 27rabeqbidv 3417 . . . . . 6 ((𝑛 = 𝑁𝑘 = 𝐾) → {𝑒 ∈ 𝒫 ({0, 1} × (0..^𝑛)) ∣ ∃𝑥 ∈ (0..^𝑛)(𝑒 = {⟨0, 𝑥⟩, ⟨0, ((𝑥 + 1) mod 𝑛)⟩} ∨ 𝑒 = {⟨0, 𝑥⟩, ⟨1, 𝑥⟩} ∨ 𝑒 = {⟨1, 𝑥⟩, ⟨1, ((𝑥 + 𝑘) mod 𝑛)⟩})} = {𝑒 ∈ 𝒫 ({0, 1} × 𝐼) ∣ ∃𝑥𝐼 (𝑒 = {⟨0, 𝑥⟩, ⟨0, ((𝑥 + 1) mod 𝑁)⟩} ∨ 𝑒 = {⟨0, 𝑥⟩, ⟨1, 𝑥⟩} ∨ 𝑒 = {⟨1, 𝑥⟩, ⟨1, ((𝑥 + 𝐾) mod 𝑁)⟩})})
2928reseq2d 5938 . . . . 5 ((𝑛 = 𝑁𝑘 = 𝐾) → ( I ↾ {𝑒 ∈ 𝒫 ({0, 1} × (0..^𝑛)) ∣ ∃𝑥 ∈ (0..^𝑛)(𝑒 = {⟨0, 𝑥⟩, ⟨0, ((𝑥 + 1) mod 𝑛)⟩} ∨ 𝑒 = {⟨0, 𝑥⟩, ⟨1, 𝑥⟩} ∨ 𝑒 = {⟨1, 𝑥⟩, ⟨1, ((𝑥 + 𝑘) mod 𝑛)⟩})}) = ( I ↾ {𝑒 ∈ 𝒫 ({0, 1} × 𝐼) ∣ ∃𝑥𝐼 (𝑒 = {⟨0, 𝑥⟩, ⟨0, ((𝑥 + 1) mod 𝑁)⟩} ∨ 𝑒 = {⟨0, 𝑥⟩, ⟨1, 𝑥⟩} ∨ 𝑒 = {⟨1, 𝑥⟩, ⟨1, ((𝑥 + 𝐾) mod 𝑁)⟩})}))
3029opeq2d 4836 . . . 4 ((𝑛 = 𝑁𝑘 = 𝐾) → ⟨(.ef‘ndx), ( I ↾ {𝑒 ∈ 𝒫 ({0, 1} × (0..^𝑛)) ∣ ∃𝑥 ∈ (0..^𝑛)(𝑒 = {⟨0, 𝑥⟩, ⟨0, ((𝑥 + 1) mod 𝑛)⟩} ∨ 𝑒 = {⟨0, 𝑥⟩, ⟨1, 𝑥⟩} ∨ 𝑒 = {⟨1, 𝑥⟩, ⟨1, ((𝑥 + 𝑘) mod 𝑛)⟩})})⟩ = ⟨(.ef‘ndx), ( I ↾ {𝑒 ∈ 𝒫 ({0, 1} × 𝐼) ∣ ∃𝑥𝐼 (𝑒 = {⟨0, 𝑥⟩, ⟨0, ((𝑥 + 1) mod 𝑁)⟩} ∨ 𝑒 = {⟨0, 𝑥⟩, ⟨1, 𝑥⟩} ∨ 𝑒 = {⟨1, 𝑥⟩, ⟨1, ((𝑥 + 𝐾) mod 𝑁)⟩})})⟩)
317, 30preq12d 4698 . . 3 ((𝑛 = 𝑁𝑘 = 𝐾) → {⟨(Base‘ndx), ({0, 1} × (0..^𝑛))⟩, ⟨(.ef‘ndx), ( I ↾ {𝑒 ∈ 𝒫 ({0, 1} × (0..^𝑛)) ∣ ∃𝑥 ∈ (0..^𝑛)(𝑒 = {⟨0, 𝑥⟩, ⟨0, ((𝑥 + 1) mod 𝑛)⟩} ∨ 𝑒 = {⟨0, 𝑥⟩, ⟨1, 𝑥⟩} ∨ 𝑒 = {⟨1, 𝑥⟩, ⟨1, ((𝑥 + 𝑘) mod 𝑛)⟩})})⟩} = {⟨(Base‘ndx), ({0, 1} × 𝐼)⟩, ⟨(.ef‘ndx), ( I ↾ {𝑒 ∈ 𝒫 ({0, 1} × 𝐼) ∣ ∃𝑥𝐼 (𝑒 = {⟨0, 𝑥⟩, ⟨0, ((𝑥 + 1) mod 𝑁)⟩} ∨ 𝑒 = {⟨0, 𝑥⟩, ⟨1, 𝑥⟩} ∨ 𝑒 = {⟨1, 𝑥⟩, ⟨1, ((𝑥 + 𝐾) mod 𝑁)⟩})})⟩})
32 fvoveq1 7381 . . . . 5 (𝑛 = 𝑁 → (⌈‘(𝑛 / 2)) = (⌈‘(𝑁 / 2)))
3332oveq2d 7374 . . . 4 (𝑛 = 𝑁 → (1..^(⌈‘(𝑛 / 2))) = (1..^(⌈‘(𝑁 / 2))))
34 gpgov.j . . . 4 𝐽 = (1..^(⌈‘(𝑁 / 2)))
3533, 34eqtr4di 2789 . . 3 (𝑛 = 𝑁 → (1..^(⌈‘(𝑛 / 2))) = 𝐽)
36 df-gpg 48287 . . 3 gPetersenGr = (𝑛 ∈ ℕ, 𝑘 ∈ (1..^(⌈‘(𝑛 / 2))) ↦ {⟨(Base‘ndx), ({0, 1} × (0..^𝑛))⟩, ⟨(.ef‘ndx), ( I ↾ {𝑒 ∈ 𝒫 ({0, 1} × (0..^𝑛)) ∣ ∃𝑥 ∈ (0..^𝑛)(𝑒 = {⟨0, 𝑥⟩, ⟨0, ((𝑥 + 1) mod 𝑛)⟩} ∨ 𝑒 = {⟨0, 𝑥⟩, ⟨1, 𝑥⟩} ∨ 𝑒 = {⟨1, 𝑥⟩, ⟨1, ((𝑥 + 𝑘) mod 𝑛)⟩})})⟩})
3731, 35, 36ovmpox 7511 . 2 ((𝑁 ∈ ℕ ∧ 𝐾𝐽 ∧ {⟨(Base‘ndx), ({0, 1} × 𝐼)⟩, ⟨(.ef‘ndx), ( I ↾ {𝑒 ∈ 𝒫 ({0, 1} × 𝐼) ∣ ∃𝑥𝐼 (𝑒 = {⟨0, 𝑥⟩, ⟨0, ((𝑥 + 1) mod 𝑁)⟩} ∨ 𝑒 = {⟨0, 𝑥⟩, ⟨1, 𝑥⟩} ∨ 𝑒 = {⟨1, 𝑥⟩, ⟨1, ((𝑥 + 𝐾) mod 𝑁)⟩})})⟩} ∈ V) → (𝑁 gPetersenGr 𝐾) = {⟨(Base‘ndx), ({0, 1} × 𝐼)⟩, ⟨(.ef‘ndx), ( I ↾ {𝑒 ∈ 𝒫 ({0, 1} × 𝐼) ∣ ∃𝑥𝐼 (𝑒 = {⟨0, 𝑥⟩, ⟨0, ((𝑥 + 1) mod 𝑁)⟩} ∨ 𝑒 = {⟨0, 𝑥⟩, ⟨1, 𝑥⟩} ∨ 𝑒 = {⟨1, 𝑥⟩, ⟨1, ((𝑥 + 𝐾) mod 𝑁)⟩})})⟩})
381, 37mp3an3 1452 1 ((𝑁 ∈ ℕ ∧ 𝐾𝐽) → (𝑁 gPetersenGr 𝐾) = {⟨(Base‘ndx), ({0, 1} × 𝐼)⟩, ⟨(.ef‘ndx), ( I ↾ {𝑒 ∈ 𝒫 ({0, 1} × 𝐼) ∣ ∃𝑥𝐼 (𝑒 = {⟨0, 𝑥⟩, ⟨0, ((𝑥 + 1) mod 𝑁)⟩} ∨ 𝑒 = {⟨0, 𝑥⟩, ⟨1, 𝑥⟩} ∨ 𝑒 = {⟨1, 𝑥⟩, ⟨1, ((𝑥 + 𝐾) mod 𝑁)⟩})})⟩})
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3o 1085   = wceq 1541  wcel 2113  wrex 3060  {crab 3399  Vcvv 3440  𝒫 cpw 4554  {cpr 4582  cop 4586   I cid 5518   × cxp 5622  cres 5626  cfv 6492  (class class class)co 7358  0cc0 11026  1c1 11027   + caddc 11029   / cdiv 11794  cn 12145  2c2 12200  ..^cfzo 13570  cceil 13711   mod cmo 13789  ndxcnx 17120  Basecbs 17136  .efcedgf 29061   gPetersenGr cgpg 48286
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 2115  ax-9 2123  ax-10 2146  ax-11 2162  ax-12 2184  ax-ext 2708  ax-sep 5241  ax-nul 5251  ax-pr 5377
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 2539  df-eu 2569  df-clab 2715  df-cleq 2728  df-clel 2811  df-nfc 2885  df-ral 3052  df-rex 3061  df-rab 3400  df-v 3442  df-sbc 3741  df-dif 3904  df-un 3906  df-in 3908  df-ss 3918  df-nul 4286  df-if 4480  df-pw 4556  df-sn 4581  df-pr 4583  df-op 4587  df-uni 4864  df-br 5099  df-opab 5161  df-id 5519  df-xp 5630  df-rel 5631  df-cnv 5632  df-co 5633  df-dm 5634  df-res 5636  df-iota 6448  df-fun 6494  df-fv 6500  df-ov 7361  df-oprab 7362  df-mpo 7363  df-gpg 48287
This theorem is referenced by:  gpgvtx  48289  gpgiedg  48290
  Copyright terms: Public domain W3C validator