Metamath Proof Explorer


Theorem necon1ad

Description: Contrapositive deduction for inequality. (Contributed by NM, 2-Apr-2007) (Proof shortened by Wolf Lammen, 23-Nov-2019)

Ref Expression
Hypothesis necon1ad.1 ⊢ φ → ¬ ψ → A = B
Assertion necon1ad ⊢ φ → A ≠ B → ψ

Proof

Step Hyp Ref Expression
1 necon1ad.1 ⊢ φ → ¬ ψ → A = B
2 1 necon3ad ⊢ φ → A ≠ B → ¬ ¬ ψ
3 notnotr ⊢ ¬ ¬ ψ → ψ
4 2 3 syl6 ⊢ φ → A ≠ B → ψ