Proof of Theorem merco1lem14
Step | Hyp | Ref
| Expression |
1 | | merco1lem13 1733 |
. . . 4
⊢ ((((𝜑 → 𝜓) → ((𝜑 → 𝜓) → 𝜓)) → ((𝜑 → 𝜓) → 𝜓)) → (𝜑 → ((𝜑 → 𝜓) → 𝜓))) |
2 | | merco1lem8 1728 |
. . . . . 6
⊢
(((((𝜑 → ((𝜑 → 𝜓) → 𝜓)) → 𝜑) → (((((𝜑 → 𝜓) → ((𝜑 → 𝜓) → 𝜓)) → ((𝜑 → 𝜓) → 𝜓)) → (𝜑 → ((𝜑 → 𝜓) → 𝜓))) → ⊥)) → 𝜑) → (((𝜑 → 𝜓) → ((𝜑 → 𝜓) → 𝜓)) → ((𝜑 → 𝜓) → 𝜓))) |
3 | | merco1 1717 |
. . . . . 6
⊢
((((((𝜑 → ((𝜑 → 𝜓) → 𝜓)) → 𝜑) → (((((𝜑 → 𝜓) → ((𝜑 → 𝜓) → 𝜓)) → ((𝜑 → 𝜓) → 𝜓)) → (𝜑 → ((𝜑 → 𝜓) → 𝜓))) → ⊥)) → 𝜑) → (((𝜑 → 𝜓) → ((𝜑 → 𝜓) → 𝜓)) → ((𝜑 → 𝜓) → 𝜓))) → (((((𝜑 → 𝜓) → ((𝜑 → 𝜓) → 𝜓)) → ((𝜑 → 𝜓) → 𝜓)) → (𝜑 → ((𝜑 → 𝜓) → 𝜓))) → (((((𝜑 → 𝜓) → ((𝜑 → 𝜓) → 𝜓)) → ((𝜑 → 𝜓) → 𝜓)) → (𝜑 → ((𝜑 → 𝜓) → 𝜓))) → (𝜑 → ((𝜑 → 𝜓) → 𝜓))))) |
4 | 2, 3 | ax-mp 5 |
. . . . 5
⊢
(((((𝜑 → 𝜓) → ((𝜑 → 𝜓) → 𝜓)) → ((𝜑 → 𝜓) → 𝜓)) → (𝜑 → ((𝜑 → 𝜓) → 𝜓))) → (((((𝜑 → 𝜓) → ((𝜑 → 𝜓) → 𝜓)) → ((𝜑 → 𝜓) → 𝜓)) → (𝜑 → ((𝜑 → 𝜓) → 𝜓))) → (𝜑 → ((𝜑 → 𝜓) → 𝜓)))) |
5 | | merco1lem9 1729 |
. . . . 5
⊢
((((((𝜑 → 𝜓) → ((𝜑 → 𝜓) → 𝜓)) → ((𝜑 → 𝜓) → 𝜓)) → (𝜑 → ((𝜑 → 𝜓) → 𝜓))) → (((((𝜑 → 𝜓) → ((𝜑 → 𝜓) → 𝜓)) → ((𝜑 → 𝜓) → 𝜓)) → (𝜑 → ((𝜑 → 𝜓) → 𝜓))) → (𝜑 → ((𝜑 → 𝜓) → 𝜓)))) → (((((𝜑 → 𝜓) → ((𝜑 → 𝜓) → 𝜓)) → ((𝜑 → 𝜓) → 𝜓)) → (𝜑 → ((𝜑 → 𝜓) → 𝜓))) → (𝜑 → ((𝜑 → 𝜓) → 𝜓)))) |
6 | 4, 5 | ax-mp 5 |
. . . 4
⊢
(((((𝜑 → 𝜓) → ((𝜑 → 𝜓) → 𝜓)) → ((𝜑 → 𝜓) → 𝜓)) → (𝜑 → ((𝜑 → 𝜓) → 𝜓))) → (𝜑 → ((𝜑 → 𝜓) → 𝜓))) |
7 | 1, 6 | ax-mp 5 |
. . 3
⊢ (𝜑 → ((𝜑 → 𝜓) → 𝜓)) |
8 | | merco1lem12 1732 |
. . 3
⊢ ((𝜑 → ((𝜑 → 𝜓) → 𝜓)) → ((((𝜒 → 𝜑) → (𝜑 → ⊥)) → 𝜑) → ((𝜑 → 𝜓) → 𝜓))) |
9 | 7, 8 | ax-mp 5 |
. 2
⊢ ((((𝜒 → 𝜑) → (𝜑 → ⊥)) → 𝜑) → ((𝜑 → 𝜓) → 𝜓)) |
10 | | merco1 1717 |
. 2
⊢
(((((𝜒 → 𝜑) → (𝜑 → ⊥)) → 𝜑) → ((𝜑 → 𝜓) → 𝜓)) → ((((𝜑 → 𝜓) → 𝜓) → 𝜒) → (𝜑 → 𝜒))) |
11 | 9, 10 | ax-mp 5 |
1
⊢ ((((𝜑 → 𝜓) → 𝜓) → 𝜒) → (𝜑 → 𝜒)) |