Proof of Theorem oplem1
| Step | Hyp | Ref
| Expression |
| 1 | | oplem1.1 |
. . . . 5
⊢ (φ
→ (ψ ∨ χ)) |
| 2 | 1 | ord 202 |
. . . 4
⊢ (φ
→ (¬ ψ → χ)) |
| 3 | | oplem1.2 |
. . . . . 6
⊢ (φ
→ (θ ∨ τ)) |
| 4 | 3 | ord 202 |
. . . . 5
⊢ (φ
→ (¬ θ → τ)) |
| 5 | | oplem1.3 |
. . . . . 6
⊢ (ψ
↔ θ) |
| 6 | 5 | negbii 162 |
. . . . 5
⊢ (¬ ψ ↔ ¬ θ) |
| 7 | 4, 6 | syl5ib 181 |
. . . 4
⊢ (φ
→ (¬ ψ → τ)) |
| 8 | 2, 7 | jcad 455 |
. . 3
⊢ (φ
→ (¬ ψ → (χ ∧ τ))) |
| 9 | | oplem1.4 |
. . . . 5
⊢ (χ
→ (θ ↔ τ)) |
| 10 | 9, 5 | syl5bb 410 |
. . . 4
⊢ (χ
→ (ψ ↔ τ)) |
| 11 | 10 | biimpar 325 |
. . 3
⊢ ((χ ∧ τ) → ψ) |
| 12 | 8, 11 | syl6 23 |
. 2
⊢ (φ
→ (¬ ψ → ψ)) |
| 13 | | pm2.18 75 |
. 2
⊢ ((¬ ψ → ψ) → ψ) |
| 14 | 12, 13 | syl 12 |
1
⊢ (φ
→ ψ) |