Proof of Theorem wksonproplem
Step | Hyp | Ref
| Expression |
1 | | wksonproplem.v |
. . . . . 6
⊢ 𝑉 = (Vtx‘𝐺) |
2 | 1 | fvexi 6818 |
. . . . 5
⊢ 𝑉 ∈ V |
3 | | wksonproplem.d |
. . . . . 6
⊢ 𝑊 = (𝑔 ∈ V ↦ (𝑎 ∈ (Vtx‘𝑔), 𝑏 ∈ (Vtx‘𝑔) ↦ {〈𝑓, 𝑝〉 ∣ (𝑓(𝑎(𝑂‘𝑔)𝑏)𝑝 ∧ 𝑓(𝑄‘𝑔)𝑝)})) |
4 | | simp1 1136 |
. . . . . . 7
⊢ ((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) → 𝐺 ∈ V) |
5 | | simp2 1137 |
. . . . . . . 8
⊢ ((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) → 𝐴 ∈ 𝑉) |
6 | 5, 1 | eleqtrdi 2847 |
. . . . . . 7
⊢ ((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) → 𝐴 ∈ (Vtx‘𝐺)) |
7 | | simp3 1138 |
. . . . . . . 8
⊢ ((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) → 𝐵 ∈ 𝑉) |
8 | 7, 1 | eleqtrdi 2847 |
. . . . . . 7
⊢ ((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) → 𝐵 ∈ (Vtx‘𝐺)) |
9 | 4, 6, 8, 3 | mptmpoopabovd 7954 |
. . . . . 6
⊢ ((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) → (𝐴(𝑊‘𝐺)𝐵) = {〈𝑓, 𝑝〉 ∣ (𝑓(𝐴(𝑂‘𝐺)𝐵)𝑝 ∧ 𝑓(𝑄‘𝐺)𝑝)}) |
10 | | fveq2 6804 |
. . . . . . 7
⊢ (𝑔 = 𝐺 → (Vtx‘𝑔) = (Vtx‘𝐺)) |
11 | 10, 1 | eqtr4di 2794 |
. . . . . 6
⊢ (𝑔 = 𝐺 → (Vtx‘𝑔) = 𝑉) |
12 | | fveq2 6804 |
. . . . . . . . 9
⊢ (𝑔 = 𝐺 → (𝑂‘𝑔) = (𝑂‘𝐺)) |
13 | 12 | oveqd 7324 |
. . . . . . . 8
⊢ (𝑔 = 𝐺 → (𝑎(𝑂‘𝑔)𝑏) = (𝑎(𝑂‘𝐺)𝑏)) |
14 | 13 | breqd 5092 |
. . . . . . 7
⊢ (𝑔 = 𝐺 → (𝑓(𝑎(𝑂‘𝑔)𝑏)𝑝 ↔ 𝑓(𝑎(𝑂‘𝐺)𝑏)𝑝)) |
15 | | fveq2 6804 |
. . . . . . . 8
⊢ (𝑔 = 𝐺 → (𝑄‘𝑔) = (𝑄‘𝐺)) |
16 | 15 | breqd 5092 |
. . . . . . 7
⊢ (𝑔 = 𝐺 → (𝑓(𝑄‘𝑔)𝑝 ↔ 𝑓(𝑄‘𝐺)𝑝)) |
17 | 14, 16 | anbi12d 632 |
. . . . . 6
⊢ (𝑔 = 𝐺 → ((𝑓(𝑎(𝑂‘𝑔)𝑏)𝑝 ∧ 𝑓(𝑄‘𝑔)𝑝) ↔ (𝑓(𝑎(𝑂‘𝐺)𝑏)𝑝 ∧ 𝑓(𝑄‘𝐺)𝑝))) |
18 | 3, 9, 11, 11, 17 | bropfvvvv 7964 |
. . . . 5
⊢ ((𝑉 ∈ V ∧ 𝑉 ∈ V) → (𝐹(𝐴(𝑊‘𝐺)𝐵)𝑃 → (𝐺 ∈ V ∧ (𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V)))) |
19 | 2, 2, 18 | mp2an 690 |
. . . 4
⊢ (𝐹(𝐴(𝑊‘𝐺)𝐵)𝑃 → (𝐺 ∈ V ∧ (𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V))) |
20 | | 3anass 1095 |
. . . . . 6
⊢ ((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ↔ (𝐺 ∈ V ∧ (𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉))) |
21 | 20 | anbi1i 625 |
. . . . 5
⊢ (((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V)) ↔ ((𝐺 ∈ V ∧ (𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉)) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V))) |
22 | | df-3an 1089 |
. . . . 5
⊢ ((𝐺 ∈ V ∧ (𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V)) ↔ ((𝐺 ∈ V ∧ (𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉)) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V))) |
23 | 21, 22 | bitr4i 278 |
. . . 4
⊢ (((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V)) ↔ (𝐺 ∈ V ∧ (𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V))) |
24 | 19, 23 | sylibr 233 |
. . 3
⊢ (𝐹(𝐴(𝑊‘𝐺)𝐵)𝑃 → ((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V))) |
25 | | wksonproplem.b |
. . . . 5
⊢ (((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V)) → (𝐹(𝐴(𝑊‘𝐺)𝐵)𝑃 ↔ (𝐹(𝐴(𝑂‘𝐺)𝐵)𝑃 ∧ 𝐹(𝑄‘𝐺)𝑃))) |
26 | 25 | biimpd 228 |
. . . 4
⊢ (((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V)) → (𝐹(𝐴(𝑊‘𝐺)𝐵)𝑃 → (𝐹(𝐴(𝑂‘𝐺)𝐵)𝑃 ∧ 𝐹(𝑄‘𝐺)𝑃))) |
27 | 26 | imdistani 570 |
. . 3
⊢ ((((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V)) ∧ 𝐹(𝐴(𝑊‘𝐺)𝐵)𝑃) → (((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V)) ∧ (𝐹(𝐴(𝑂‘𝐺)𝐵)𝑃 ∧ 𝐹(𝑄‘𝐺)𝑃))) |
28 | 24, 27 | mpancom 686 |
. 2
⊢ (𝐹(𝐴(𝑊‘𝐺)𝐵)𝑃 → (((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V)) ∧ (𝐹(𝐴(𝑂‘𝐺)𝐵)𝑃 ∧ 𝐹(𝑄‘𝐺)𝑃))) |
29 | | df-3an 1089 |
. 2
⊢ (((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V) ∧ (𝐹(𝐴(𝑂‘𝐺)𝐵)𝑃 ∧ 𝐹(𝑄‘𝐺)𝑃)) ↔ (((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V)) ∧ (𝐹(𝐴(𝑂‘𝐺)𝐵)𝑃 ∧ 𝐹(𝑄‘𝐺)𝑃))) |
30 | 28, 29 | sylibr 233 |
1
⊢ (𝐹(𝐴(𝑊‘𝐺)𝐵)𝑃 → ((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V) ∧ (𝐹(𝐴(𝑂‘𝐺)𝐵)𝑃 ∧ 𝐹(𝑄‘𝐺)𝑃))) |