| Step | Hyp | Ref
| Expression |
| 1 | | simpr 485 |
. . . . . . 7
⊢ ((𝑥 ∈ 𝐴 ∧ 𝑦 = [𝑥](𝐴 × 𝐴)) → 𝑦 = [𝑥](𝐴 × 𝐴)) |
| 2 | | ecxpid 33444 |
. . . . . . . 8
⊢ (𝑥 ∈ 𝐴 → [𝑥](𝐴 × 𝐴) = 𝐴) |
| 3 | 2 | adantr 481 |
. . . . . . 7
⊢ ((𝑥 ∈ 𝐴 ∧ 𝑦 = [𝑥](𝐴 × 𝐴)) → [𝑥](𝐴 × 𝐴) = 𝐴) |
| 4 | 1, 3 | eqtrd 2774 |
. . . . . 6
⊢ ((𝑥 ∈ 𝐴 ∧ 𝑦 = [𝑥](𝐴 × 𝐴)) → 𝑦 = 𝐴) |
| 5 | 4 | rexlimiva 3132 |
. . . . 5
⊢
(∃𝑥 ∈
𝐴 𝑦 = [𝑥](𝐴 × 𝐴) → 𝑦 = 𝐴) |
| 6 | 5 | adantl 482 |
. . . 4
⊢ ((𝐴 ≠ ∅ ∧ ∃𝑥 ∈ 𝐴 𝑦 = [𝑥](𝐴 × 𝐴)) → 𝑦 = 𝐴) |
| 7 | | n0 4281 |
. . . . . . 7
⊢ (𝐴 ≠ ∅ ↔
∃𝑥 𝑥 ∈ 𝐴) |
| 8 | 7 | biimpi 217 |
. . . . . 6
⊢ (𝐴 ≠ ∅ →
∃𝑥 𝑥 ∈ 𝐴) |
| 9 | | simpl 483 |
. . . . . . . . . 10
⊢ ((𝑦 = 𝐴 ∧ 𝑥 ∈ 𝐴) → 𝑦 = 𝐴) |
| 10 | 2 | adantl 482 |
. . . . . . . . . 10
⊢ ((𝑦 = 𝐴 ∧ 𝑥 ∈ 𝐴) → [𝑥](𝐴 × 𝐴) = 𝐴) |
| 11 | 9, 10 | eqtr4d 2777 |
. . . . . . . . 9
⊢ ((𝑦 = 𝐴 ∧ 𝑥 ∈ 𝐴) → 𝑦 = [𝑥](𝐴 × 𝐴)) |
| 12 | 11 | ex 413 |
. . . . . . . 8
⊢ (𝑦 = 𝐴 → (𝑥 ∈ 𝐴 → 𝑦 = [𝑥](𝐴 × 𝐴))) |
| 13 | 12 | ancld 555 |
. . . . . . 7
⊢ (𝑦 = 𝐴 → (𝑥 ∈ 𝐴 → (𝑥 ∈ 𝐴 ∧ 𝑦 = [𝑥](𝐴 × 𝐴)))) |
| 14 | 13 | eximdv 1924 |
. . . . . 6
⊢ (𝑦 = 𝐴 → (∃𝑥 𝑥 ∈ 𝐴 → ∃𝑥(𝑥 ∈ 𝐴 ∧ 𝑦 = [𝑥](𝐴 × 𝐴)))) |
| 15 | 8, 14 | mpan9 511 |
. . . . 5
⊢ ((𝐴 ≠ ∅ ∧ 𝑦 = 𝐴) → ∃𝑥(𝑥 ∈ 𝐴 ∧ 𝑦 = [𝑥](𝐴 × 𝐴))) |
| 16 | | df-rex 3064 |
. . . . 5
⊢
(∃𝑥 ∈
𝐴 𝑦 = [𝑥](𝐴 × 𝐴) ↔ ∃𝑥(𝑥 ∈ 𝐴 ∧ 𝑦 = [𝑥](𝐴 × 𝐴))) |
| 17 | 15, 16 | sylibr 235 |
. . . 4
⊢ ((𝐴 ≠ ∅ ∧ 𝑦 = 𝐴) → ∃𝑥 ∈ 𝐴 𝑦 = [𝑥](𝐴 × 𝐴)) |
| 18 | 6, 17 | impbida 806 |
. . 3
⊢ (𝐴 ≠ ∅ →
(∃𝑥 ∈ 𝐴 𝑦 = [𝑥](𝐴 × 𝐴) ↔ 𝑦 = 𝐴)) |
| 19 | | vex 3435 |
. . . 4
⊢ 𝑦 ∈ V |
| 20 | 19 | elqs 8701 |
. . 3
⊢ (𝑦 ∈ (𝐴 / (𝐴 × 𝐴)) ↔ ∃𝑥 ∈ 𝐴 𝑦 = [𝑥](𝐴 × 𝐴)) |
| 21 | | velsn 4571 |
. . 3
⊢ (𝑦 ∈ {𝐴} ↔ 𝑦 = 𝐴) |
| 22 | 18, 20, 21 | 3bitr4g 315 |
. 2
⊢ (𝐴 ≠ ∅ → (𝑦 ∈ (𝐴 / (𝐴 × 𝐴)) ↔ 𝑦 ∈ {𝐴})) |
| 23 | 22 | eqrdv 2737 |
1
⊢ (𝐴 ≠ ∅ → (𝐴 / (𝐴 × 𝐴)) = {𝐴}) |