Step | Hyp | Ref
| Expression |
1 | | inex1g 4996 |
. . . 4
⊢ (𝑅 ∈ PosetRel → (𝑅 ∩ (𝐴 × 𝐴)) ∈ V) |
2 | 1 | adantr 473 |
. . 3
⊢ ((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) → (𝑅 ∩ (𝐴 × 𝐴)) ∈ V) |
3 | | eqid 2799 |
. . . 4
⊢ dom
(𝑅 ∩ (𝐴 × 𝐴)) = dom (𝑅 ∩ (𝐴 × 𝐴)) |
4 | | eqid 2799 |
. . . 4
⊢ ran
(𝑥 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦(𝑅 ∩ (𝐴 × 𝐴))𝑥}) = ran (𝑥 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦(𝑅 ∩ (𝐴 × 𝐴))𝑥}) |
5 | | eqid 2799 |
. . . 4
⊢ ran
(𝑥 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥(𝑅 ∩ (𝐴 × 𝐴))𝑦}) = ran (𝑥 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥(𝑅 ∩ (𝐴 × 𝐴))𝑦}) |
6 | 3, 4, 5 | ordtval 21322 |
. . 3
⊢ ((𝑅 ∩ (𝐴 × 𝐴)) ∈ V → (ordTop‘(𝑅 ∩ (𝐴 × 𝐴))) = (topGen‘(fi‘({dom (𝑅 ∩ (𝐴 × 𝐴))} ∪ (ran (𝑥 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦(𝑅 ∩ (𝐴 × 𝐴))𝑥}) ∪ ran (𝑥 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥(𝑅 ∩ (𝐴 × 𝐴))𝑦})))))) |
7 | 2, 6 | syl 17 |
. 2
⊢ ((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) → (ordTop‘(𝑅 ∩ (𝐴 × 𝐴))) = (topGen‘(fi‘({dom (𝑅 ∩ (𝐴 × 𝐴))} ∪ (ran (𝑥 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦(𝑅 ∩ (𝐴 × 𝐴))𝑥}) ∪ ran (𝑥 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥(𝑅 ∩ (𝐴 × 𝐴))𝑦})))))) |
8 | | ordttop 21333 |
. . . 4
⊢ (𝑅 ∈ PosetRel →
(ordTop‘𝑅) ∈
Top) |
9 | | resttop 21293 |
. . . 4
⊢
(((ordTop‘𝑅)
∈ Top ∧ 𝐴 ∈
𝑉) →
((ordTop‘𝑅)
↾t 𝐴)
∈ Top) |
10 | 8, 9 | sylan 576 |
. . 3
⊢ ((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) → ((ordTop‘𝑅) ↾t 𝐴) ∈ Top) |
11 | | eqid 2799 |
. . . . . . . 8
⊢ dom 𝑅 = dom 𝑅 |
12 | 11 | psssdm2 17530 |
. . . . . . 7
⊢ (𝑅 ∈ PosetRel → dom
(𝑅 ∩ (𝐴 × 𝐴)) = (dom 𝑅 ∩ 𝐴)) |
13 | 12 | adantr 473 |
. . . . . 6
⊢ ((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) → dom (𝑅 ∩ (𝐴 × 𝐴)) = (dom 𝑅 ∩ 𝐴)) |
14 | 8 | adantr 473 |
. . . . . . 7
⊢ ((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) → (ordTop‘𝑅) ∈ Top) |
15 | | simpr 478 |
. . . . . . 7
⊢ ((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) → 𝐴 ∈ 𝑉) |
16 | 11 | ordttopon 21326 |
. . . . . . . . 9
⊢ (𝑅 ∈ PosetRel →
(ordTop‘𝑅) ∈
(TopOn‘dom 𝑅)) |
17 | 16 | adantr 473 |
. . . . . . . 8
⊢ ((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) → (ordTop‘𝑅) ∈ (TopOn‘dom 𝑅)) |
18 | | toponmax 21059 |
. . . . . . . 8
⊢
((ordTop‘𝑅)
∈ (TopOn‘dom 𝑅)
→ dom 𝑅 ∈
(ordTop‘𝑅)) |
19 | 17, 18 | syl 17 |
. . . . . . 7
⊢ ((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) → dom 𝑅 ∈ (ordTop‘𝑅)) |
20 | | elrestr 16404 |
. . . . . . 7
⊢
(((ordTop‘𝑅)
∈ Top ∧ 𝐴 ∈
𝑉 ∧ dom 𝑅 ∈ (ordTop‘𝑅)) → (dom 𝑅 ∩ 𝐴) ∈ ((ordTop‘𝑅) ↾t 𝐴)) |
21 | 14, 15, 19, 20 | syl3anc 1491 |
. . . . . 6
⊢ ((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) → (dom 𝑅 ∩ 𝐴) ∈ ((ordTop‘𝑅) ↾t 𝐴)) |
22 | 13, 21 | eqeltrd 2878 |
. . . . 5
⊢ ((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) → dom (𝑅 ∩ (𝐴 × 𝐴)) ∈ ((ordTop‘𝑅) ↾t 𝐴)) |
23 | 22 | snssd 4528 |
. . . 4
⊢ ((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) → {dom (𝑅 ∩ (𝐴 × 𝐴))} ⊆ ((ordTop‘𝑅) ↾t 𝐴)) |
24 | | rabeq 3376 |
. . . . . . . . 9
⊢ (dom
(𝑅 ∩ (𝐴 × 𝐴)) = (dom 𝑅 ∩ 𝐴) → {𝑦 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦(𝑅 ∩ (𝐴 × 𝐴))𝑥} = {𝑦 ∈ (dom 𝑅 ∩ 𝐴) ∣ ¬ 𝑦(𝑅 ∩ (𝐴 × 𝐴))𝑥}) |
25 | 13, 24 | syl 17 |
. . . . . . . 8
⊢ ((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) → {𝑦 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦(𝑅 ∩ (𝐴 × 𝐴))𝑥} = {𝑦 ∈ (dom 𝑅 ∩ 𝐴) ∣ ¬ 𝑦(𝑅 ∩ (𝐴 × 𝐴))𝑥}) |
26 | 13, 25 | mpteq12dv 4926 |
. . . . . . 7
⊢ ((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) → (𝑥 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦(𝑅 ∩ (𝐴 × 𝐴))𝑥}) = (𝑥 ∈ (dom 𝑅 ∩ 𝐴) ↦ {𝑦 ∈ (dom 𝑅 ∩ 𝐴) ∣ ¬ 𝑦(𝑅 ∩ (𝐴 × 𝐴))𝑥})) |
27 | 26 | rneqd 5556 |
. . . . . 6
⊢ ((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) → ran (𝑥 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦(𝑅 ∩ (𝐴 × 𝐴))𝑥}) = ran (𝑥 ∈ (dom 𝑅 ∩ 𝐴) ↦ {𝑦 ∈ (dom 𝑅 ∩ 𝐴) ∣ ¬ 𝑦(𝑅 ∩ (𝐴 × 𝐴))𝑥})) |
28 | | inrab2 4100 |
. . . . . . . . . 10
⊢ ({𝑦 ∈ dom 𝑅 ∣ ¬ 𝑦𝑅𝑥} ∩ 𝐴) = {𝑦 ∈ (dom 𝑅 ∩ 𝐴) ∣ ¬ 𝑦𝑅𝑥} |
29 | | inss2 4029 |
. . . . . . . . . . . . . 14
⊢ (dom
𝑅 ∩ 𝐴) ⊆ 𝐴 |
30 | | simpr 478 |
. . . . . . . . . . . . . 14
⊢ ((((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) ∧ 𝑥 ∈ (dom 𝑅 ∩ 𝐴)) ∧ 𝑦 ∈ (dom 𝑅 ∩ 𝐴)) → 𝑦 ∈ (dom 𝑅 ∩ 𝐴)) |
31 | 29, 30 | sseldi 3796 |
. . . . . . . . . . . . 13
⊢ ((((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) ∧ 𝑥 ∈ (dom 𝑅 ∩ 𝐴)) ∧ 𝑦 ∈ (dom 𝑅 ∩ 𝐴)) → 𝑦 ∈ 𝐴) |
32 | | simpr 478 |
. . . . . . . . . . . . . . 15
⊢ (((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) ∧ 𝑥 ∈ (dom 𝑅 ∩ 𝐴)) → 𝑥 ∈ (dom 𝑅 ∩ 𝐴)) |
33 | 29, 32 | sseldi 3796 |
. . . . . . . . . . . . . 14
⊢ (((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) ∧ 𝑥 ∈ (dom 𝑅 ∩ 𝐴)) → 𝑥 ∈ 𝐴) |
34 | 33 | adantr 473 |
. . . . . . . . . . . . 13
⊢ ((((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) ∧ 𝑥 ∈ (dom 𝑅 ∩ 𝐴)) ∧ 𝑦 ∈ (dom 𝑅 ∩ 𝐴)) → 𝑥 ∈ 𝐴) |
35 | | brinxp 5385 |
. . . . . . . . . . . . 13
⊢ ((𝑦 ∈ 𝐴 ∧ 𝑥 ∈ 𝐴) → (𝑦𝑅𝑥 ↔ 𝑦(𝑅 ∩ (𝐴 × 𝐴))𝑥)) |
36 | 31, 34, 35 | syl2anc 580 |
. . . . . . . . . . . 12
⊢ ((((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) ∧ 𝑥 ∈ (dom 𝑅 ∩ 𝐴)) ∧ 𝑦 ∈ (dom 𝑅 ∩ 𝐴)) → (𝑦𝑅𝑥 ↔ 𝑦(𝑅 ∩ (𝐴 × 𝐴))𝑥)) |
37 | 36 | notbid 310 |
. . . . . . . . . . 11
⊢ ((((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) ∧ 𝑥 ∈ (dom 𝑅 ∩ 𝐴)) ∧ 𝑦 ∈ (dom 𝑅 ∩ 𝐴)) → (¬ 𝑦𝑅𝑥 ↔ ¬ 𝑦(𝑅 ∩ (𝐴 × 𝐴))𝑥)) |
38 | 37 | rabbidva 3372 |
. . . . . . . . . 10
⊢ (((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) ∧ 𝑥 ∈ (dom 𝑅 ∩ 𝐴)) → {𝑦 ∈ (dom 𝑅 ∩ 𝐴) ∣ ¬ 𝑦𝑅𝑥} = {𝑦 ∈ (dom 𝑅 ∩ 𝐴) ∣ ¬ 𝑦(𝑅 ∩ (𝐴 × 𝐴))𝑥}) |
39 | 28, 38 | syl5eq 2845 |
. . . . . . . . 9
⊢ (((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) ∧ 𝑥 ∈ (dom 𝑅 ∩ 𝐴)) → ({𝑦 ∈ dom 𝑅 ∣ ¬ 𝑦𝑅𝑥} ∩ 𝐴) = {𝑦 ∈ (dom 𝑅 ∩ 𝐴) ∣ ¬ 𝑦(𝑅 ∩ (𝐴 × 𝐴))𝑥}) |
40 | 14 | adantr 473 |
. . . . . . . . . 10
⊢ (((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) ∧ 𝑥 ∈ (dom 𝑅 ∩ 𝐴)) → (ordTop‘𝑅) ∈ Top) |
41 | 15 | adantr 473 |
. . . . . . . . . 10
⊢ (((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) ∧ 𝑥 ∈ (dom 𝑅 ∩ 𝐴)) → 𝐴 ∈ 𝑉) |
42 | | simpl 475 |
. . . . . . . . . . 11
⊢ ((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) → 𝑅 ∈ PosetRel) |
43 | | inss1 4028 |
. . . . . . . . . . . 12
⊢ (dom
𝑅 ∩ 𝐴) ⊆ dom 𝑅 |
44 | 43 | sseli 3794 |
. . . . . . . . . . 11
⊢ (𝑥 ∈ (dom 𝑅 ∩ 𝐴) → 𝑥 ∈ dom 𝑅) |
45 | 11 | ordtopn1 21327 |
. . . . . . . . . . 11
⊢ ((𝑅 ∈ PosetRel ∧ 𝑥 ∈ dom 𝑅) → {𝑦 ∈ dom 𝑅 ∣ ¬ 𝑦𝑅𝑥} ∈ (ordTop‘𝑅)) |
46 | 42, 44, 45 | syl2an 590 |
. . . . . . . . . 10
⊢ (((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) ∧ 𝑥 ∈ (dom 𝑅 ∩ 𝐴)) → {𝑦 ∈ dom 𝑅 ∣ ¬ 𝑦𝑅𝑥} ∈ (ordTop‘𝑅)) |
47 | | elrestr 16404 |
. . . . . . . . . 10
⊢
(((ordTop‘𝑅)
∈ Top ∧ 𝐴 ∈
𝑉 ∧ {𝑦 ∈ dom 𝑅 ∣ ¬ 𝑦𝑅𝑥} ∈ (ordTop‘𝑅)) → ({𝑦 ∈ dom 𝑅 ∣ ¬ 𝑦𝑅𝑥} ∩ 𝐴) ∈ ((ordTop‘𝑅) ↾t 𝐴)) |
48 | 40, 41, 46, 47 | syl3anc 1491 |
. . . . . . . . 9
⊢ (((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) ∧ 𝑥 ∈ (dom 𝑅 ∩ 𝐴)) → ({𝑦 ∈ dom 𝑅 ∣ ¬ 𝑦𝑅𝑥} ∩ 𝐴) ∈ ((ordTop‘𝑅) ↾t 𝐴)) |
49 | 39, 48 | eqeltrrd 2879 |
. . . . . . . 8
⊢ (((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) ∧ 𝑥 ∈ (dom 𝑅 ∩ 𝐴)) → {𝑦 ∈ (dom 𝑅 ∩ 𝐴) ∣ ¬ 𝑦(𝑅 ∩ (𝐴 × 𝐴))𝑥} ∈ ((ordTop‘𝑅) ↾t 𝐴)) |
50 | 49 | fmpttd 6611 |
. . . . . . 7
⊢ ((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) → (𝑥 ∈ (dom 𝑅 ∩ 𝐴) ↦ {𝑦 ∈ (dom 𝑅 ∩ 𝐴) ∣ ¬ 𝑦(𝑅 ∩ (𝐴 × 𝐴))𝑥}):(dom 𝑅 ∩ 𝐴)⟶((ordTop‘𝑅) ↾t 𝐴)) |
51 | 50 | frnd 6263 |
. . . . . 6
⊢ ((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) → ran (𝑥 ∈ (dom 𝑅 ∩ 𝐴) ↦ {𝑦 ∈ (dom 𝑅 ∩ 𝐴) ∣ ¬ 𝑦(𝑅 ∩ (𝐴 × 𝐴))𝑥}) ⊆ ((ordTop‘𝑅) ↾t 𝐴)) |
52 | 27, 51 | eqsstrd 3835 |
. . . . 5
⊢ ((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) → ran (𝑥 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦(𝑅 ∩ (𝐴 × 𝐴))𝑥}) ⊆ ((ordTop‘𝑅) ↾t 𝐴)) |
53 | | rabeq 3376 |
. . . . . . . . 9
⊢ (dom
(𝑅 ∩ (𝐴 × 𝐴)) = (dom 𝑅 ∩ 𝐴) → {𝑦 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥(𝑅 ∩ (𝐴 × 𝐴))𝑦} = {𝑦 ∈ (dom 𝑅 ∩ 𝐴) ∣ ¬ 𝑥(𝑅 ∩ (𝐴 × 𝐴))𝑦}) |
54 | 13, 53 | syl 17 |
. . . . . . . 8
⊢ ((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) → {𝑦 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥(𝑅 ∩ (𝐴 × 𝐴))𝑦} = {𝑦 ∈ (dom 𝑅 ∩ 𝐴) ∣ ¬ 𝑥(𝑅 ∩ (𝐴 × 𝐴))𝑦}) |
55 | 13, 54 | mpteq12dv 4926 |
. . . . . . 7
⊢ ((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) → (𝑥 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥(𝑅 ∩ (𝐴 × 𝐴))𝑦}) = (𝑥 ∈ (dom 𝑅 ∩ 𝐴) ↦ {𝑦 ∈ (dom 𝑅 ∩ 𝐴) ∣ ¬ 𝑥(𝑅 ∩ (𝐴 × 𝐴))𝑦})) |
56 | 55 | rneqd 5556 |
. . . . . 6
⊢ ((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) → ran (𝑥 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥(𝑅 ∩ (𝐴 × 𝐴))𝑦}) = ran (𝑥 ∈ (dom 𝑅 ∩ 𝐴) ↦ {𝑦 ∈ (dom 𝑅 ∩ 𝐴) ∣ ¬ 𝑥(𝑅 ∩ (𝐴 × 𝐴))𝑦})) |
57 | | inrab2 4100 |
. . . . . . . . . 10
⊢ ({𝑦 ∈ dom 𝑅 ∣ ¬ 𝑥𝑅𝑦} ∩ 𝐴) = {𝑦 ∈ (dom 𝑅 ∩ 𝐴) ∣ ¬ 𝑥𝑅𝑦} |
58 | | brinxp 5385 |
. . . . . . . . . . . . 13
⊢ ((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) → (𝑥𝑅𝑦 ↔ 𝑥(𝑅 ∩ (𝐴 × 𝐴))𝑦)) |
59 | 34, 31, 58 | syl2anc 580 |
. . . . . . . . . . . 12
⊢ ((((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) ∧ 𝑥 ∈ (dom 𝑅 ∩ 𝐴)) ∧ 𝑦 ∈ (dom 𝑅 ∩ 𝐴)) → (𝑥𝑅𝑦 ↔ 𝑥(𝑅 ∩ (𝐴 × 𝐴))𝑦)) |
60 | 59 | notbid 310 |
. . . . . . . . . . 11
⊢ ((((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) ∧ 𝑥 ∈ (dom 𝑅 ∩ 𝐴)) ∧ 𝑦 ∈ (dom 𝑅 ∩ 𝐴)) → (¬ 𝑥𝑅𝑦 ↔ ¬ 𝑥(𝑅 ∩ (𝐴 × 𝐴))𝑦)) |
61 | 60 | rabbidva 3372 |
. . . . . . . . . 10
⊢ (((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) ∧ 𝑥 ∈ (dom 𝑅 ∩ 𝐴)) → {𝑦 ∈ (dom 𝑅 ∩ 𝐴) ∣ ¬ 𝑥𝑅𝑦} = {𝑦 ∈ (dom 𝑅 ∩ 𝐴) ∣ ¬ 𝑥(𝑅 ∩ (𝐴 × 𝐴))𝑦}) |
62 | 57, 61 | syl5eq 2845 |
. . . . . . . . 9
⊢ (((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) ∧ 𝑥 ∈ (dom 𝑅 ∩ 𝐴)) → ({𝑦 ∈ dom 𝑅 ∣ ¬ 𝑥𝑅𝑦} ∩ 𝐴) = {𝑦 ∈ (dom 𝑅 ∩ 𝐴) ∣ ¬ 𝑥(𝑅 ∩ (𝐴 × 𝐴))𝑦}) |
63 | 11 | ordtopn2 21328 |
. . . . . . . . . . 11
⊢ ((𝑅 ∈ PosetRel ∧ 𝑥 ∈ dom 𝑅) → {𝑦 ∈ dom 𝑅 ∣ ¬ 𝑥𝑅𝑦} ∈ (ordTop‘𝑅)) |
64 | 42, 44, 63 | syl2an 590 |
. . . . . . . . . 10
⊢ (((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) ∧ 𝑥 ∈ (dom 𝑅 ∩ 𝐴)) → {𝑦 ∈ dom 𝑅 ∣ ¬ 𝑥𝑅𝑦} ∈ (ordTop‘𝑅)) |
65 | | elrestr 16404 |
. . . . . . . . . 10
⊢
(((ordTop‘𝑅)
∈ Top ∧ 𝐴 ∈
𝑉 ∧ {𝑦 ∈ dom 𝑅 ∣ ¬ 𝑥𝑅𝑦} ∈ (ordTop‘𝑅)) → ({𝑦 ∈ dom 𝑅 ∣ ¬ 𝑥𝑅𝑦} ∩ 𝐴) ∈ ((ordTop‘𝑅) ↾t 𝐴)) |
66 | 40, 41, 64, 65 | syl3anc 1491 |
. . . . . . . . 9
⊢ (((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) ∧ 𝑥 ∈ (dom 𝑅 ∩ 𝐴)) → ({𝑦 ∈ dom 𝑅 ∣ ¬ 𝑥𝑅𝑦} ∩ 𝐴) ∈ ((ordTop‘𝑅) ↾t 𝐴)) |
67 | 62, 66 | eqeltrrd 2879 |
. . . . . . . 8
⊢ (((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) ∧ 𝑥 ∈ (dom 𝑅 ∩ 𝐴)) → {𝑦 ∈ (dom 𝑅 ∩ 𝐴) ∣ ¬ 𝑥(𝑅 ∩ (𝐴 × 𝐴))𝑦} ∈ ((ordTop‘𝑅) ↾t 𝐴)) |
68 | 67 | fmpttd 6611 |
. . . . . . 7
⊢ ((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) → (𝑥 ∈ (dom 𝑅 ∩ 𝐴) ↦ {𝑦 ∈ (dom 𝑅 ∩ 𝐴) ∣ ¬ 𝑥(𝑅 ∩ (𝐴 × 𝐴))𝑦}):(dom 𝑅 ∩ 𝐴)⟶((ordTop‘𝑅) ↾t 𝐴)) |
69 | 68 | frnd 6263 |
. . . . . 6
⊢ ((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) → ran (𝑥 ∈ (dom 𝑅 ∩ 𝐴) ↦ {𝑦 ∈ (dom 𝑅 ∩ 𝐴) ∣ ¬ 𝑥(𝑅 ∩ (𝐴 × 𝐴))𝑦}) ⊆ ((ordTop‘𝑅) ↾t 𝐴)) |
70 | 56, 69 | eqsstrd 3835 |
. . . . 5
⊢ ((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) → ran (𝑥 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥(𝑅 ∩ (𝐴 × 𝐴))𝑦}) ⊆ ((ordTop‘𝑅) ↾t 𝐴)) |
71 | 52, 70 | unssd 3987 |
. . . 4
⊢ ((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) → (ran (𝑥 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦(𝑅 ∩ (𝐴 × 𝐴))𝑥}) ∪ ran (𝑥 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥(𝑅 ∩ (𝐴 × 𝐴))𝑦})) ⊆ ((ordTop‘𝑅) ↾t 𝐴)) |
72 | 23, 71 | unssd 3987 |
. . 3
⊢ ((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) → ({dom (𝑅 ∩ (𝐴 × 𝐴))} ∪ (ran (𝑥 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦(𝑅 ∩ (𝐴 × 𝐴))𝑥}) ∪ ran (𝑥 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥(𝑅 ∩ (𝐴 × 𝐴))𝑦}))) ⊆ ((ordTop‘𝑅) ↾t 𝐴)) |
73 | | tgfiss 21124 |
. . 3
⊢
((((ordTop‘𝑅)
↾t 𝐴)
∈ Top ∧ ({dom (𝑅
∩ (𝐴 × 𝐴))} ∪ (ran (𝑥 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦(𝑅 ∩ (𝐴 × 𝐴))𝑥}) ∪ ran (𝑥 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥(𝑅 ∩ (𝐴 × 𝐴))𝑦}))) ⊆ ((ordTop‘𝑅) ↾t 𝐴)) → (topGen‘(fi‘({dom
(𝑅 ∩ (𝐴 × 𝐴))} ∪ (ran (𝑥 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦(𝑅 ∩ (𝐴 × 𝐴))𝑥}) ∪ ran (𝑥 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥(𝑅 ∩ (𝐴 × 𝐴))𝑦}))))) ⊆ ((ordTop‘𝑅) ↾t 𝐴)) |
74 | 10, 72, 73 | syl2anc 580 |
. 2
⊢ ((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) → (topGen‘(fi‘({dom
(𝑅 ∩ (𝐴 × 𝐴))} ∪ (ran (𝑥 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦(𝑅 ∩ (𝐴 × 𝐴))𝑥}) ∪ ran (𝑥 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom (𝑅 ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥(𝑅 ∩ (𝐴 × 𝐴))𝑦}))))) ⊆ ((ordTop‘𝑅) ↾t 𝐴)) |
75 | 7, 74 | eqsstrd 3835 |
1
⊢ ((𝑅 ∈ PosetRel ∧ 𝐴 ∈ 𝑉) → (ordTop‘(𝑅 ∩ (𝐴 × 𝐴))) ⊆ ((ordTop‘𝑅) ↾t 𝐴)) |