Proof of Theorem isso2i
Step | Hyp | Ref
| Expression |
1 | | equid 1939 |
. . . . 5
⊢ 𝑥 = 𝑥 |
2 | 1 | orci 405 |
. . . 4
⊢ (𝑥 = 𝑥 ∨ 𝑥𝑅𝑥) |
3 | | eleq1 2689 |
. . . . . . 7
⊢ (𝑦 = 𝑥 → (𝑦 ∈ 𝐴 ↔ 𝑥 ∈ 𝐴)) |
4 | 3 | anbi2d 740 |
. . . . . 6
⊢ (𝑦 = 𝑥 → ((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) ↔ (𝑥 ∈ 𝐴 ∧ 𝑥 ∈ 𝐴))) |
5 | | equequ2 1953 |
. . . . . . . 8
⊢ (𝑦 = 𝑥 → (𝑥 = 𝑦 ↔ 𝑥 = 𝑥)) |
6 | | breq1 4656 |
. . . . . . . 8
⊢ (𝑦 = 𝑥 → (𝑦𝑅𝑥 ↔ 𝑥𝑅𝑥)) |
7 | 5, 6 | orbi12d 746 |
. . . . . . 7
⊢ (𝑦 = 𝑥 → ((𝑥 = 𝑦 ∨ 𝑦𝑅𝑥) ↔ (𝑥 = 𝑥 ∨ 𝑥𝑅𝑥))) |
8 | | breq2 4657 |
. . . . . . . 8
⊢ (𝑦 = 𝑥 → (𝑥𝑅𝑦 ↔ 𝑥𝑅𝑥)) |
9 | 8 | notbid 308 |
. . . . . . 7
⊢ (𝑦 = 𝑥 → (¬ 𝑥𝑅𝑦 ↔ ¬ 𝑥𝑅𝑥)) |
10 | 7, 9 | bibi12d 335 |
. . . . . 6
⊢ (𝑦 = 𝑥 → (((𝑥 = 𝑦 ∨ 𝑦𝑅𝑥) ↔ ¬ 𝑥𝑅𝑦) ↔ ((𝑥 = 𝑥 ∨ 𝑥𝑅𝑥) ↔ ¬ 𝑥𝑅𝑥))) |
11 | 4, 10 | imbi12d 334 |
. . . . 5
⊢ (𝑦 = 𝑥 → (((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) → ((𝑥 = 𝑦 ∨ 𝑦𝑅𝑥) ↔ ¬ 𝑥𝑅𝑦)) ↔ ((𝑥 ∈ 𝐴 ∧ 𝑥 ∈ 𝐴) → ((𝑥 = 𝑥 ∨ 𝑥𝑅𝑥) ↔ ¬ 𝑥𝑅𝑥)))) |
12 | | isso2i.1 |
. . . . . 6
⊢ ((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) → (𝑥𝑅𝑦 ↔ ¬ (𝑥 = 𝑦 ∨ 𝑦𝑅𝑥))) |
13 | 12 | con2bid 344 |
. . . . 5
⊢ ((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) → ((𝑥 = 𝑦 ∨ 𝑦𝑅𝑥) ↔ ¬ 𝑥𝑅𝑦)) |
14 | 11, 13 | chvarv 2263 |
. . . 4
⊢ ((𝑥 ∈ 𝐴 ∧ 𝑥 ∈ 𝐴) → ((𝑥 = 𝑥 ∨ 𝑥𝑅𝑥) ↔ ¬ 𝑥𝑅𝑥)) |
15 | 2, 14 | mpbii 223 |
. . 3
⊢ ((𝑥 ∈ 𝐴 ∧ 𝑥 ∈ 𝐴) → ¬ 𝑥𝑅𝑥) |
16 | 15 | anidms 677 |
. 2
⊢ (𝑥 ∈ 𝐴 → ¬ 𝑥𝑅𝑥) |
17 | | isso2i.2 |
. 2
⊢ ((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴 ∧ 𝑧 ∈ 𝐴) → ((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧)) |
18 | 13 | biimprd 238 |
. . . 4
⊢ ((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) → (¬ 𝑥𝑅𝑦 → (𝑥 = 𝑦 ∨ 𝑦𝑅𝑥))) |
19 | 18 | orrd 393 |
. . 3
⊢ ((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) → (𝑥𝑅𝑦 ∨ (𝑥 = 𝑦 ∨ 𝑦𝑅𝑥))) |
20 | | 3orass 1040 |
. . 3
⊢ ((𝑥𝑅𝑦 ∨ 𝑥 = 𝑦 ∨ 𝑦𝑅𝑥) ↔ (𝑥𝑅𝑦 ∨ (𝑥 = 𝑦 ∨ 𝑦𝑅𝑥))) |
21 | 19, 20 | sylibr 224 |
. 2
⊢ ((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) → (𝑥𝑅𝑦 ∨ 𝑥 = 𝑦 ∨ 𝑦𝑅𝑥)) |
22 | 16, 17, 21 | issoi 5066 |
1
⊢ 𝑅 Or 𝐴 |