Proof of Theorem bj-ceqsalt1
Step | Hyp | Ref
| Expression |
1 | | bj-ceqsalt1.1 |
. . . 4
⊢ (𝜃 → ∃𝑥𝜒) |
2 | 1 | 3ad2ant3 1134 |
. . 3
⊢
((Ⅎ𝑥𝜓 ∧ ∀𝑥(𝜒 → (𝜑 ↔ 𝜓)) ∧ 𝜃) → ∃𝑥𝜒) |
3 | | biimp 214 |
. . . . . . 7
⊢ ((𝜑 ↔ 𝜓) → (𝜑 → 𝜓)) |
4 | 3 | imim3i 64 |
. . . . . 6
⊢ ((𝜒 → (𝜑 ↔ 𝜓)) → ((𝜒 → 𝜑) → (𝜒 → 𝜓))) |
5 | 4 | al2imi 1818 |
. . . . 5
⊢
(∀𝑥(𝜒 → (𝜑 ↔ 𝜓)) → (∀𝑥(𝜒 → 𝜑) → ∀𝑥(𝜒 → 𝜓))) |
6 | 5 | 3ad2ant2 1133 |
. . . 4
⊢
((Ⅎ𝑥𝜓 ∧ ∀𝑥(𝜒 → (𝜑 ↔ 𝜓)) ∧ 𝜃) → (∀𝑥(𝜒 → 𝜑) → ∀𝑥(𝜒 → 𝜓))) |
7 | | 19.23t 2203 |
. . . . 5
⊢
(Ⅎ𝑥𝜓 → (∀𝑥(𝜒 → 𝜓) ↔ (∃𝑥𝜒 → 𝜓))) |
8 | 7 | 3ad2ant1 1132 |
. . . 4
⊢
((Ⅎ𝑥𝜓 ∧ ∀𝑥(𝜒 → (𝜑 ↔ 𝜓)) ∧ 𝜃) → (∀𝑥(𝜒 → 𝜓) ↔ (∃𝑥𝜒 → 𝜓))) |
9 | 6, 8 | sylibd 238 |
. . 3
⊢
((Ⅎ𝑥𝜓 ∧ ∀𝑥(𝜒 → (𝜑 ↔ 𝜓)) ∧ 𝜃) → (∀𝑥(𝜒 → 𝜑) → (∃𝑥𝜒 → 𝜓))) |
10 | 2, 9 | mpid 44 |
. 2
⊢
((Ⅎ𝑥𝜓 ∧ ∀𝑥(𝜒 → (𝜑 ↔ 𝜓)) ∧ 𝜃) → (∀𝑥(𝜒 → 𝜑) → 𝜓)) |
11 | | biimpr 219 |
. . . . . . 7
⊢ ((𝜑 ↔ 𝜓) → (𝜓 → 𝜑)) |
12 | 11 | imim2i 16 |
. . . . . 6
⊢ ((𝜒 → (𝜑 ↔ 𝜓)) → (𝜒 → (𝜓 → 𝜑))) |
13 | 12 | com23 86 |
. . . . 5
⊢ ((𝜒 → (𝜑 ↔ 𝜓)) → (𝜓 → (𝜒 → 𝜑))) |
14 | 13 | alimi 1814 |
. . . 4
⊢
(∀𝑥(𝜒 → (𝜑 ↔ 𝜓)) → ∀𝑥(𝜓 → (𝜒 → 𝜑))) |
15 | 14 | 3ad2ant2 1133 |
. . 3
⊢
((Ⅎ𝑥𝜓 ∧ ∀𝑥(𝜒 → (𝜑 ↔ 𝜓)) ∧ 𝜃) → ∀𝑥(𝜓 → (𝜒 → 𝜑))) |
16 | | 19.21t 2199 |
. . . 4
⊢
(Ⅎ𝑥𝜓 → (∀𝑥(𝜓 → (𝜒 → 𝜑)) ↔ (𝜓 → ∀𝑥(𝜒 → 𝜑)))) |
17 | 16 | 3ad2ant1 1132 |
. . 3
⊢
((Ⅎ𝑥𝜓 ∧ ∀𝑥(𝜒 → (𝜑 ↔ 𝜓)) ∧ 𝜃) → (∀𝑥(𝜓 → (𝜒 → 𝜑)) ↔ (𝜓 → ∀𝑥(𝜒 → 𝜑)))) |
18 | 15, 17 | mpbid 231 |
. 2
⊢
((Ⅎ𝑥𝜓 ∧ ∀𝑥(𝜒 → (𝜑 ↔ 𝜓)) ∧ 𝜃) → (𝜓 → ∀𝑥(𝜒 → 𝜑))) |
19 | 10, 18 | impbid 211 |
1
⊢
((Ⅎ𝑥𝜓 ∧ ∀𝑥(𝜒 → (𝜑 ↔ 𝜓)) ∧ 𝜃) → (∀𝑥(𝜒 → 𝜑) ↔ 𝜓)) |