Proof of Theorem dn1
Step | Hyp | Ref
| Expression |
1 | | pm2.45 411 |
. . . . 5
⊢ (¬
(𝜑 ∨ 𝜓) → ¬ 𝜑) |
2 | | imnan 437 |
. . . . 5
⊢ ((¬
(𝜑 ∨ 𝜓) → ¬ 𝜑) ↔ ¬ (¬ (𝜑 ∨ 𝜓) ∧ 𝜑)) |
3 | 1, 2 | mpbi 219 |
. . . 4
⊢ ¬
(¬ (𝜑 ∨ 𝜓) ∧ 𝜑) |
4 | 3 | biorfi 421 |
. . 3
⊢ (𝜒 ↔ (𝜒 ∨ (¬ (𝜑 ∨ 𝜓) ∧ 𝜑))) |
5 | | orcom 401 |
. . . 4
⊢ ((𝜒 ∨ (¬ (𝜑 ∨ 𝜓) ∧ 𝜑)) ↔ ((¬ (𝜑 ∨ 𝜓) ∧ 𝜑) ∨ 𝜒)) |
6 | | ordir 905 |
. . . 4
⊢ (((¬
(𝜑 ∨ 𝜓) ∧ 𝜑) ∨ 𝜒) ↔ ((¬ (𝜑 ∨ 𝜓) ∨ 𝜒) ∧ (𝜑 ∨ 𝜒))) |
7 | 5, 6 | bitri 263 |
. . 3
⊢ ((𝜒 ∨ (¬ (𝜑 ∨ 𝜓) ∧ 𝜑)) ↔ ((¬ (𝜑 ∨ 𝜓) ∨ 𝜒) ∧ (𝜑 ∨ 𝜒))) |
8 | 4, 7 | bitri 263 |
. 2
⊢ (𝜒 ↔ ((¬ (𝜑 ∨ 𝜓) ∨ 𝜒) ∧ (𝜑 ∨ 𝜒))) |
9 | | pm4.45 720 |
. . . . 5
⊢ (𝜒 ↔ (𝜒 ∧ (𝜒 ∨ 𝜃))) |
10 | | anor 509 |
. . . . 5
⊢ ((𝜒 ∧ (𝜒 ∨ 𝜃)) ↔ ¬ (¬ 𝜒 ∨ ¬ (𝜒 ∨ 𝜃))) |
11 | 9, 10 | bitri 263 |
. . . 4
⊢ (𝜒 ↔ ¬ (¬ 𝜒 ∨ ¬ (𝜒 ∨ 𝜃))) |
12 | 11 | orbi2i 540 |
. . 3
⊢ ((𝜑 ∨ 𝜒) ↔ (𝜑 ∨ ¬ (¬ 𝜒 ∨ ¬ (𝜒 ∨ 𝜃)))) |
13 | 12 | anbi2i 726 |
. 2
⊢ (((¬
(𝜑 ∨ 𝜓) ∨ 𝜒) ∧ (𝜑 ∨ 𝜒)) ↔ ((¬ (𝜑 ∨ 𝜓) ∨ 𝜒) ∧ (𝜑 ∨ ¬ (¬ 𝜒 ∨ ¬ (𝜒 ∨ 𝜃))))) |
14 | | anor 509 |
. 2
⊢ (((¬
(𝜑 ∨ 𝜓) ∨ 𝜒) ∧ (𝜑 ∨ ¬ (¬ 𝜒 ∨ ¬ (𝜒 ∨ 𝜃)))) ↔ ¬ (¬ (¬ (𝜑 ∨ 𝜓) ∨ 𝜒) ∨ ¬ (𝜑 ∨ ¬ (¬ 𝜒 ∨ ¬ (𝜒 ∨ 𝜃))))) |
15 | 8, 13, 14 | 3bitrri 286 |
1
⊢ (¬
(¬ (¬ (𝜑 ∨ 𝜓) ∨ 𝜒) ∨ ¬ (𝜑 ∨ ¬ (¬ 𝜒 ∨ ¬ (𝜒 ∨ 𝜃)))) ↔ 𝜒) |