| Step |
Hyp |
Ref |
Expression |
| 1 |
|
karden.a |
⊢ 𝐴 ∈ V |
| 2 |
|
karden.c |
⊢ 𝐶 = Scott { 𝑥 ∣ 𝑥 ≈ 𝐴 } |
| 3 |
|
karden.d |
⊢ 𝐷 = Scott { 𝑥 ∣ 𝑥 ≈ 𝐵 } |
| 4 |
|
breq1 |
⊢ ( 𝑥 = 𝐴 → ( 𝑥 ≈ 𝐴 ↔ 𝐴 ≈ 𝐴 ) ) |
| 5 |
1
|
enref |
⊢ 𝐴 ≈ 𝐴 |
| 6 |
1 4 5
|
ceqsexv2d |
⊢ ∃ 𝑥 𝑥 ≈ 𝐴 |
| 7 |
2
|
neeq1i |
⊢ ( 𝐶 ≠ ∅ ↔ Scott { 𝑥 ∣ 𝑥 ≈ 𝐴 } ≠ ∅ ) |
| 8 |
|
scott0b |
⊢ ( { 𝑥 ∣ 𝑥 ≈ 𝐴 } = ∅ ↔ Scott { 𝑥 ∣ 𝑥 ≈ 𝐴 } = ∅ ) |
| 9 |
8
|
necon3bii |
⊢ ( { 𝑥 ∣ 𝑥 ≈ 𝐴 } ≠ ∅ ↔ Scott { 𝑥 ∣ 𝑥 ≈ 𝐴 } ≠ ∅ ) |
| 10 |
|
abn0 |
⊢ ( { 𝑥 ∣ 𝑥 ≈ 𝐴 } ≠ ∅ ↔ ∃ 𝑥 𝑥 ≈ 𝐴 ) |
| 11 |
7 9 10
|
3bitr2i |
⊢ ( 𝐶 ≠ ∅ ↔ ∃ 𝑥 𝑥 ≈ 𝐴 ) |
| 12 |
6 11
|
mpbir |
⊢ 𝐶 ≠ ∅ |
| 13 |
|
n0 |
⊢ ( 𝐶 ≠ ∅ ↔ ∃ 𝑦 𝑦 ∈ 𝐶 ) |
| 14 |
12 13
|
mpbi |
⊢ ∃ 𝑦 𝑦 ∈ 𝐶 |
| 15 |
|
eleq2 |
⊢ ( 𝐶 = 𝐷 → ( 𝑦 ∈ 𝐶 ↔ 𝑦 ∈ 𝐷 ) ) |
| 16 |
15
|
pm4.71da |
⊢ ( 𝐶 = 𝐷 → ( 𝑦 ∈ 𝐶 ↔ ( 𝑦 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷 ) ) ) |
| 17 |
|
breq1 |
⊢ ( 𝑥 = 𝑦 → ( 𝑥 ≈ 𝐴 ↔ 𝑦 ≈ 𝐴 ) ) |
| 18 |
17
|
elscottab |
⊢ ( 𝑦 ∈ Scott { 𝑥 ∣ 𝑥 ≈ 𝐴 } → 𝑦 ≈ 𝐴 ) |
| 19 |
18 2
|
eleq2s |
⊢ ( 𝑦 ∈ 𝐶 → 𝑦 ≈ 𝐴 ) |
| 20 |
19
|
ensymd |
⊢ ( 𝑦 ∈ 𝐶 → 𝐴 ≈ 𝑦 ) |
| 21 |
|
breq1 |
⊢ ( 𝑥 = 𝑦 → ( 𝑥 ≈ 𝐵 ↔ 𝑦 ≈ 𝐵 ) ) |
| 22 |
21
|
elscottab |
⊢ ( 𝑦 ∈ Scott { 𝑥 ∣ 𝑥 ≈ 𝐵 } → 𝑦 ≈ 𝐵 ) |
| 23 |
22 3
|
eleq2s |
⊢ ( 𝑦 ∈ 𝐷 → 𝑦 ≈ 𝐵 ) |
| 24 |
|
entr |
⊢ ( ( 𝐴 ≈ 𝑦 ∧ 𝑦 ≈ 𝐵 ) → 𝐴 ≈ 𝐵 ) |
| 25 |
20 23 24
|
syl2an |
⊢ ( ( 𝑦 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷 ) → 𝐴 ≈ 𝐵 ) |
| 26 |
16 25
|
biimtrdi |
⊢ ( 𝐶 = 𝐷 → ( 𝑦 ∈ 𝐶 → 𝐴 ≈ 𝐵 ) ) |
| 27 |
26
|
exlimdv |
⊢ ( 𝐶 = 𝐷 → ( ∃ 𝑦 𝑦 ∈ 𝐶 → 𝐴 ≈ 𝐵 ) ) |
| 28 |
14 27
|
mpi |
⊢ ( 𝐶 = 𝐷 → 𝐴 ≈ 𝐵 ) |
| 29 |
|
enen2 |
⊢ ( 𝐴 ≈ 𝐵 → ( 𝑥 ≈ 𝐴 ↔ 𝑥 ≈ 𝐵 ) ) |
| 30 |
29
|
abbidv |
⊢ ( 𝐴 ≈ 𝐵 → { 𝑥 ∣ 𝑥 ≈ 𝐴 } = { 𝑥 ∣ 𝑥 ≈ 𝐵 } ) |
| 31 |
30
|
scotteqd |
⊢ ( 𝐴 ≈ 𝐵 → Scott { 𝑥 ∣ 𝑥 ≈ 𝐴 } = Scott { 𝑥 ∣ 𝑥 ≈ 𝐵 } ) |
| 32 |
31 2 3
|
3eqtr4g |
⊢ ( 𝐴 ≈ 𝐵 → 𝐶 = 𝐷 ) |
| 33 |
28 32
|
impbii |
⊢ ( 𝐶 = 𝐷 ↔ 𝐴 ≈ 𝐵 ) |