MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  ordthmeolem Structured version   Visualization version   GIF version

Theorem ordthmeolem 22552
Description: Lemma for ordthmeo 22553. (Contributed by Mario Carneiro, 9-Sep-2015.)
Hypotheses
Ref Expression
ordthmeo.1 𝑋 = dom 𝑅
ordthmeo.2 𝑌 = dom 𝑆
Assertion
Ref Expression
ordthmeolem ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → 𝐹 ∈ ((ordTop‘𝑅) Cn (ordTop‘𝑆)))

Proof of Theorem ordthmeolem
Dummy variables 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 isof1o 7089 . . . 4 (𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌) → 𝐹:𝑋1-1-onto𝑌)
213ad2ant3 1136 . . 3 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → 𝐹:𝑋1-1-onto𝑌)
3 f1of 6618 . . 3 (𝐹:𝑋1-1-onto𝑌𝐹:𝑋𝑌)
42, 3syl 17 . 2 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → 𝐹:𝑋𝑌)
5 fimacnv 6526 . . . . . . 7 (𝐹:𝑋𝑌 → (𝐹𝑌) = 𝑋)
64, 5syl 17 . . . . . 6 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (𝐹𝑌) = 𝑋)
7 ordthmeo.1 . . . . . . . . 9 𝑋 = dom 𝑅
87ordttopon 21944 . . . . . . . 8 (𝑅𝑉 → (ordTop‘𝑅) ∈ (TopOn‘𝑋))
983ad2ant1 1134 . . . . . . 7 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (ordTop‘𝑅) ∈ (TopOn‘𝑋))
10 toponmax 21677 . . . . . . 7 ((ordTop‘𝑅) ∈ (TopOn‘𝑋) → 𝑋 ∈ (ordTop‘𝑅))
119, 10syl 17 . . . . . 6 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → 𝑋 ∈ (ordTop‘𝑅))
126, 11eqeltrd 2833 . . . . 5 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (𝐹𝑌) ∈ (ordTop‘𝑅))
13 elsni 4533 . . . . . . 7 (𝑧 ∈ {𝑌} → 𝑧 = 𝑌)
1413imaeq2d 5903 . . . . . 6 (𝑧 ∈ {𝑌} → (𝐹𝑧) = (𝐹𝑌))
1514eleq1d 2817 . . . . 5 (𝑧 ∈ {𝑌} → ((𝐹𝑧) ∈ (ordTop‘𝑅) ↔ (𝐹𝑌) ∈ (ordTop‘𝑅)))
1612, 15syl5ibrcom 250 . . . 4 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (𝑧 ∈ {𝑌} → (𝐹𝑧) ∈ (ordTop‘𝑅)))
1716ralrimiv 3095 . . 3 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑧 ∈ {𝑌} (𝐹𝑧) ∈ (ordTop‘𝑅))
18 cnvimass 5923 . . . . . . . . . 10 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ⊆ dom 𝐹
19 f1odm 6622 . . . . . . . . . . . 12 (𝐹:𝑋1-1-onto𝑌 → dom 𝐹 = 𝑋)
202, 19syl 17 . . . . . . . . . . 11 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → dom 𝐹 = 𝑋)
2120adantr 484 . . . . . . . . . 10 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → dom 𝐹 = 𝑋)
2218, 21sseqtrid 3929 . . . . . . . . 9 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ⊆ 𝑋)
23 sseqin2 4106 . . . . . . . . 9 ((𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ⊆ 𝑋 ↔ (𝑋 ∩ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})) = (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}))
2422, 23sylib 221 . . . . . . . 8 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝑋 ∩ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})) = (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}))
252ad2antrr 726 . . . . . . . . . . . 12 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → 𝐹:𝑋1-1-onto𝑌)
26 f1ofn 6619 . . . . . . . . . . . 12 (𝐹:𝑋1-1-onto𝑌𝐹 Fn 𝑋)
2725, 26syl 17 . . . . . . . . . . 11 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → 𝐹 Fn 𝑋)
28 elpreima 6835 . . . . . . . . . . 11 (𝐹 Fn 𝑋 → (𝑧 ∈ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ↔ (𝑧𝑋 ∧ (𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})))
2927, 28syl 17 . . . . . . . . . 10 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝑧 ∈ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ↔ (𝑧𝑋 ∧ (𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})))
30 simpr 488 . . . . . . . . . . 11 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → 𝑧𝑋)
3130biantrurd 536 . . . . . . . . . 10 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ↔ (𝑧𝑋 ∧ (𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})))
324adantr 484 . . . . . . . . . . . . 13 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → 𝐹:𝑋𝑌)
3332ffvelrnda 6861 . . . . . . . . . . . 12 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝐹𝑧) ∈ 𝑌)
34 breq1 5033 . . . . . . . . . . . . . 14 (𝑦 = (𝐹𝑧) → (𝑦𝑆𝑥 ↔ (𝐹𝑧)𝑆𝑥))
3534notbid 321 . . . . . . . . . . . . 13 (𝑦 = (𝐹𝑧) → (¬ 𝑦𝑆𝑥 ↔ ¬ (𝐹𝑧)𝑆𝑥))
3635elrab3 3589 . . . . . . . . . . . 12 ((𝐹𝑧) ∈ 𝑌 → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ↔ ¬ (𝐹𝑧)𝑆𝑥))
3733, 36syl 17 . . . . . . . . . . 11 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ↔ ¬ (𝐹𝑧)𝑆𝑥))
38 simpll3 1215 . . . . . . . . . . . . . 14 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → 𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌))
39 f1ocnv 6630 . . . . . . . . . . . . . . . . 17 (𝐹:𝑋1-1-onto𝑌𝐹:𝑌1-1-onto𝑋)
40 f1of 6618 . . . . . . . . . . . . . . . . 17 (𝐹:𝑌1-1-onto𝑋𝐹:𝑌𝑋)
412, 39, 403syl 18 . . . . . . . . . . . . . . . 16 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → 𝐹:𝑌𝑋)
4241ffvelrnda 6861 . . . . . . . . . . . . . . 15 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹𝑥) ∈ 𝑋)
4342adantr 484 . . . . . . . . . . . . . 14 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝐹𝑥) ∈ 𝑋)
44 isorel 7092 . . . . . . . . . . . . . 14 ((𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌) ∧ (𝑧𝑋 ∧ (𝐹𝑥) ∈ 𝑋)) → (𝑧𝑅(𝐹𝑥) ↔ (𝐹𝑧)𝑆(𝐹‘(𝐹𝑥))))
4538, 30, 43, 44syl12anc 836 . . . . . . . . . . . . 13 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝑧𝑅(𝐹𝑥) ↔ (𝐹𝑧)𝑆(𝐹‘(𝐹𝑥))))
46 f1ocnvfv2 7045 . . . . . . . . . . . . . . . 16 ((𝐹:𝑋1-1-onto𝑌𝑥𝑌) → (𝐹‘(𝐹𝑥)) = 𝑥)
472, 46sylan 583 . . . . . . . . . . . . . . 15 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹‘(𝐹𝑥)) = 𝑥)
4847adantr 484 . . . . . . . . . . . . . 14 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝐹‘(𝐹𝑥)) = 𝑥)
4948breq2d 5042 . . . . . . . . . . . . 13 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑧)𝑆(𝐹‘(𝐹𝑥)) ↔ (𝐹𝑧)𝑆𝑥))
5045, 49bitrd 282 . . . . . . . . . . . 12 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝑧𝑅(𝐹𝑥) ↔ (𝐹𝑧)𝑆𝑥))
5150notbid 321 . . . . . . . . . . 11 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (¬ 𝑧𝑅(𝐹𝑥) ↔ ¬ (𝐹𝑧)𝑆𝑥))
5237, 51bitr4d 285 . . . . . . . . . 10 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ↔ ¬ 𝑧𝑅(𝐹𝑥)))
5329, 31, 523bitr2d 310 . . . . . . . . 9 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝑧 ∈ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ↔ ¬ 𝑧𝑅(𝐹𝑥)))
5453rabbi2dva 4108 . . . . . . . 8 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝑋 ∩ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})) = {𝑧𝑋 ∣ ¬ 𝑧𝑅(𝐹𝑥)})
5524, 54eqtr3d 2775 . . . . . . 7 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) = {𝑧𝑋 ∣ ¬ 𝑧𝑅(𝐹𝑥)})
56 simpl1 1192 . . . . . . . 8 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → 𝑅𝑉)
577ordtopn1 21945 . . . . . . . 8 ((𝑅𝑉 ∧ (𝐹𝑥) ∈ 𝑋) → {𝑧𝑋 ∣ ¬ 𝑧𝑅(𝐹𝑥)} ∈ (ordTop‘𝑅))
5856, 42, 57syl2anc 587 . . . . . . 7 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → {𝑧𝑋 ∣ ¬ 𝑧𝑅(𝐹𝑥)} ∈ (ordTop‘𝑅))
5955, 58eqeltrd 2833 . . . . . 6 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∈ (ordTop‘𝑅))
6059ralrimiva 3096 . . . . 5 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑥𝑌 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∈ (ordTop‘𝑅))
61 ordthmeo.2 . . . . . . . . . 10 𝑌 = dom 𝑆
62 dmexg 7634 . . . . . . . . . 10 (𝑆𝑊 → dom 𝑆 ∈ V)
6361, 62eqeltrid 2837 . . . . . . . . 9 (𝑆𝑊𝑌 ∈ V)
64633ad2ant2 1135 . . . . . . . 8 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → 𝑌 ∈ V)
65 rabexg 5199 . . . . . . . 8 (𝑌 ∈ V → {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ∈ V)
6664, 65syl 17 . . . . . . 7 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ∈ V)
6766ralrimivw 3097 . . . . . 6 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑥𝑌 {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ∈ V)
68 eqid 2738 . . . . . . 7 (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) = (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})
69 imaeq2 5899 . . . . . . . 8 (𝑧 = {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} → (𝐹𝑧) = (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}))
7069eleq1d 2817 . . . . . . 7 (𝑧 = {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} → ((𝐹𝑧) ∈ (ordTop‘𝑅) ↔ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∈ (ordTop‘𝑅)))
7168, 70ralrnmptw 6870 . . . . . 6 (∀𝑥𝑌 {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ∈ V → (∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})(𝐹𝑧) ∈ (ordTop‘𝑅) ↔ ∀𝑥𝑌 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∈ (ordTop‘𝑅)))
7267, 71syl 17 . . . . 5 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})(𝐹𝑧) ∈ (ordTop‘𝑅) ↔ ∀𝑥𝑌 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∈ (ordTop‘𝑅)))
7360, 72mpbird 260 . . . 4 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})(𝐹𝑧) ∈ (ordTop‘𝑅))
74 cnvimass 5923 . . . . . . . . . 10 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ⊆ dom 𝐹
7574, 21sseqtrid 3929 . . . . . . . . 9 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ⊆ 𝑋)
76 sseqin2 4106 . . . . . . . . 9 ((𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ⊆ 𝑋 ↔ (𝑋 ∩ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})) = (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))
7775, 76sylib 221 . . . . . . . 8 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝑋 ∩ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})) = (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))
78 elpreima 6835 . . . . . . . . . . 11 (𝐹 Fn 𝑋 → (𝑧 ∈ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ↔ (𝑧𝑋 ∧ (𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})))
7927, 78syl 17 . . . . . . . . . 10 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝑧 ∈ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ↔ (𝑧𝑋 ∧ (𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})))
8030biantrurd 536 . . . . . . . . . 10 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ↔ (𝑧𝑋 ∧ (𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})))
81 breq2 5034 . . . . . . . . . . . . . 14 (𝑦 = (𝐹𝑧) → (𝑥𝑆𝑦𝑥𝑆(𝐹𝑧)))
8281notbid 321 . . . . . . . . . . . . 13 (𝑦 = (𝐹𝑧) → (¬ 𝑥𝑆𝑦 ↔ ¬ 𝑥𝑆(𝐹𝑧)))
8382elrab3 3589 . . . . . . . . . . . 12 ((𝐹𝑧) ∈ 𝑌 → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ↔ ¬ 𝑥𝑆(𝐹𝑧)))
8433, 83syl 17 . . . . . . . . . . 11 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ↔ ¬ 𝑥𝑆(𝐹𝑧)))
85 isorel 7092 . . . . . . . . . . . . . 14 ((𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌) ∧ ((𝐹𝑥) ∈ 𝑋𝑧𝑋)) → ((𝐹𝑥)𝑅𝑧 ↔ (𝐹‘(𝐹𝑥))𝑆(𝐹𝑧)))
8638, 43, 30, 85syl12anc 836 . . . . . . . . . . . . 13 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑥)𝑅𝑧 ↔ (𝐹‘(𝐹𝑥))𝑆(𝐹𝑧)))
8748breq1d 5040 . . . . . . . . . . . . 13 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹‘(𝐹𝑥))𝑆(𝐹𝑧) ↔ 𝑥𝑆(𝐹𝑧)))
8886, 87bitrd 282 . . . . . . . . . . . 12 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑥)𝑅𝑧𝑥𝑆(𝐹𝑧)))
8988notbid 321 . . . . . . . . . . 11 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (¬ (𝐹𝑥)𝑅𝑧 ↔ ¬ 𝑥𝑆(𝐹𝑧)))
9084, 89bitr4d 285 . . . . . . . . . 10 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ↔ ¬ (𝐹𝑥)𝑅𝑧))
9179, 80, 903bitr2d 310 . . . . . . . . 9 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝑧 ∈ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ↔ ¬ (𝐹𝑥)𝑅𝑧))
9291rabbi2dva 4108 . . . . . . . 8 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝑋 ∩ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})) = {𝑧𝑋 ∣ ¬ (𝐹𝑥)𝑅𝑧})
9377, 92eqtr3d 2775 . . . . . . 7 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) = {𝑧𝑋 ∣ ¬ (𝐹𝑥)𝑅𝑧})
947ordtopn2 21946 . . . . . . . 8 ((𝑅𝑉 ∧ (𝐹𝑥) ∈ 𝑋) → {𝑧𝑋 ∣ ¬ (𝐹𝑥)𝑅𝑧} ∈ (ordTop‘𝑅))
9556, 42, 94syl2anc 587 . . . . . . 7 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → {𝑧𝑋 ∣ ¬ (𝐹𝑥)𝑅𝑧} ∈ (ordTop‘𝑅))
9693, 95eqeltrd 2833 . . . . . 6 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ∈ (ordTop‘𝑅))
9796ralrimiva 3096 . . . . 5 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑥𝑌 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ∈ (ordTop‘𝑅))
98 rabexg 5199 . . . . . . . 8 (𝑌 ∈ V → {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ∈ V)
9964, 98syl 17 . . . . . . 7 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ∈ V)
10099ralrimivw 3097 . . . . . 6 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑥𝑌 {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ∈ V)
101 eqid 2738 . . . . . . 7 (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) = (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})
102 imaeq2 5899 . . . . . . . 8 (𝑧 = {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} → (𝐹𝑧) = (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))
103102eleq1d 2817 . . . . . . 7 (𝑧 = {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} → ((𝐹𝑧) ∈ (ordTop‘𝑅) ↔ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ∈ (ordTop‘𝑅)))
104101, 103ralrnmptw 6870 . . . . . 6 (∀𝑥𝑌 {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ∈ V → (∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})(𝐹𝑧) ∈ (ordTop‘𝑅) ↔ ∀𝑥𝑌 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ∈ (ordTop‘𝑅)))
105100, 104syl 17 . . . . 5 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})(𝐹𝑧) ∈ (ordTop‘𝑅) ↔ ∀𝑥𝑌 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ∈ (ordTop‘𝑅)))
10697, 105mpbird 260 . . . 4 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})(𝐹𝑧) ∈ (ordTop‘𝑅))
107 ralunb 4081 . . . 4 (∀𝑧 ∈ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))(𝐹𝑧) ∈ (ordTop‘𝑅) ↔ (∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})(𝐹𝑧) ∈ (ordTop‘𝑅) ∧ ∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})(𝐹𝑧) ∈ (ordTop‘𝑅)))
10873, 106, 107sylanbrc 586 . . 3 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑧 ∈ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))(𝐹𝑧) ∈ (ordTop‘𝑅))
109 ralunb 4081 . . 3 (∀𝑧 ∈ ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})))(𝐹𝑧) ∈ (ordTop‘𝑅) ↔ (∀𝑧 ∈ {𝑌} (𝐹𝑧) ∈ (ordTop‘𝑅) ∧ ∀𝑧 ∈ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))(𝐹𝑧) ∈ (ordTop‘𝑅)))
11017, 108, 109sylanbrc 586 . 2 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑧 ∈ ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})))(𝐹𝑧) ∈ (ordTop‘𝑅))
111 eqid 2738 . . . . . . 7 ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) = ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})
112 eqid 2738 . . . . . . 7 ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) = ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})
11361, 111, 112ordtuni 21941 . . . . . 6 (𝑆𝑊𝑌 = ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))))
114113, 63eqeltrrd 2834 . . . . 5 (𝑆𝑊 ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))) ∈ V)
115 uniexb 7505 . . . . 5 (({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))) ∈ V ↔ ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))) ∈ V)
116114, 115sylibr 237 . . . 4 (𝑆𝑊 → ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))) ∈ V)
1171163ad2ant2 1135 . . 3 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))) ∈ V)
11861, 111, 112ordtval 21940 . . . 4 (𝑆𝑊 → (ordTop‘𝑆) = (topGen‘(fi‘({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))))))
1191183ad2ant2 1135 . . 3 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (ordTop‘𝑆) = (topGen‘(fi‘({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))))))
12061ordttopon 21944 . . . 4 (𝑆𝑊 → (ordTop‘𝑆) ∈ (TopOn‘𝑌))
1211203ad2ant2 1135 . . 3 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (ordTop‘𝑆) ∈ (TopOn‘𝑌))
1229, 117, 119, 121subbascn 22005 . 2 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (𝐹 ∈ ((ordTop‘𝑅) Cn (ordTop‘𝑆)) ↔ (𝐹:𝑋𝑌 ∧ ∀𝑧 ∈ ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})))(𝐹𝑧) ∈ (ordTop‘𝑅))))
1234, 110, 122mpbir2and 713 1 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → 𝐹 ∈ ((ordTop‘𝑅) Cn (ordTop‘𝑆)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 209  wa 399  w3a 1088   = wceq 1542  wcel 2114  wral 3053  {crab 3057  Vcvv 3398  cun 3841  cin 3842  wss 3843  {csn 4516   cuni 4796   class class class wbr 5030  cmpt 5110  ccnv 5524  dom cdm 5525  ran crn 5526  cima 5528   Fn wfn 6334  wf 6335  1-1-ontowf1o 6338  cfv 6339   Isom wiso 6340  (class class class)co 7170  ficfi 8947  topGenctg 16814  ordTopcordt 16875  TopOnctopon 21661   Cn ccn 21975
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1975  ax-7 2020  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2162  ax-12 2179  ax-ext 2710  ax-sep 5167  ax-nul 5174  ax-pow 5232  ax-pr 5296  ax-un 7479
This theorem depends on definitions:  df-bi 210  df-an 400  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1787  df-nf 1791  df-sb 2075  df-mo 2540  df-eu 2570  df-clab 2717  df-cleq 2730  df-clel 2811  df-nfc 2881  df-ne 2935  df-ral 3058  df-rex 3059  df-reu 3060  df-rab 3062  df-v 3400  df-sbc 3681  df-csb 3791  df-dif 3846  df-un 3848  df-in 3850  df-ss 3860  df-pss 3862  df-nul 4212  df-if 4415  df-pw 4490  df-sn 4517  df-pr 4519  df-tp 4521  df-op 4523  df-uni 4797  df-int 4837  df-iun 4883  df-iin 4884  df-br 5031  df-opab 5093  df-mpt 5111  df-tr 5137  df-id 5429  df-eprel 5434  df-po 5442  df-so 5443  df-fr 5483  df-we 5485  df-xp 5531  df-rel 5532  df-cnv 5533  df-co 5534  df-dm 5535  df-rn 5536  df-res 5537  df-ima 5538  df-ord 6175  df-on 6176  df-lim 6177  df-suc 6178  df-iota 6297  df-fun 6341  df-fn 6342  df-f 6343  df-f1 6344  df-fo 6345  df-f1o 6346  df-fv 6347  df-isom 6348  df-ov 7173  df-oprab 7174  df-mpo 7175  df-om 7600  df-1st 7714  df-2nd 7715  df-1o 8131  df-er 8320  df-map 8439  df-en 8556  df-dom 8557  df-fin 8559  df-fi 8948  df-topgen 16820  df-ordt 16877  df-top 21645  df-topon 21662  df-bases 21697  df-cn 21978
This theorem is referenced by:  ordthmeo  22553  xrmulc1cn  31452
  Copyright terms: Public domain W3C validator