Proof of Theorem wksonproplem
| Step | Hyp | Ref | Expression | 
|---|
| 1 |  | wksonproplem.v | . . . . . 6
⊢ 𝑉 = (Vtx‘𝐺) | 
| 2 | 1 | fvexi 6919 | . . . . 5
⊢ 𝑉 ∈ V | 
| 3 |  | wksonproplem.d | . . . . . 6
⊢ 𝑊 = (𝑔 ∈ V ↦ (𝑎 ∈ (Vtx‘𝑔), 𝑏 ∈ (Vtx‘𝑔) ↦ {〈𝑓, 𝑝〉 ∣ (𝑓(𝑎(𝑂‘𝑔)𝑏)𝑝 ∧ 𝑓(𝑄‘𝑔)𝑝)})) | 
| 4 |  | simp1 1136 | . . . . . . 7
⊢ ((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) → 𝐺 ∈ V) | 
| 5 |  | simp2 1137 | . . . . . . . 8
⊢ ((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) → 𝐴 ∈ 𝑉) | 
| 6 | 5, 1 | eleqtrdi 2850 | . . . . . . 7
⊢ ((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) → 𝐴 ∈ (Vtx‘𝐺)) | 
| 7 |  | simp3 1138 | . . . . . . . 8
⊢ ((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) → 𝐵 ∈ 𝑉) | 
| 8 | 7, 1 | eleqtrdi 2850 | . . . . . . 7
⊢ ((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) → 𝐵 ∈ (Vtx‘𝐺)) | 
| 9 | 4, 6, 8, 3 | mptmpoopabovd 8108 | . . . . . 6
⊢ ((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) → (𝐴(𝑊‘𝐺)𝐵) = {〈𝑓, 𝑝〉 ∣ (𝑓(𝐴(𝑂‘𝐺)𝐵)𝑝 ∧ 𝑓(𝑄‘𝐺)𝑝)}) | 
| 10 |  | fveq2 6905 | . . . . . . 7
⊢ (𝑔 = 𝐺 → (Vtx‘𝑔) = (Vtx‘𝐺)) | 
| 11 | 10, 1 | eqtr4di 2794 | . . . . . 6
⊢ (𝑔 = 𝐺 → (Vtx‘𝑔) = 𝑉) | 
| 12 |  | fveq2 6905 | . . . . . . . . 9
⊢ (𝑔 = 𝐺 → (𝑂‘𝑔) = (𝑂‘𝐺)) | 
| 13 | 12 | oveqd 7449 | . . . . . . . 8
⊢ (𝑔 = 𝐺 → (𝑎(𝑂‘𝑔)𝑏) = (𝑎(𝑂‘𝐺)𝑏)) | 
| 14 | 13 | breqd 5153 | . . . . . . 7
⊢ (𝑔 = 𝐺 → (𝑓(𝑎(𝑂‘𝑔)𝑏)𝑝 ↔ 𝑓(𝑎(𝑂‘𝐺)𝑏)𝑝)) | 
| 15 |  | fveq2 6905 | . . . . . . . 8
⊢ (𝑔 = 𝐺 → (𝑄‘𝑔) = (𝑄‘𝐺)) | 
| 16 | 15 | breqd 5153 | . . . . . . 7
⊢ (𝑔 = 𝐺 → (𝑓(𝑄‘𝑔)𝑝 ↔ 𝑓(𝑄‘𝐺)𝑝)) | 
| 17 | 14, 16 | anbi12d 632 | . . . . . 6
⊢ (𝑔 = 𝐺 → ((𝑓(𝑎(𝑂‘𝑔)𝑏)𝑝 ∧ 𝑓(𝑄‘𝑔)𝑝) ↔ (𝑓(𝑎(𝑂‘𝐺)𝑏)𝑝 ∧ 𝑓(𝑄‘𝐺)𝑝))) | 
| 18 | 3, 9, 11, 11, 17 | bropfvvvv 8118 | . . . . 5
⊢ ((𝑉 ∈ V ∧ 𝑉 ∈ V) → (𝐹(𝐴(𝑊‘𝐺)𝐵)𝑃 → (𝐺 ∈ V ∧ (𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V)))) | 
| 19 | 2, 2, 18 | mp2an 692 | . . . 4
⊢ (𝐹(𝐴(𝑊‘𝐺)𝐵)𝑃 → (𝐺 ∈ V ∧ (𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V))) | 
| 20 |  | 3anass 1094 | . . . . . 6
⊢ ((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ↔ (𝐺 ∈ V ∧ (𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉))) | 
| 21 | 20 | anbi1i 624 | . . . . 5
⊢ (((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V)) ↔ ((𝐺 ∈ V ∧ (𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉)) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V))) | 
| 22 |  | df-3an 1088 | . . . . 5
⊢ ((𝐺 ∈ V ∧ (𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V)) ↔ ((𝐺 ∈ V ∧ (𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉)) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V))) | 
| 23 | 21, 22 | bitr4i 278 | . . . 4
⊢ (((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V)) ↔ (𝐺 ∈ V ∧ (𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V))) | 
| 24 | 19, 23 | sylibr 234 | . . 3
⊢ (𝐹(𝐴(𝑊‘𝐺)𝐵)𝑃 → ((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V))) | 
| 25 |  | wksonproplem.b | . . . . 5
⊢ (((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V)) → (𝐹(𝐴(𝑊‘𝐺)𝐵)𝑃 ↔ (𝐹(𝐴(𝑂‘𝐺)𝐵)𝑃 ∧ 𝐹(𝑄‘𝐺)𝑃))) | 
| 26 | 25 | biimpd 229 | . . . 4
⊢ (((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V)) → (𝐹(𝐴(𝑊‘𝐺)𝐵)𝑃 → (𝐹(𝐴(𝑂‘𝐺)𝐵)𝑃 ∧ 𝐹(𝑄‘𝐺)𝑃))) | 
| 27 | 26 | imdistani 568 | . . 3
⊢ ((((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V)) ∧ 𝐹(𝐴(𝑊‘𝐺)𝐵)𝑃) → (((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V)) ∧ (𝐹(𝐴(𝑂‘𝐺)𝐵)𝑃 ∧ 𝐹(𝑄‘𝐺)𝑃))) | 
| 28 | 24, 27 | mpancom 688 | . 2
⊢ (𝐹(𝐴(𝑊‘𝐺)𝐵)𝑃 → (((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V)) ∧ (𝐹(𝐴(𝑂‘𝐺)𝐵)𝑃 ∧ 𝐹(𝑄‘𝐺)𝑃))) | 
| 29 |  | df-3an 1088 | . 2
⊢ (((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V) ∧ (𝐹(𝐴(𝑂‘𝐺)𝐵)𝑃 ∧ 𝐹(𝑄‘𝐺)𝑃)) ↔ (((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V)) ∧ (𝐹(𝐴(𝑂‘𝐺)𝐵)𝑃 ∧ 𝐹(𝑄‘𝐺)𝑃))) | 
| 30 | 28, 29 | sylibr 234 | 1
⊢ (𝐹(𝐴(𝑊‘𝐺)𝐵)𝑃 → ((𝐺 ∈ V ∧ 𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉) ∧ (𝐹 ∈ V ∧ 𝑃 ∈ V) ∧ (𝐹(𝐴(𝑂‘𝐺)𝐵)𝑃 ∧ 𝐹(𝑄‘𝐺)𝑃))) |