Proof of Theorem dcan
Step | Hyp | Ref
| Expression |
1 | | simpl 108 |
. . . . 5
⊢ ((¬
𝜑 ∧ 𝜓) → ¬ 𝜑) |
2 | 1 | intnanrd 922 |
. . . 4
⊢ ((¬
𝜑 ∧ 𝜓) → ¬ (𝜑 ∧ 𝜓)) |
3 | 2 | orim2i 751 |
. . 3
⊢ (((𝜑 ∧ 𝜓) ∨ (¬ 𝜑 ∧ 𝜓)) → ((𝜑 ∧ 𝜓) ∨ ¬ (𝜑 ∧ 𝜓))) |
4 | | simpr 109 |
. . . . 5
⊢ (((𝜑 ∨ ¬ 𝜑) ∧ ¬ 𝜓) → ¬ 𝜓) |
5 | 4 | intnand 921 |
. . . 4
⊢ (((𝜑 ∨ ¬ 𝜑) ∧ ¬ 𝜓) → ¬ (𝜑 ∧ 𝜓)) |
6 | 5 | olcd 724 |
. . 3
⊢ (((𝜑 ∨ ¬ 𝜑) ∧ ¬ 𝜓) → ((𝜑 ∧ 𝜓) ∨ ¬ (𝜑 ∧ 𝜓))) |
7 | 3, 6 | jaoi 706 |
. 2
⊢ ((((𝜑 ∧ 𝜓) ∨ (¬ 𝜑 ∧ 𝜓)) ∨ ((𝜑 ∨ ¬ 𝜑) ∧ ¬ 𝜓)) → ((𝜑 ∧ 𝜓) ∨ ¬ (𝜑 ∧ 𝜓))) |
8 | | df-dc 825 |
. . . 4
⊢
(DECID 𝜑 ↔ (𝜑 ∨ ¬ 𝜑)) |
9 | | df-dc 825 |
. . . 4
⊢
(DECID 𝜓 ↔ (𝜓 ∨ ¬ 𝜓)) |
10 | 8, 9 | anbi12i 456 |
. . 3
⊢
((DECID 𝜑 ∧ DECID 𝜓) ↔ ((𝜑 ∨ ¬ 𝜑) ∧ (𝜓 ∨ ¬ 𝜓))) |
11 | | andi 808 |
. . 3
⊢ (((𝜑 ∨ ¬ 𝜑) ∧ (𝜓 ∨ ¬ 𝜓)) ↔ (((𝜑 ∨ ¬ 𝜑) ∧ 𝜓) ∨ ((𝜑 ∨ ¬ 𝜑) ∧ ¬ 𝜓))) |
12 | | andir 809 |
. . . 4
⊢ (((𝜑 ∨ ¬ 𝜑) ∧ 𝜓) ↔ ((𝜑 ∧ 𝜓) ∨ (¬ 𝜑 ∧ 𝜓))) |
13 | 12 | orbi1i 753 |
. . 3
⊢ ((((𝜑 ∨ ¬ 𝜑) ∧ 𝜓) ∨ ((𝜑 ∨ ¬ 𝜑) ∧ ¬ 𝜓)) ↔ (((𝜑 ∧ 𝜓) ∨ (¬ 𝜑 ∧ 𝜓)) ∨ ((𝜑 ∨ ¬ 𝜑) ∧ ¬ 𝜓))) |
14 | 10, 11, 13 | 3bitri 205 |
. 2
⊢
((DECID 𝜑 ∧ DECID 𝜓) ↔ (((𝜑 ∧ 𝜓) ∨ (¬ 𝜑 ∧ 𝜓)) ∨ ((𝜑 ∨ ¬ 𝜑) ∧ ¬ 𝜓))) |
15 | | df-dc 825 |
. 2
⊢
(DECID (𝜑 ∧ 𝜓) ↔ ((𝜑 ∧ 𝜓) ∨ ¬ (𝜑 ∧ 𝜓))) |
16 | 7, 14, 15 | 3imtr4i 200 |
1
⊢
((DECID 𝜑 ∧ DECID 𝜓) → DECID (𝜑 ∧ 𝜓)) |