Proof of Theorem merlem7
Step | Hyp | Ref
| Expression |
1 | | merlem4 1410 |
. 2
⊢ ((ψ → χ) → (((ψ → χ) → θ) → (((χ → τ) → (¬ θ → ¬ ψ)) → θ))) |
2 | | merlem6 1412 |
. . . 4
⊢ ((((χ → τ) → (¬ θ → ¬ ψ)) → θ) → (((((ψ → χ) → θ) → (((χ → τ) → (¬ θ → ¬ ψ)) → θ)) → ¬ φ) → (¬ χ → ¬ φ))) |
3 | | ax-meredith 1406 |
. . . 4
⊢ (((((χ → τ) → (¬ θ → ¬ ψ)) → θ) → (((((ψ → χ) → θ) → (((χ → τ) → (¬ θ → ¬ ψ)) → θ)) → ¬ φ) → (¬ χ → ¬ φ))) → (((((((ψ → χ) → θ) → (((χ → τ) → (¬ θ → ¬ ψ)) → θ)) → ¬ φ) → (¬ χ → ¬ φ)) → χ) → (ψ → χ))) |
4 | 2, 3 | ax-mp 5 |
. . 3
⊢ (((((((ψ → χ) → θ) → (((χ → τ) → (¬ θ → ¬ ψ)) → θ)) → ¬ φ) → (¬ χ → ¬ φ)) → χ) → (ψ → χ)) |
5 | | ax-meredith 1406 |
. . 3
⊢ ((((((((ψ → χ) → θ) → (((χ → τ) → (¬ θ → ¬ ψ)) → θ)) → ¬ φ) → (¬ χ → ¬ φ)) → χ) → (ψ → χ)) → (((ψ → χ) → (((ψ → χ) → θ) → (((χ → τ) → (¬ θ → ¬ ψ)) → θ))) → (φ → (((ψ → χ) → θ) → (((χ → τ) → (¬ θ → ¬ ψ)) → θ))))) |
6 | 4, 5 | ax-mp 5 |
. 2
⊢ (((ψ → χ) → (((ψ → χ) → θ) → (((χ → τ) → (¬ θ → ¬ ψ)) → θ))) → (φ → (((ψ → χ) → θ) → (((χ → τ) → (¬ θ → ¬ ψ)) → θ)))) |
7 | 1, 6 | ax-mp 5 |
1
⊢ (φ → (((ψ → χ) → θ) → (((χ → τ) → (¬ θ → ¬ ψ)) → θ))) |