Proof of Theorem con3th
| Step | Hyp | Ref
| Expression |
| 1 | | id 19 |
. . . 4
⊢ ((ψ ↔ ((ψ ∧ (φ → ψ)) ∨ (φ ∧ ¬
(φ → ψ)))) → (ψ ↔ ((ψ ∧ (φ → ψ)) ∨ (φ ∧ ¬
(φ → ψ))))) |
| 2 | 1 | notbid 285 |
. . 3
⊢ ((ψ ↔ ((ψ ∧ (φ → ψ)) ∨ (φ ∧ ¬
(φ → ψ)))) → (¬ ψ ↔ ¬ ((ψ ∧ (φ → ψ)) ∨ (φ ∧ ¬
(φ → ψ))))) |
| 3 | 2 | imbi1d 308 |
. 2
⊢ ((ψ ↔ ((ψ ∧ (φ → ψ)) ∨ (φ ∧ ¬
(φ → ψ)))) → ((¬ ψ → ¬ φ) ↔ (¬ ((ψ ∧ (φ → ψ)) ∨ (φ ∧ ¬
(φ → ψ))) → ¬ φ))) |
| 4 | 1 | imbi2d 307 |
. . . 4
⊢ ((ψ ↔ ((ψ ∧ (φ → ψ)) ∨ (φ ∧ ¬
(φ → ψ)))) → ((φ → ψ) ↔ (φ → ((ψ ∧ (φ → ψ)) ∨ (φ ∧ ¬
(φ → ψ)))))) |
| 5 | | id 19 |
. . . . 5
⊢ ((φ ↔ ((ψ ∧ (φ → ψ)) ∨ (φ ∧ ¬
(φ → ψ)))) → (φ ↔ ((ψ ∧ (φ → ψ)) ∨ (φ ∧ ¬
(φ → ψ))))) |
| 6 | 5 | imbi2d 307 |
. . . 4
⊢ ((φ ↔ ((ψ ∧ (φ → ψ)) ∨ (φ ∧ ¬
(φ → ψ)))) → ((φ → φ) ↔ (φ → ((ψ ∧ (φ → ψ)) ∨ (φ ∧ ¬
(φ → ψ)))))) |
| 7 | | id 19 |
. . . 4
⊢ (φ → φ) |
| 8 | 4, 6, 7 | elimh 922 |
. . 3
⊢ (φ → ((ψ ∧ (φ → ψ)) ∨ (φ ∧ ¬
(φ → ψ)))) |
| 9 | 8 | con3i 127 |
. 2
⊢ (¬ ((ψ ∧ (φ → ψ)) ∨ (φ ∧ ¬
(φ → ψ))) → ¬ φ) |
| 10 | 3, 9 | dedt 923 |
1
⊢ ((φ → ψ) → (¬ ψ → ¬ φ)) |