This is an inofficial mirror of http://metamath.tirix.org for personal testing of a visualizer extension only.

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 ψ