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

Theorem ordthmeolem 22860
Description: Lemma for ordthmeo 22861. (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 7174 . . . 4 (𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌) → 𝐹:𝑋1-1-onto𝑌)
213ad2ant3 1133 . . 3 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → 𝐹:𝑋1-1-onto𝑌)
3 f1of 6700 . . 3 (𝐹:𝑋1-1-onto𝑌𝐹:𝑋𝑌)
42, 3syl 17 . 2 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → 𝐹:𝑋𝑌)
5 fimacnv 6606 . . . . . . 7 (𝐹:𝑋𝑌 → (𝐹𝑌) = 𝑋)
64, 5syl 17 . . . . . 6 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (𝐹𝑌) = 𝑋)
7 ordthmeo.1 . . . . . . . . 9 𝑋 = dom 𝑅
87ordttopon 22252 . . . . . . . 8 (𝑅𝑉 → (ordTop‘𝑅) ∈ (TopOn‘𝑋))
983ad2ant1 1131 . . . . . . 7 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (ordTop‘𝑅) ∈ (TopOn‘𝑋))
10 toponmax 21983 . . . . . . 7 ((ordTop‘𝑅) ∈ (TopOn‘𝑋) → 𝑋 ∈ (ordTop‘𝑅))
119, 10syl 17 . . . . . 6 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → 𝑋 ∈ (ordTop‘𝑅))
126, 11eqeltrd 2839 . . . . 5 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (𝐹𝑌) ∈ (ordTop‘𝑅))
13 elsni 4575 . . . . . . 7 (𝑧 ∈ {𝑌} → 𝑧 = 𝑌)
1413imaeq2d 5958 . . . . . 6 (𝑧 ∈ {𝑌} → (𝐹𝑧) = (𝐹𝑌))
1514eleq1d 2823 . . . . 5 (𝑧 ∈ {𝑌} → ((𝐹𝑧) ∈ (ordTop‘𝑅) ↔ (𝐹𝑌) ∈ (ordTop‘𝑅)))
1612, 15syl5ibrcom 246 . . . 4 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (𝑧 ∈ {𝑌} → (𝐹𝑧) ∈ (ordTop‘𝑅)))
1716ralrimiv 3106 . . 3 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑧 ∈ {𝑌} (𝐹𝑧) ∈ (ordTop‘𝑅))
18 cnvimass 5978 . . . . . . . . . 10 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ⊆ dom 𝐹
19 f1odm 6704 . . . . . . . . . . . 12 (𝐹:𝑋1-1-onto𝑌 → dom 𝐹 = 𝑋)
202, 19syl 17 . . . . . . . . . . 11 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → dom 𝐹 = 𝑋)
2120adantr 480 . . . . . . . . . 10 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → dom 𝐹 = 𝑋)
2218, 21sseqtrid 3969 . . . . . . . . 9 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ⊆ 𝑋)
23 sseqin2 4146 . . . . . . . . 9 ((𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ⊆ 𝑋 ↔ (𝑋 ∩ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})) = (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}))
2422, 23sylib 217 . . . . . . . 8 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝑋 ∩ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})) = (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}))
252ad2antrr 722 . . . . . . . . . . . 12 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → 𝐹:𝑋1-1-onto𝑌)
26 f1ofn 6701 . . . . . . . . . . . 12 (𝐹:𝑋1-1-onto𝑌𝐹 Fn 𝑋)
2725, 26syl 17 . . . . . . . . . . 11 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → 𝐹 Fn 𝑋)
28 elpreima 6917 . . . . . . . . . . 11 (𝐹 Fn 𝑋 → (𝑧 ∈ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ↔ (𝑧𝑋 ∧ (𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})))
2927, 28syl 17 . . . . . . . . . 10 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝑧 ∈ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ↔ (𝑧𝑋 ∧ (𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})))
30 simpr 484 . . . . . . . . . . 11 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → 𝑧𝑋)
3130biantrurd 532 . . . . . . . . . 10 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ↔ (𝑧𝑋 ∧ (𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})))
324adantr 480 . . . . . . . . . . . . 13 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → 𝐹:𝑋𝑌)
3332ffvelrnda 6943 . . . . . . . . . . . 12 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝐹𝑧) ∈ 𝑌)
34 breq1 5073 . . . . . . . . . . . . . 14 (𝑦 = (𝐹𝑧) → (𝑦𝑆𝑥 ↔ (𝐹𝑧)𝑆𝑥))
3534notbid 317 . . . . . . . . . . . . 13 (𝑦 = (𝐹𝑧) → (¬ 𝑦𝑆𝑥 ↔ ¬ (𝐹𝑧)𝑆𝑥))
3635elrab3 3618 . . . . . . . . . . . 12 ((𝐹𝑧) ∈ 𝑌 → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ↔ ¬ (𝐹𝑧)𝑆𝑥))
3733, 36syl 17 . . . . . . . . . . 11 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ↔ ¬ (𝐹𝑧)𝑆𝑥))
38 simpll3 1212 . . . . . . . . . . . . . 14 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → 𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌))
39 f1ocnv 6712 . . . . . . . . . . . . . . . . 17 (𝐹:𝑋1-1-onto𝑌𝐹:𝑌1-1-onto𝑋)
40 f1of 6700 . . . . . . . . . . . . . . . . 17 (𝐹:𝑌1-1-onto𝑋𝐹:𝑌𝑋)
412, 39, 403syl 18 . . . . . . . . . . . . . . . 16 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → 𝐹:𝑌𝑋)
4241ffvelrnda 6943 . . . . . . . . . . . . . . 15 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹𝑥) ∈ 𝑋)
4342adantr 480 . . . . . . . . . . . . . 14 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝐹𝑥) ∈ 𝑋)
44 isorel 7177 . . . . . . . . . . . . . 14 ((𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌) ∧ (𝑧𝑋 ∧ (𝐹𝑥) ∈ 𝑋)) → (𝑧𝑅(𝐹𝑥) ↔ (𝐹𝑧)𝑆(𝐹‘(𝐹𝑥))))
4538, 30, 43, 44syl12anc 833 . . . . . . . . . . . . 13 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝑧𝑅(𝐹𝑥) ↔ (𝐹𝑧)𝑆(𝐹‘(𝐹𝑥))))
46 f1ocnvfv2 7130 . . . . . . . . . . . . . . . 16 ((𝐹:𝑋1-1-onto𝑌𝑥𝑌) → (𝐹‘(𝐹𝑥)) = 𝑥)
472, 46sylan 579 . . . . . . . . . . . . . . 15 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹‘(𝐹𝑥)) = 𝑥)
4847adantr 480 . . . . . . . . . . . . . 14 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝐹‘(𝐹𝑥)) = 𝑥)
4948breq2d 5082 . . . . . . . . . . . . 13 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑧)𝑆(𝐹‘(𝐹𝑥)) ↔ (𝐹𝑧)𝑆𝑥))
5045, 49bitrd 278 . . . . . . . . . . . 12 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝑧𝑅(𝐹𝑥) ↔ (𝐹𝑧)𝑆𝑥))
5150notbid 317 . . . . . . . . . . 11 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (¬ 𝑧𝑅(𝐹𝑥) ↔ ¬ (𝐹𝑧)𝑆𝑥))
5237, 51bitr4d 281 . . . . . . . . . 10 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ↔ ¬ 𝑧𝑅(𝐹𝑥)))
5329, 31, 523bitr2d 306 . . . . . . . . 9 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝑧 ∈ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ↔ ¬ 𝑧𝑅(𝐹𝑥)))
5453rabbi2dva 4148 . . . . . . . 8 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝑋 ∩ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})) = {𝑧𝑋 ∣ ¬ 𝑧𝑅(𝐹𝑥)})
5524, 54eqtr3d 2780 . . . . . . 7 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) = {𝑧𝑋 ∣ ¬ 𝑧𝑅(𝐹𝑥)})
56 simpl1 1189 . . . . . . . 8 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → 𝑅𝑉)
577ordtopn1 22253 . . . . . . . 8 ((𝑅𝑉 ∧ (𝐹𝑥) ∈ 𝑋) → {𝑧𝑋 ∣ ¬ 𝑧𝑅(𝐹𝑥)} ∈ (ordTop‘𝑅))
5856, 42, 57syl2anc 583 . . . . . . 7 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → {𝑧𝑋 ∣ ¬ 𝑧𝑅(𝐹𝑥)} ∈ (ordTop‘𝑅))
5955, 58eqeltrd 2839 . . . . . 6 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∈ (ordTop‘𝑅))
6059ralrimiva 3107 . . . . 5 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑥𝑌 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∈ (ordTop‘𝑅))
61 ordthmeo.2 . . . . . . . . . 10 𝑌 = dom 𝑆
62 dmexg 7724 . . . . . . . . . 10 (𝑆𝑊 → dom 𝑆 ∈ V)
6361, 62eqeltrid 2843 . . . . . . . . 9 (𝑆𝑊𝑌 ∈ V)
64633ad2ant2 1132 . . . . . . . 8 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → 𝑌 ∈ V)
65 rabexg 5250 . . . . . . . 8 (𝑌 ∈ V → {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ∈ V)
6664, 65syl 17 . . . . . . 7 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ∈ V)
6766ralrimivw 3108 . . . . . 6 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑥𝑌 {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ∈ V)
68 eqid 2738 . . . . . . 7 (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) = (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})
69 imaeq2 5954 . . . . . . . 8 (𝑧 = {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} → (𝐹𝑧) = (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}))
7069eleq1d 2823 . . . . . . 7 (𝑧 = {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} → ((𝐹𝑧) ∈ (ordTop‘𝑅) ↔ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∈ (ordTop‘𝑅)))
7168, 70ralrnmptw 6952 . . . . . 6 (∀𝑥𝑌 {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ∈ V → (∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})(𝐹𝑧) ∈ (ordTop‘𝑅) ↔ ∀𝑥𝑌 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∈ (ordTop‘𝑅)))
7267, 71syl 17 . . . . 5 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})(𝐹𝑧) ∈ (ordTop‘𝑅) ↔ ∀𝑥𝑌 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∈ (ordTop‘𝑅)))
7360, 72mpbird 256 . . . 4 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})(𝐹𝑧) ∈ (ordTop‘𝑅))
74 cnvimass 5978 . . . . . . . . . 10 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ⊆ dom 𝐹
7574, 21sseqtrid 3969 . . . . . . . . 9 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ⊆ 𝑋)
76 sseqin2 4146 . . . . . . . . 9 ((𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ⊆ 𝑋 ↔ (𝑋 ∩ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})) = (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))
7775, 76sylib 217 . . . . . . . 8 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝑋 ∩ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})) = (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))
78 elpreima 6917 . . . . . . . . . . 11 (𝐹 Fn 𝑋 → (𝑧 ∈ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ↔ (𝑧𝑋 ∧ (𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})))
7927, 78syl 17 . . . . . . . . . 10 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝑧 ∈ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ↔ (𝑧𝑋 ∧ (𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})))
8030biantrurd 532 . . . . . . . . . 10 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ↔ (𝑧𝑋 ∧ (𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})))
81 breq2 5074 . . . . . . . . . . . . . 14 (𝑦 = (𝐹𝑧) → (𝑥𝑆𝑦𝑥𝑆(𝐹𝑧)))
8281notbid 317 . . . . . . . . . . . . 13 (𝑦 = (𝐹𝑧) → (¬ 𝑥𝑆𝑦 ↔ ¬ 𝑥𝑆(𝐹𝑧)))
8382elrab3 3618 . . . . . . . . . . . 12 ((𝐹𝑧) ∈ 𝑌 → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ↔ ¬ 𝑥𝑆(𝐹𝑧)))
8433, 83syl 17 . . . . . . . . . . 11 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ↔ ¬ 𝑥𝑆(𝐹𝑧)))
85 isorel 7177 . . . . . . . . . . . . . 14 ((𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌) ∧ ((𝐹𝑥) ∈ 𝑋𝑧𝑋)) → ((𝐹𝑥)𝑅𝑧 ↔ (𝐹‘(𝐹𝑥))𝑆(𝐹𝑧)))
8638, 43, 30, 85syl12anc 833 . . . . . . . . . . . . 13 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑥)𝑅𝑧 ↔ (𝐹‘(𝐹𝑥))𝑆(𝐹𝑧)))
8748breq1d 5080 . . . . . . . . . . . . 13 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹‘(𝐹𝑥))𝑆(𝐹𝑧) ↔ 𝑥𝑆(𝐹𝑧)))
8886, 87bitrd 278 . . . . . . . . . . . 12 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑥)𝑅𝑧𝑥𝑆(𝐹𝑧)))
8988notbid 317 . . . . . . . . . . 11 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (¬ (𝐹𝑥)𝑅𝑧 ↔ ¬ 𝑥𝑆(𝐹𝑧)))
9084, 89bitr4d 281 . . . . . . . . . 10 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ↔ ¬ (𝐹𝑥)𝑅𝑧))
9179, 80, 903bitr2d 306 . . . . . . . . 9 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝑧 ∈ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ↔ ¬ (𝐹𝑥)𝑅𝑧))
9291rabbi2dva 4148 . . . . . . . 8 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝑋 ∩ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})) = {𝑧𝑋 ∣ ¬ (𝐹𝑥)𝑅𝑧})
9377, 92eqtr3d 2780 . . . . . . 7 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) = {𝑧𝑋 ∣ ¬ (𝐹𝑥)𝑅𝑧})
947ordtopn2 22254 . . . . . . . 8 ((𝑅𝑉 ∧ (𝐹𝑥) ∈ 𝑋) → {𝑧𝑋 ∣ ¬ (𝐹𝑥)𝑅𝑧} ∈ (ordTop‘𝑅))
9556, 42, 94syl2anc 583 . . . . . . 7 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → {𝑧𝑋 ∣ ¬ (𝐹𝑥)𝑅𝑧} ∈ (ordTop‘𝑅))
9693, 95eqeltrd 2839 . . . . . 6 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ∈ (ordTop‘𝑅))
9796ralrimiva 3107 . . . . 5 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑥𝑌 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ∈ (ordTop‘𝑅))
98 rabexg 5250 . . . . . . . 8 (𝑌 ∈ V → {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ∈ V)
9964, 98syl 17 . . . . . . 7 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ∈ V)
10099ralrimivw 3108 . . . . . 6 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑥𝑌 {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ∈ V)
101 eqid 2738 . . . . . . 7 (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) = (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})
102 imaeq2 5954 . . . . . . . 8 (𝑧 = {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} → (𝐹𝑧) = (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))
103102eleq1d 2823 . . . . . . 7 (𝑧 = {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} → ((𝐹𝑧) ∈ (ordTop‘𝑅) ↔ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ∈ (ordTop‘𝑅)))
104101, 103ralrnmptw 6952 . . . . . 6 (∀𝑥𝑌 {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ∈ V → (∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})(𝐹𝑧) ∈ (ordTop‘𝑅) ↔ ∀𝑥𝑌 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ∈ (ordTop‘𝑅)))
105100, 104syl 17 . . . . 5 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})(𝐹𝑧) ∈ (ordTop‘𝑅) ↔ ∀𝑥𝑌 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ∈ (ordTop‘𝑅)))
10697, 105mpbird 256 . . . 4 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})(𝐹𝑧) ∈ (ordTop‘𝑅))
107 ralunb 4121 . . . 4 (∀𝑧 ∈ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))(𝐹𝑧) ∈ (ordTop‘𝑅) ↔ (∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})(𝐹𝑧) ∈ (ordTop‘𝑅) ∧ ∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})(𝐹𝑧) ∈ (ordTop‘𝑅)))
10873, 106, 107sylanbrc 582 . . 3 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑧 ∈ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))(𝐹𝑧) ∈ (ordTop‘𝑅))
109 ralunb 4121 . . 3 (∀𝑧 ∈ ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})))(𝐹𝑧) ∈ (ordTop‘𝑅) ↔ (∀𝑧 ∈ {𝑌} (𝐹𝑧) ∈ (ordTop‘𝑅) ∧ ∀𝑧 ∈ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))(𝐹𝑧) ∈ (ordTop‘𝑅)))
11017, 108, 109sylanbrc 582 . 2 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑧 ∈ ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})))(𝐹𝑧) ∈ (ordTop‘𝑅))
111 eqid 2738 . . . . . . 7 ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) = ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})
112 eqid 2738 . . . . . . 7 ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) = ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})
11361, 111, 112ordtuni 22249 . . . . . 6 (𝑆𝑊𝑌 = ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))))
114113, 63eqeltrrd 2840 . . . . 5 (𝑆𝑊 ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))) ∈ V)
115 uniexb 7592 . . . . 5 (({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))) ∈ V ↔ ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))) ∈ V)
116114, 115sylibr 233 . . . 4 (𝑆𝑊 → ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))) ∈ V)
1171163ad2ant2 1132 . . 3 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))) ∈ V)
11861, 111, 112ordtval 22248 . . . 4 (𝑆𝑊 → (ordTop‘𝑆) = (topGen‘(fi‘({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))))))
1191183ad2ant2 1132 . . 3 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (ordTop‘𝑆) = (topGen‘(fi‘({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))))))
12061ordttopon 22252 . . . 4 (𝑆𝑊 → (ordTop‘𝑆) ∈ (TopOn‘𝑌))
1211203ad2ant2 1132 . . 3 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (ordTop‘𝑆) ∈ (TopOn‘𝑌))
1229, 117, 119, 121subbascn 22313 . 2 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (𝐹 ∈ ((ordTop‘𝑅) Cn (ordTop‘𝑆)) ↔ (𝐹:𝑋𝑌 ∧ ∀𝑧 ∈ ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})))(𝐹𝑧) ∈ (ordTop‘𝑅))))
1234, 110, 122mpbir2and 709 1 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → 𝐹 ∈ ((ordTop‘𝑅) Cn (ordTop‘𝑆)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 205  wa 395  w3a 1085   = wceq 1539  wcel 2108  wral 3063  {crab 3067  Vcvv 3422  cun 3881  cin 3882  wss 3883  {csn 4558   cuni 4836   class class class wbr 5070  cmpt 5153  ccnv 5579  dom cdm 5580  ran crn 5581  cima 5583   Fn wfn 6413  wf 6414  1-1-ontowf1o 6417  cfv 6418   Isom wiso 6419  (class class class)co 7255  ficfi 9099  topGenctg 17065  ordTopcordt 17127  TopOnctopon 21967   Cn ccn 22283
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1799  ax-4 1813  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2110  ax-9 2118  ax-10 2139  ax-11 2156  ax-12 2173  ax-ext 2709  ax-sep 5218  ax-nul 5225  ax-pow 5283  ax-pr 5347  ax-un 7566
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-3or 1086  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1784  df-nf 1788  df-sb 2069  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2817  df-nfc 2888  df-ne 2943  df-ral 3068  df-rex 3069  df-reu 3070  df-rab 3072  df-v 3424  df-sbc 3712  df-csb 3829  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3902  df-nul 4254  df-if 4457  df-pw 4532  df-sn 4559  df-pr 4561  df-tp 4563  df-op 4565  df-uni 4837  df-int 4877  df-iun 4923  df-iin 4924  df-br 5071  df-opab 5133  df-mpt 5154  df-tr 5188  df-id 5480  df-eprel 5486  df-po 5494  df-so 5495  df-fr 5535  df-we 5537  df-xp 5586  df-rel 5587  df-cnv 5588  df-co 5589  df-dm 5590  df-rn 5591  df-res 5592  df-ima 5593  df-ord 6254  df-on 6255  df-lim 6256  df-suc 6257  df-iota 6376  df-fun 6420  df-fn 6421  df-f 6422  df-f1 6423  df-fo 6424  df-f1o 6425  df-fv 6426  df-isom 6427  df-ov 7258  df-oprab 7259  df-mpo 7260  df-om 7688  df-1st 7804  df-2nd 7805  df-1o 8267  df-er 8456  df-map 8575  df-en 8692  df-dom 8693  df-fin 8695  df-fi 9100  df-topgen 17071  df-ordt 17129  df-top 21951  df-topon 21968  df-bases 22004  df-cn 22286
This theorem is referenced by:  ordthmeo  22861  xrmulc1cn  31782
  Copyright terms: Public domain W3C validator