Proof of Theorem sban
| Step | Hyp | Ref
| Expression |
| 1 | | sbn 882 |
. . 3
⊢ ([y /
x] ¬ (φ → ¬ ψ) ↔ ¬ [y / x](φ → ¬ ψ)) |
| 2 | | sbim 886 |
. . . . 5
⊢ ([y /
x](φ → ¬ ψ) ↔ ([y / x]φ → [y / x] ¬
ψ)) |
| 3 | | sbn 882 |
. . . . . 6
⊢ ([y /
x] ¬ ψ ↔ ¬ [y / x]ψ) |
| 4 | 3 | imbi2i 160 |
. . . . 5
⊢ (([y /
x]φ
→ [y / x] ¬ ψ)
↔ ([y / x]φ →
¬ [y / x]ψ)) |
| 5 | 2, 4 | bitr 151 |
. . . 4
⊢ ([y /
x](φ → ¬ ψ) ↔ ([y / x]φ → ¬ [y / x]ψ)) |
| 6 | 5 | negbii 162 |
. . 3
⊢ (¬ [y / x](φ → ¬ ψ) ↔ ¬ ([y / x]φ → ¬ [y / x]ψ)) |
| 7 | 1, 6 | bitr 151 |
. 2
⊢ ([y /
x] ¬ (φ → ¬ ψ) ↔ ¬ ([y / x]φ → ¬ [y / x]ψ)) |
| 8 | | df-an 198 |
. . 3
⊢ ((φ ∧ ψ) ↔ ¬ (φ → ¬ ψ)) |
| 9 | 8 | bisb 855 |
. 2
⊢ ([y /
x](φ ∧ ψ) ↔ [y / x] ¬
(φ → ¬ ψ)) |
| 10 | | df-an 198 |
. 2
⊢ (([y /
x]φ
∧ [y / x]ψ) ↔
¬ ([y / x]φ →
¬ [y / x]ψ)) |
| 11 | 7, 9, 10 | 3bitr4 158 |
1
⊢ ([y /
x](φ ∧ ψ) ↔ ([y / x]φ ∧ [y / x]ψ)) |