| Step | Hyp | Ref
| Expression |
| 1 | | prex 5435 |
. 2
⊢
{〈(Base‘ndx), ({0, 1} × 𝐼)〉, 〈(.ef‘ndx), ( I ↾
{𝑒 ∈ 𝒫 ({0, 1}
× 𝐼) ∣
∃𝑥 ∈ 𝐼 (𝑒 = {〈0, 𝑥〉, 〈0, ((𝑥 + 1) mod 𝑁)〉} ∨ 𝑒 = {〈0, 𝑥〉, 〈1, 𝑥〉} ∨ 𝑒 = {〈1, 𝑥〉, 〈1, ((𝑥 + 𝐾) mod 𝑁)〉})})〉} ∈ V |
| 2 | | oveq2 7437 |
. . . . . . . 8
⊢ (𝑛 = 𝑁 → (0..^𝑛) = (0..^𝑁)) |
| 3 | | gpgov.i |
. . . . . . . 8
⊢ 𝐼 = (0..^𝑁) |
| 4 | 2, 3 | eqtr4di 2794 |
. . . . . . 7
⊢ (𝑛 = 𝑁 → (0..^𝑛) = 𝐼) |
| 5 | 4 | xpeq2d 5713 |
. . . . . 6
⊢ (𝑛 = 𝑁 → ({0, 1} × (0..^𝑛)) = ({0, 1} × 𝐼)) |
| 6 | 5 | opeq2d 4878 |
. . . . 5
⊢ (𝑛 = 𝑁 → 〈(Base‘ndx), ({0, 1}
× (0..^𝑛))〉 =
〈(Base‘ndx), ({0, 1} × 𝐼)〉) |
| 7 | 6 | adantr 480 |
. . . 4
⊢ ((𝑛 = 𝑁 ∧ 𝑘 = 𝐾) → 〈(Base‘ndx), ({0, 1}
× (0..^𝑛))〉 =
〈(Base‘ndx), ({0, 1} × 𝐼)〉) |
| 8 | 5 | pweqd 4615 |
. . . . . . . 8
⊢ (𝑛 = 𝑁 → 𝒫 ({0, 1} × (0..^𝑛)) = 𝒫 ({0, 1} ×
𝐼)) |
| 9 | 8 | adantr 480 |
. . . . . . 7
⊢ ((𝑛 = 𝑁 ∧ 𝑘 = 𝐾) → 𝒫 ({0, 1} ×
(0..^𝑛)) = 𝒫 ({0,
1} × 𝐼)) |
| 10 | 4 | rexeqdv 3326 |
. . . . . . . . 9
⊢ (𝑛 = 𝑁 → (∃𝑥 ∈ (0..^𝑛)(𝑒 = {〈0, 𝑥〉, 〈0, ((𝑥 + 1) mod 𝑛)〉} ∨ 𝑒 = {〈0, 𝑥〉, 〈1, 𝑥〉} ∨ 𝑒 = {〈1, 𝑥〉, 〈1, ((𝑥 + 𝑘) mod 𝑛)〉}) ↔ ∃𝑥 ∈ 𝐼 (𝑒 = {〈0, 𝑥〉, 〈0, ((𝑥 + 1) mod 𝑛)〉} ∨ 𝑒 = {〈0, 𝑥〉, 〈1, 𝑥〉} ∨ 𝑒 = {〈1, 𝑥〉, 〈1, ((𝑥 + 𝑘) mod 𝑛)〉}))) |
| 11 | 10 | adantr 480 |
. . . . . . . 8
⊢ ((𝑛 = 𝑁 ∧ 𝑘 = 𝐾) → (∃𝑥 ∈ (0..^𝑛)(𝑒 = {〈0, 𝑥〉, 〈0, ((𝑥 + 1) mod 𝑛)〉} ∨ 𝑒 = {〈0, 𝑥〉, 〈1, 𝑥〉} ∨ 𝑒 = {〈1, 𝑥〉, 〈1, ((𝑥 + 𝑘) mod 𝑛)〉}) ↔ ∃𝑥 ∈ 𝐼 (𝑒 = {〈0, 𝑥〉, 〈0, ((𝑥 + 1) mod 𝑛)〉} ∨ 𝑒 = {〈0, 𝑥〉, 〈1, 𝑥〉} ∨ 𝑒 = {〈1, 𝑥〉, 〈1, ((𝑥 + 𝑘) mod 𝑛)〉}))) |
| 12 | | oveq2 7437 |
. . . . . . . . . . . . . 14
⊢ (𝑛 = 𝑁 → ((𝑥 + 1) mod 𝑛) = ((𝑥 + 1) mod 𝑁)) |
| 13 | 12 | opeq2d 4878 |
. . . . . . . . . . . . 13
⊢ (𝑛 = 𝑁 → 〈0, ((𝑥 + 1) mod 𝑛)〉 = 〈0, ((𝑥 + 1) mod 𝑁)〉) |
| 14 | 13 | preq2d 4738 |
. . . . . . . . . . . 12
⊢ (𝑛 = 𝑁 → {〈0, 𝑥〉, 〈0, ((𝑥 + 1) mod 𝑛)〉} = {〈0, 𝑥〉, 〈0, ((𝑥 + 1) mod 𝑁)〉}) |
| 15 | 14 | adantr 480 |
. . . . . . . . . . 11
⊢ ((𝑛 = 𝑁 ∧ 𝑘 = 𝐾) → {〈0, 𝑥〉, 〈0, ((𝑥 + 1) mod 𝑛)〉} = {〈0, 𝑥〉, 〈0, ((𝑥 + 1) mod 𝑁)〉}) |
| 16 | 15 | eqeq2d 2747 |
. . . . . . . . . 10
⊢ ((𝑛 = 𝑁 ∧ 𝑘 = 𝐾) → (𝑒 = {〈0, 𝑥〉, 〈0, ((𝑥 + 1) mod 𝑛)〉} ↔ 𝑒 = {〈0, 𝑥〉, 〈0, ((𝑥 + 1) mod 𝑁)〉})) |
| 17 | | biidd 262 |
. . . . . . . . . 10
⊢ ((𝑛 = 𝑁 ∧ 𝑘 = 𝐾) → (𝑒 = {〈0, 𝑥〉, 〈1, 𝑥〉} ↔ 𝑒 = {〈0, 𝑥〉, 〈1, 𝑥〉})) |
| 18 | | oveq2 7437 |
. . . . . . . . . . . . . . 15
⊢ (𝑘 = 𝐾 → (𝑥 + 𝑘) = (𝑥 + 𝐾)) |
| 19 | 18 | adantl 481 |
. . . . . . . . . . . . . 14
⊢ ((𝑛 = 𝑁 ∧ 𝑘 = 𝐾) → (𝑥 + 𝑘) = (𝑥 + 𝐾)) |
| 20 | | simpl 482 |
. . . . . . . . . . . . . 14
⊢ ((𝑛 = 𝑁 ∧ 𝑘 = 𝐾) → 𝑛 = 𝑁) |
| 21 | 19, 20 | oveq12d 7447 |
. . . . . . . . . . . . 13
⊢ ((𝑛 = 𝑁 ∧ 𝑘 = 𝐾) → ((𝑥 + 𝑘) mod 𝑛) = ((𝑥 + 𝐾) mod 𝑁)) |
| 22 | 21 | opeq2d 4878 |
. . . . . . . . . . . 12
⊢ ((𝑛 = 𝑁 ∧ 𝑘 = 𝐾) → 〈1, ((𝑥 + 𝑘) mod 𝑛)〉 = 〈1, ((𝑥 + 𝐾) mod 𝑁)〉) |
| 23 | 22 | preq2d 4738 |
. . . . . . . . . . 11
⊢ ((𝑛 = 𝑁 ∧ 𝑘 = 𝐾) → {〈1, 𝑥〉, 〈1, ((𝑥 + 𝑘) mod 𝑛)〉} = {〈1, 𝑥〉, 〈1, ((𝑥 + 𝐾) mod 𝑁)〉}) |
| 24 | 23 | eqeq2d 2747 |
. . . . . . . . . 10
⊢ ((𝑛 = 𝑁 ∧ 𝑘 = 𝐾) → (𝑒 = {〈1, 𝑥〉, 〈1, ((𝑥 + 𝑘) mod 𝑛)〉} ↔ 𝑒 = {〈1, 𝑥〉, 〈1, ((𝑥 + 𝐾) mod 𝑁)〉})) |
| 25 | 16, 17, 24 | 3orbi123d 1437 |
. . . . . . . . 9
⊢ ((𝑛 = 𝑁 ∧ 𝑘 = 𝐾) → ((𝑒 = {〈0, 𝑥〉, 〈0, ((𝑥 + 1) mod 𝑛)〉} ∨ 𝑒 = {〈0, 𝑥〉, 〈1, 𝑥〉} ∨ 𝑒 = {〈1, 𝑥〉, 〈1, ((𝑥 + 𝑘) mod 𝑛)〉}) ↔ (𝑒 = {〈0, 𝑥〉, 〈0, ((𝑥 + 1) mod 𝑁)〉} ∨ 𝑒 = {〈0, 𝑥〉, 〈1, 𝑥〉} ∨ 𝑒 = {〈1, 𝑥〉, 〈1, ((𝑥 + 𝐾) mod 𝑁)〉}))) |
| 26 | 25 | rexbidv 3178 |
. . . . . . . 8
⊢ ((𝑛 = 𝑁 ∧ 𝑘 = 𝐾) → (∃𝑥 ∈ 𝐼 (𝑒 = {〈0, 𝑥〉, 〈0, ((𝑥 + 1) mod 𝑛)〉} ∨ 𝑒 = {〈0, 𝑥〉, 〈1, 𝑥〉} ∨ 𝑒 = {〈1, 𝑥〉, 〈1, ((𝑥 + 𝑘) mod 𝑛)〉}) ↔ ∃𝑥 ∈ 𝐼 (𝑒 = {〈0, 𝑥〉, 〈0, ((𝑥 + 1) mod 𝑁)〉} ∨ 𝑒 = {〈0, 𝑥〉, 〈1, 𝑥〉} ∨ 𝑒 = {〈1, 𝑥〉, 〈1, ((𝑥 + 𝐾) mod 𝑁)〉}))) |
| 27 | 11, 26 | bitrd 279 |
. . . . . . 7
⊢ ((𝑛 = 𝑁 ∧ 𝑘 = 𝐾) → (∃𝑥 ∈ (0..^𝑛)(𝑒 = {〈0, 𝑥〉, 〈0, ((𝑥 + 1) mod 𝑛)〉} ∨ 𝑒 = {〈0, 𝑥〉, 〈1, 𝑥〉} ∨ 𝑒 = {〈1, 𝑥〉, 〈1, ((𝑥 + 𝑘) mod 𝑛)〉}) ↔ ∃𝑥 ∈ 𝐼 (𝑒 = {〈0, 𝑥〉, 〈0, ((𝑥 + 1) mod 𝑁)〉} ∨ 𝑒 = {〈0, 𝑥〉, 〈1, 𝑥〉} ∨ 𝑒 = {〈1, 𝑥〉, 〈1, ((𝑥 + 𝐾) mod 𝑁)〉}))) |
| 28 | 9, 27 | rabeqbidv 3454 |
. . . . . 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 𝑁)〉})}) |
| 29 | 28 | reseq2d 5995 |
. . . . 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 𝑁)〉})})) |
| 30 | 29 | opeq2d 4878 |
. . . 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 𝑁)〉})})〉) |
| 31 | 7, 30 | preq12d 4739 |
. . 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 7452 |
. . . . 5
⊢ (𝑛 = 𝑁 → (⌈‘(𝑛 / 2)) = (⌈‘(𝑁 / 2))) |
| 33 | 32 | oveq2d 7445 |
. . . 4
⊢ (𝑛 = 𝑁 → (1..^(⌈‘(𝑛 / 2))) =
(1..^(⌈‘(𝑁 /
2)))) |
| 34 | | gpgov.j |
. . . 4
⊢ 𝐽 = (1..^(⌈‘(𝑁 / 2))) |
| 35 | 33, 34 | eqtr4di 2794 |
. . 3
⊢ (𝑛 = 𝑁 → (1..^(⌈‘(𝑛 / 2))) = 𝐽) |
| 36 | | df-gpg 47973 |
. . 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 𝑛)〉})})〉}) |
| 37 | 31, 35, 36 | ovmpox 7583 |
. 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 𝑁)〉})})〉}) |
| 38 | 1, 37 | mp3an3 1452 |
1
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ 𝐽) → (𝑁 gPetersenGr 𝐾) = {〈(Base‘ndx), ({0, 1} ×
𝐼)〉,
〈(.ef‘ndx), ( I ↾ {𝑒 ∈ 𝒫 ({0, 1} × 𝐼) ∣ ∃𝑥 ∈ 𝐼 (𝑒 = {〈0, 𝑥〉, 〈0, ((𝑥 + 1) mod 𝑁)〉} ∨ 𝑒 = {〈0, 𝑥〉, 〈1, 𝑥〉} ∨ 𝑒 = {〈1, 𝑥〉, 〈1, ((𝑥 + 𝐾) mod 𝑁)〉})})〉}) |