Proof of Theorem eldmqsres
Step | Hyp | Ref
| Expression |
1 | | elqsg 7798 |
. 2
⊢ (𝐵 ∈ 𝑉 → (𝐵 ∈ (dom (𝑅 ↾ 𝐴) / (𝑅 ↾ 𝐴)) ↔ ∃𝑢 ∈ dom (𝑅 ↾ 𝐴)𝐵 = [𝑢](𝑅 ↾ 𝐴))) |
2 | | eldmres2 34038 |
. . . . . 6
⊢ (𝑢 ∈ V → (𝑢 ∈ dom (𝑅 ↾ 𝐴) ↔ (𝑢 ∈ 𝐴 ∧ ∃𝑥 𝑥 ∈ [𝑢]𝑅))) |
3 | 2 | elv 33983 |
. . . . 5
⊢ (𝑢 ∈ dom (𝑅 ↾ 𝐴) ↔ (𝑢 ∈ 𝐴 ∧ ∃𝑥 𝑥 ∈ [𝑢]𝑅)) |
4 | 3 | anbi1i 731 |
. . . 4
⊢ ((𝑢 ∈ dom (𝑅 ↾ 𝐴) ∧ 𝐵 = [𝑢](𝑅 ↾ 𝐴)) ↔ ((𝑢 ∈ 𝐴 ∧ ∃𝑥 𝑥 ∈ [𝑢]𝑅) ∧ 𝐵 = [𝑢](𝑅 ↾ 𝐴))) |
5 | | ecres2 34044 |
. . . . . . . 8
⊢ (𝑢 ∈ 𝐴 → [𝑢](𝑅 ↾ 𝐴) = [𝑢]𝑅) |
6 | 5 | eqeq2d 2632 |
. . . . . . 7
⊢ (𝑢 ∈ 𝐴 → (𝐵 = [𝑢](𝑅 ↾ 𝐴) ↔ 𝐵 = [𝑢]𝑅)) |
7 | 6 | pm5.32i 669 |
. . . . . 6
⊢ ((𝑢 ∈ 𝐴 ∧ 𝐵 = [𝑢](𝑅 ↾ 𝐴)) ↔ (𝑢 ∈ 𝐴 ∧ 𝐵 = [𝑢]𝑅)) |
8 | 7 | anbi2i 730 |
. . . . 5
⊢
((∃𝑥 𝑥 ∈ [𝑢]𝑅 ∧ (𝑢 ∈ 𝐴 ∧ 𝐵 = [𝑢](𝑅 ↾ 𝐴))) ↔ (∃𝑥 𝑥 ∈ [𝑢]𝑅 ∧ (𝑢 ∈ 𝐴 ∧ 𝐵 = [𝑢]𝑅))) |
9 | | 3ancoma 1045 |
. . . . . 6
⊢ ((𝑢 ∈ 𝐴 ∧ ∃𝑥 𝑥 ∈ [𝑢]𝑅 ∧ 𝐵 = [𝑢](𝑅 ↾ 𝐴)) ↔ (∃𝑥 𝑥 ∈ [𝑢]𝑅 ∧ 𝑢 ∈ 𝐴 ∧ 𝐵 = [𝑢](𝑅 ↾ 𝐴))) |
10 | | df-3an 1039 |
. . . . . 6
⊢ ((𝑢 ∈ 𝐴 ∧ ∃𝑥 𝑥 ∈ [𝑢]𝑅 ∧ 𝐵 = [𝑢](𝑅 ↾ 𝐴)) ↔ ((𝑢 ∈ 𝐴 ∧ ∃𝑥 𝑥 ∈ [𝑢]𝑅) ∧ 𝐵 = [𝑢](𝑅 ↾ 𝐴))) |
11 | | 3anass 1042 |
. . . . . 6
⊢
((∃𝑥 𝑥 ∈ [𝑢]𝑅 ∧ 𝑢 ∈ 𝐴 ∧ 𝐵 = [𝑢](𝑅 ↾ 𝐴)) ↔ (∃𝑥 𝑥 ∈ [𝑢]𝑅 ∧ (𝑢 ∈ 𝐴 ∧ 𝐵 = [𝑢](𝑅 ↾ 𝐴)))) |
12 | 9, 10, 11 | 3bitr3i 290 |
. . . . 5
⊢ (((𝑢 ∈ 𝐴 ∧ ∃𝑥 𝑥 ∈ [𝑢]𝑅) ∧ 𝐵 = [𝑢](𝑅 ↾ 𝐴)) ↔ (∃𝑥 𝑥 ∈ [𝑢]𝑅 ∧ (𝑢 ∈ 𝐴 ∧ 𝐵 = [𝑢](𝑅 ↾ 𝐴)))) |
13 | | an12 838 |
. . . . 5
⊢ ((𝑢 ∈ 𝐴 ∧ (∃𝑥 𝑥 ∈ [𝑢]𝑅 ∧ 𝐵 = [𝑢]𝑅)) ↔ (∃𝑥 𝑥 ∈ [𝑢]𝑅 ∧ (𝑢 ∈ 𝐴 ∧ 𝐵 = [𝑢]𝑅))) |
14 | 8, 12, 13 | 3bitr4i 292 |
. . . 4
⊢ (((𝑢 ∈ 𝐴 ∧ ∃𝑥 𝑥 ∈ [𝑢]𝑅) ∧ 𝐵 = [𝑢](𝑅 ↾ 𝐴)) ↔ (𝑢 ∈ 𝐴 ∧ (∃𝑥 𝑥 ∈ [𝑢]𝑅 ∧ 𝐵 = [𝑢]𝑅))) |
15 | 4, 14 | bitri 264 |
. . 3
⊢ ((𝑢 ∈ dom (𝑅 ↾ 𝐴) ∧ 𝐵 = [𝑢](𝑅 ↾ 𝐴)) ↔ (𝑢 ∈ 𝐴 ∧ (∃𝑥 𝑥 ∈ [𝑢]𝑅 ∧ 𝐵 = [𝑢]𝑅))) |
16 | 15 | rexbii2 3039 |
. 2
⊢
(∃𝑢 ∈ dom
(𝑅 ↾ 𝐴)𝐵 = [𝑢](𝑅 ↾ 𝐴) ↔ ∃𝑢 ∈ 𝐴 (∃𝑥 𝑥 ∈ [𝑢]𝑅 ∧ 𝐵 = [𝑢]𝑅)) |
17 | 1, 16 | syl6bb 276 |
1
⊢ (𝐵 ∈ 𝑉 → (𝐵 ∈ (dom (𝑅 ↾ 𝐴) / (𝑅 ↾ 𝐴)) ↔ ∃𝑢 ∈ 𝐴 (∃𝑥 𝑥 ∈ [𝑢]𝑅 ∧ 𝐵 = [𝑢]𝑅))) |