Step | Hyp | Ref
| Expression |
1 | | prex 5453 |
. 2
⊢
{〈(Base‘ndx), ({0, 1} × 𝐼)〉, 〈(.ef‘ndx), ( I ↾
{𝑒 ∈ 𝒫 ({0, 1}
× 𝐼) ∣
∃𝑥 ∈ 𝐼 (𝑒 = {〈0, 𝑥〉, 〈0, ((𝑥 + 1) mod 𝑁)〉} ∨ 𝑒 = {〈0, 𝑥〉, 〈1, 𝑥〉} ∨ 𝑒 = {〈1, 𝑥〉, 〈1, ((𝑥 + 𝐾) mod 𝑁)〉})})〉} ∈ V |
2 | | oveq2 7459 |
. . . . . . . 8
⊢ (𝑛 = 𝑁 → (0..^𝑛) = (0..^𝑁)) |
3 | | gpgov.i |
. . . . . . . 8
⊢ 𝐼 = (0..^𝑁) |
4 | 2, 3 | eqtr4di 2798 |
. . . . . . 7
⊢ (𝑛 = 𝑁 → (0..^𝑛) = 𝐼) |
5 | 4 | xpeq2d 5731 |
. . . . . 6
⊢ (𝑛 = 𝑁 → ({0, 1} × (0..^𝑛)) = ({0, 1} × 𝐼)) |
6 | 5 | opeq2d 4905 |
. . . . 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 4639 |
. . . . . . . 8
⊢ (𝑛 = 𝑁 → 𝒫 ({0, 1} × (0..^𝑛)) = 𝒫 ({0, 1} ×
𝐼)) |
9 | 8 | adantr 480 |
. . . . . . 7
⊢ ((𝑛 = 𝑁 ∧ 𝑘 = 𝐾) → 𝒫 ({0, 1} ×
(0..^𝑛)) = 𝒫 ({0,
1} × 𝐼)) |
10 | 4 | rexeqdv 3335 |
. . . . . . . . 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 7459 |
. . . . . . . . . . . . . 14
⊢ (𝑛 = 𝑁 → ((𝑥 + 1) mod 𝑛) = ((𝑥 + 1) mod 𝑁)) |
13 | 12 | opeq2d 4905 |
. . . . . . . . . . . . 13
⊢ (𝑛 = 𝑁 → 〈0, ((𝑥 + 1) mod 𝑛)〉 = 〈0, ((𝑥 + 1) mod 𝑁)〉) |
14 | 13 | preq2d 4765 |
. . . . . . . . . . . 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 2751 |
. . . . . . . . . 10
⊢ ((𝑛 = 𝑁 ∧ 𝑘 = 𝐾) → (𝑒 = {〈0, 𝑥〉, 〈0, ((𝑥 + 1) mod 𝑛)〉} ↔ 𝑒 = {〈0, 𝑥〉, 〈0, ((𝑥 + 1) mod 𝑁)〉})) |
17 | | biidd 262 |
. . . . . . . . . 10
⊢ ((𝑛 = 𝑁 ∧ 𝑘 = 𝐾) → (𝑒 = {〈0, 𝑥〉, 〈1, 𝑥〉} ↔ 𝑒 = {〈0, 𝑥〉, 〈1, 𝑥〉})) |
18 | | oveq2 7459 |
. . . . . . . . . . . . . . 15
⊢ (𝑘 = 𝐾 → (𝑥 + 𝑘) = (𝑥 + 𝐾)) |
19 | 18 | adantl 481 |
. . . . . . . . . . . . . 14
⊢ ((𝑛 = 𝑁 ∧ 𝑘 = 𝐾) → (𝑥 + 𝑘) = (𝑥 + 𝐾)) |
20 | | simpl 482 |
. . . . . . . . . . . . . 14
⊢ ((𝑛 = 𝑁 ∧ 𝑘 = 𝐾) → 𝑛 = 𝑁) |
21 | 19, 20 | oveq12d 7469 |
. . . . . . . . . . . . 13
⊢ ((𝑛 = 𝑁 ∧ 𝑘 = 𝐾) → ((𝑥 + 𝑘) mod 𝑛) = ((𝑥 + 𝐾) mod 𝑁)) |
22 | 21 | opeq2d 4905 |
. . . . . . . . . . . 12
⊢ ((𝑛 = 𝑁 ∧ 𝑘 = 𝐾) → 〈1, ((𝑥 + 𝑘) mod 𝑛)〉 = 〈1, ((𝑥 + 𝐾) mod 𝑁)〉) |
23 | 22 | preq2d 4765 |
. . . . . . . . . . 11
⊢ ((𝑛 = 𝑁 ∧ 𝑘 = 𝐾) → {〈1, 𝑥〉, 〈1, ((𝑥 + 𝑘) mod 𝑛)〉} = {〈1, 𝑥〉, 〈1, ((𝑥 + 𝐾) mod 𝑁)〉}) |
24 | 23 | eqeq2d 2751 |
. . . . . . . . . 10
⊢ ((𝑛 = 𝑁 ∧ 𝑘 = 𝐾) → (𝑒 = {〈1, 𝑥〉, 〈1, ((𝑥 + 𝑘) mod 𝑛)〉} ↔ 𝑒 = {〈1, 𝑥〉, 〈1, ((𝑥 + 𝐾) mod 𝑁)〉})) |
25 | 16, 17, 24 | 3orbi123d 1435 |
. . . . . . . . 9
⊢ ((𝑛 = 𝑁 ∧ 𝑘 = 𝐾) → ((𝑒 = {〈0, 𝑥〉, 〈0, ((𝑥 + 1) mod 𝑛)〉} ∨ 𝑒 = {〈0, 𝑥〉, 〈1, 𝑥〉} ∨ 𝑒 = {〈1, 𝑥〉, 〈1, ((𝑥 + 𝑘) mod 𝑛)〉}) ↔ (𝑒 = {〈0, 𝑥〉, 〈0, ((𝑥 + 1) mod 𝑁)〉} ∨ 𝑒 = {〈0, 𝑥〉, 〈1, 𝑥〉} ∨ 𝑒 = {〈1, 𝑥〉, 〈1, ((𝑥 + 𝐾) mod 𝑁)〉}))) |
26 | 25 | rexbidv 3185 |
. . . . . . . 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 3462 |
. . . . . 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 6012 |
. . . . 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 4905 |
. . . 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 4766 |
. . 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 7474 |
. . . . 5
⊢ (𝑛 = 𝑁 → (⌈‘(𝑛 / 2)) = (⌈‘(𝑁 / 2))) |
33 | 32 | oveq2d 7467 |
. . . 4
⊢ (𝑛 = 𝑁 → (1..^(⌈‘(𝑛 / 2))) =
(1..^(⌈‘(𝑁 /
2)))) |
34 | | gpgov.j |
. . . 4
⊢ 𝐽 = (1..^(⌈‘(𝑁 / 2))) |
35 | 33, 34 | eqtr4di 2798 |
. . 3
⊢ (𝑛 = 𝑁 → (1..^(⌈‘(𝑛 / 2))) = 𝐽) |
36 | | df-gpg 47890 |
. . 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 7606 |
. 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 1450 |
1
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ 𝐽) → (𝑁 gPetersenGr 𝐾) = {〈(Base‘ndx), ({0, 1} ×
𝐼)〉,
〈(.ef‘ndx), ( I ↾ {𝑒 ∈ 𝒫 ({0, 1} × 𝐼) ∣ ∃𝑥 ∈ 𝐼 (𝑒 = {〈0, 𝑥〉, 〈0, ((𝑥 + 1) mod 𝑁)〉} ∨ 𝑒 = {〈0, 𝑥〉, 〈1, 𝑥〉} ∨ 𝑒 = {〈1, 𝑥〉, 〈1, ((𝑥 + 𝐾) mod 𝑁)〉})})〉}) |