Proof of Theorem prtlem10
Step | Hyp | Ref
| Expression |
1 | | simpr 485 |
. . . . 5
⊢ (( ∼ Er
𝐴 ∧ 𝑧 ∈ 𝐴) → 𝑧 ∈ 𝐴) |
2 | | simpl 483 |
. . . . . 6
⊢ (( ∼ Er
𝐴 ∧ 𝑧 ∈ 𝐴) → ∼ Er 𝐴) |
3 | 2, 1 | erref 8518 |
. . . . 5
⊢ (( ∼ Er
𝐴 ∧ 𝑧 ∈ 𝐴) → 𝑧 ∼ 𝑧) |
4 | | breq1 5077 |
. . . . . . . 8
⊢ (𝑣 = 𝑧 → (𝑣 ∼ 𝑧 ↔ 𝑧 ∼ 𝑧)) |
5 | | breq1 5077 |
. . . . . . . 8
⊢ (𝑣 = 𝑧 → (𝑣 ∼ 𝑤 ↔ 𝑧 ∼ 𝑤)) |
6 | 4, 5 | anbi12d 631 |
. . . . . . 7
⊢ (𝑣 = 𝑧 → ((𝑣 ∼ 𝑧 ∧ 𝑣 ∼ 𝑤) ↔ (𝑧 ∼ 𝑧 ∧ 𝑧 ∼ 𝑤))) |
7 | 6 | rspcev 3561 |
. . . . . 6
⊢ ((𝑧 ∈ 𝐴 ∧ (𝑧 ∼ 𝑧 ∧ 𝑧 ∼ 𝑤)) → ∃𝑣 ∈ 𝐴 (𝑣 ∼ 𝑧 ∧ 𝑣 ∼ 𝑤)) |
8 | 7 | expr 457 |
. . . . 5
⊢ ((𝑧 ∈ 𝐴 ∧ 𝑧 ∼ 𝑧) → (𝑧 ∼ 𝑤 → ∃𝑣 ∈ 𝐴 (𝑣 ∼ 𝑧 ∧ 𝑣 ∼ 𝑤))) |
9 | 1, 3, 8 | syl2anc 584 |
. . . 4
⊢ (( ∼ Er
𝐴 ∧ 𝑧 ∈ 𝐴) → (𝑧 ∼ 𝑤 → ∃𝑣 ∈ 𝐴 (𝑣 ∼ 𝑧 ∧ 𝑣 ∼ 𝑤))) |
10 | | simplll 772 |
. . . . . 6
⊢ ((((
∼
Er 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ 𝑣 ∈ 𝐴) ∧ (𝑣 ∼ 𝑧 ∧ 𝑣 ∼ 𝑤)) → ∼ Er 𝐴) |
11 | | simprl 768 |
. . . . . 6
⊢ ((((
∼
Er 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ 𝑣 ∈ 𝐴) ∧ (𝑣 ∼ 𝑧 ∧ 𝑣 ∼ 𝑤)) → 𝑣 ∼ 𝑧) |
12 | | simprr 770 |
. . . . . 6
⊢ ((((
∼
Er 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ 𝑣 ∈ 𝐴) ∧ (𝑣 ∼ 𝑧 ∧ 𝑣 ∼ 𝑤)) → 𝑣 ∼ 𝑤) |
13 | 10, 11, 12 | ertr3d 8516 |
. . . . 5
⊢ ((((
∼
Er 𝐴 ∧ 𝑧 ∈ 𝐴) ∧ 𝑣 ∈ 𝐴) ∧ (𝑣 ∼ 𝑧 ∧ 𝑣 ∼ 𝑤)) → 𝑧 ∼ 𝑤) |
14 | 13 | rexlimdva2 3216 |
. . . 4
⊢ (( ∼ Er
𝐴 ∧ 𝑧 ∈ 𝐴) → (∃𝑣 ∈ 𝐴 (𝑣 ∼ 𝑧 ∧ 𝑣 ∼ 𝑤) → 𝑧 ∼ 𝑤)) |
15 | 9, 14 | impbid 211 |
. . 3
⊢ (( ∼ Er
𝐴 ∧ 𝑧 ∈ 𝐴) → (𝑧 ∼ 𝑤 ↔ ∃𝑣 ∈ 𝐴 (𝑣 ∼ 𝑧 ∧ 𝑣 ∼ 𝑤))) |
16 | | vex 3436 |
. . . . . 6
⊢ 𝑧 ∈ V |
17 | | vex 3436 |
. . . . . 6
⊢ 𝑣 ∈ V |
18 | 16, 17 | elec 8542 |
. . . . 5
⊢ (𝑧 ∈ [𝑣] ∼ ↔ 𝑣 ∼ 𝑧) |
19 | | vex 3436 |
. . . . . 6
⊢ 𝑤 ∈ V |
20 | 19, 17 | elec 8542 |
. . . . 5
⊢ (𝑤 ∈ [𝑣] ∼ ↔ 𝑣 ∼ 𝑤) |
21 | 18, 20 | anbi12i 627 |
. . . 4
⊢ ((𝑧 ∈ [𝑣] ∼ ∧ 𝑤 ∈ [𝑣] ∼ ) ↔ (𝑣 ∼ 𝑧 ∧ 𝑣 ∼ 𝑤)) |
22 | 21 | rexbii 3181 |
. . 3
⊢
(∃𝑣 ∈
𝐴 (𝑧 ∈ [𝑣] ∼ ∧ 𝑤 ∈ [𝑣] ∼ ) ↔
∃𝑣 ∈ 𝐴 (𝑣 ∼ 𝑧 ∧ 𝑣 ∼ 𝑤)) |
23 | 15, 22 | bitr4di 289 |
. 2
⊢ (( ∼ Er
𝐴 ∧ 𝑧 ∈ 𝐴) → (𝑧 ∼ 𝑤 ↔ ∃𝑣 ∈ 𝐴 (𝑧 ∈ [𝑣] ∼ ∧ 𝑤 ∈ [𝑣] ∼
))) |
24 | 23 | ex 413 |
1
⊢ ( ∼ Er
𝐴 → (𝑧 ∈ 𝐴 → (𝑧 ∼ 𝑤 ↔ ∃𝑣 ∈ 𝐴 (𝑧 ∈ [𝑣] ∼ ∧ 𝑤 ∈ [𝑣] ∼
)))) |