Metamath Proof Explorer


Theorem dedlem0b

Description: Lemma for an alternate version of weak deduction theorem. (Contributed by NM, 2-Apr-1994)

Ref Expression
Assertion dedlem0b ⊢ ¬ φ → ψ ↔ ψ → φ → χ ∧ φ

Proof

Step Hyp Ref Expression
1 pm2.21 ⊢ ¬ φ → φ → χ ∧ φ
2 1 imim2d ⊢ ¬ φ → ψ → φ → ψ → χ ∧ φ
3 2 com23 ⊢ ¬ φ → ψ → ψ → φ → χ ∧ φ
4 pm2.21 ⊢ ¬ ψ → ψ → φ
5 simpr ⊢ χ ∧ φ → φ
6 4 5 imim12i ⊢ ψ → φ → χ ∧ φ → ¬ ψ → φ
7 6 con1d ⊢ ψ → φ → χ ∧ φ → ¬ φ → ψ
8 7 com12 ⊢ ¬ φ → ψ → φ → χ ∧ φ → ψ
9 3 8 impbid ⊢ ¬ φ → ψ ↔ ψ → φ → χ ∧ φ