右引入\neg\imp
theorem intror_neg_imp (A B: wff): $ A \imp \neg A \imp B $;
| Step | Hyp | Ref | Expression |
|---|---|---|---|
| 1 | imp_imp_swapl | (\neg A \imp A \imp B) \imp A \imp \neg A \imp B |
|
| 2 | neg_elimintror_imp | \neg A \imp A \imp B |
|
| 3 | 1, 2 | ax_mp | A \imp \neg A \imp B |