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

Theorem ordthmeolem 23721
Description: Lemma for ordthmeo 23722. (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 7280 . . . 4 (𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌) → 𝐹:𝑋1-1-onto𝑌)
213ad2ant3 1135 . . 3 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → 𝐹:𝑋1-1-onto𝑌)
3 f1of 6782 . . 3 (𝐹:𝑋1-1-onto𝑌𝐹:𝑋𝑌)
42, 3syl 17 . 2 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → 𝐹:𝑋𝑌)
5 fimacnv 6692 . . . . . . 7 (𝐹:𝑋𝑌 → (𝐹𝑌) = 𝑋)
64, 5syl 17 . . . . . 6 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (𝐹𝑌) = 𝑋)
7 ordthmeo.1 . . . . . . . . 9 𝑋 = dom 𝑅
87ordttopon 23113 . . . . . . . 8 (𝑅𝑉 → (ordTop‘𝑅) ∈ (TopOn‘𝑋))
983ad2ant1 1133 . . . . . . 7 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (ordTop‘𝑅) ∈ (TopOn‘𝑋))
10 toponmax 22846 . . . . . . 7 ((ordTop‘𝑅) ∈ (TopOn‘𝑋) → 𝑋 ∈ (ordTop‘𝑅))
119, 10syl 17 . . . . . 6 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → 𝑋 ∈ (ordTop‘𝑅))
126, 11eqeltrd 2828 . . . . 5 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (𝐹𝑌) ∈ (ordTop‘𝑅))
13 elsni 4602 . . . . . . 7 (𝑧 ∈ {𝑌} → 𝑧 = 𝑌)
1413imaeq2d 6020 . . . . . 6 (𝑧 ∈ {𝑌} → (𝐹𝑧) = (𝐹𝑌))
1514eleq1d 2813 . . . . 5 (𝑧 ∈ {𝑌} → ((𝐹𝑧) ∈ (ordTop‘𝑅) ↔ (𝐹𝑌) ∈ (ordTop‘𝑅)))
1612, 15syl5ibrcom 247 . . . 4 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (𝑧 ∈ {𝑌} → (𝐹𝑧) ∈ (ordTop‘𝑅)))
1716ralrimiv 3124 . . 3 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑧 ∈ {𝑌} (𝐹𝑧) ∈ (ordTop‘𝑅))
18 cnvimass 6042 . . . . . . . . . 10 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ⊆ dom 𝐹
19 f1odm 6786 . . . . . . . . . . . 12 (𝐹:𝑋1-1-onto𝑌 → dom 𝐹 = 𝑋)
202, 19syl 17 . . . . . . . . . . 11 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → dom 𝐹 = 𝑋)
2120adantr 480 . . . . . . . . . 10 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → dom 𝐹 = 𝑋)
2218, 21sseqtrid 3986 . . . . . . . . 9 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ⊆ 𝑋)
23 sseqin2 4182 . . . . . . . . 9 ((𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ⊆ 𝑋 ↔ (𝑋 ∩ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})) = (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}))
2422, 23sylib 218 . . . . . . . 8 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝑋 ∩ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})) = (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}))
252ad2antrr 726 . . . . . . . . . . . 12 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → 𝐹:𝑋1-1-onto𝑌)
26 f1ofn 6783 . . . . . . . . . . . 12 (𝐹:𝑋1-1-onto𝑌𝐹 Fn 𝑋)
2725, 26syl 17 . . . . . . . . . . 11 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → 𝐹 Fn 𝑋)
28 elpreima 7012 . . . . . . . . . . 11 (𝐹 Fn 𝑋 → (𝑧 ∈ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ↔ (𝑧𝑋 ∧ (𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})))
2927, 28syl 17 . . . . . . . . . 10 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝑧 ∈ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ↔ (𝑧𝑋 ∧ (𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})))
30 simpr 484 . . . . . . . . . . 11 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → 𝑧𝑋)
3130biantrurd 532 . . . . . . . . . 10 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ↔ (𝑧𝑋 ∧ (𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})))
324adantr 480 . . . . . . . . . . . . 13 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → 𝐹:𝑋𝑌)
3332ffvelcdmda 7038 . . . . . . . . . . . 12 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝐹𝑧) ∈ 𝑌)
34 breq1 5105 . . . . . . . . . . . . . 14 (𝑦 = (𝐹𝑧) → (𝑦𝑆𝑥 ↔ (𝐹𝑧)𝑆𝑥))
3534notbid 318 . . . . . . . . . . . . 13 (𝑦 = (𝐹𝑧) → (¬ 𝑦𝑆𝑥 ↔ ¬ (𝐹𝑧)𝑆𝑥))
3635elrab3 3657 . . . . . . . . . . . 12 ((𝐹𝑧) ∈ 𝑌 → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ↔ ¬ (𝐹𝑧)𝑆𝑥))
3733, 36syl 17 . . . . . . . . . . 11 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ↔ ¬ (𝐹𝑧)𝑆𝑥))
38 simpll3 1215 . . . . . . . . . . . . . 14 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → 𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌))
39 f1ocnv 6794 . . . . . . . . . . . . . . . . 17 (𝐹:𝑋1-1-onto𝑌𝐹:𝑌1-1-onto𝑋)
40 f1of 6782 . . . . . . . . . . . . . . . . 17 (𝐹:𝑌1-1-onto𝑋𝐹:𝑌𝑋)
412, 39, 403syl 18 . . . . . . . . . . . . . . . 16 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → 𝐹:𝑌𝑋)
4241ffvelcdmda 7038 . . . . . . . . . . . . . . 15 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹𝑥) ∈ 𝑋)
4342adantr 480 . . . . . . . . . . . . . 14 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝐹𝑥) ∈ 𝑋)
44 isorel 7283 . . . . . . . . . . . . . 14 ((𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌) ∧ (𝑧𝑋 ∧ (𝐹𝑥) ∈ 𝑋)) → (𝑧𝑅(𝐹𝑥) ↔ (𝐹𝑧)𝑆(𝐹‘(𝐹𝑥))))
4538, 30, 43, 44syl12anc 836 . . . . . . . . . . . . 13 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝑧𝑅(𝐹𝑥) ↔ (𝐹𝑧)𝑆(𝐹‘(𝐹𝑥))))
46 f1ocnvfv2 7234 . . . . . . . . . . . . . . . 16 ((𝐹:𝑋1-1-onto𝑌𝑥𝑌) → (𝐹‘(𝐹𝑥)) = 𝑥)
472, 46sylan 580 . . . . . . . . . . . . . . 15 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹‘(𝐹𝑥)) = 𝑥)
4847adantr 480 . . . . . . . . . . . . . 14 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝐹‘(𝐹𝑥)) = 𝑥)
4948breq2d 5114 . . . . . . . . . . . . 13 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑧)𝑆(𝐹‘(𝐹𝑥)) ↔ (𝐹𝑧)𝑆𝑥))
5045, 49bitrd 279 . . . . . . . . . . . 12 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝑧𝑅(𝐹𝑥) ↔ (𝐹𝑧)𝑆𝑥))
5150notbid 318 . . . . . . . . . . 11 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (¬ 𝑧𝑅(𝐹𝑥) ↔ ¬ (𝐹𝑧)𝑆𝑥))
5237, 51bitr4d 282 . . . . . . . . . 10 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ↔ ¬ 𝑧𝑅(𝐹𝑥)))
5329, 31, 523bitr2d 307 . . . . . . . . 9 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝑧 ∈ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ↔ ¬ 𝑧𝑅(𝐹𝑥)))
5453rabbi2dva 4185 . . . . . . . 8 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝑋 ∩ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})) = {𝑧𝑋 ∣ ¬ 𝑧𝑅(𝐹𝑥)})
5524, 54eqtr3d 2766 . . . . . . 7 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) = {𝑧𝑋 ∣ ¬ 𝑧𝑅(𝐹𝑥)})
56 simpl1 1192 . . . . . . . 8 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → 𝑅𝑉)
577ordtopn1 23114 . . . . . . . 8 ((𝑅𝑉 ∧ (𝐹𝑥) ∈ 𝑋) → {𝑧𝑋 ∣ ¬ 𝑧𝑅(𝐹𝑥)} ∈ (ordTop‘𝑅))
5856, 42, 57syl2anc 584 . . . . . . 7 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → {𝑧𝑋 ∣ ¬ 𝑧𝑅(𝐹𝑥)} ∈ (ordTop‘𝑅))
5955, 58eqeltrd 2828 . . . . . 6 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∈ (ordTop‘𝑅))
6059ralrimiva 3125 . . . . 5 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑥𝑌 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∈ (ordTop‘𝑅))
61 ordthmeo.2 . . . . . . . . . 10 𝑌 = dom 𝑆
62 dmexg 7857 . . . . . . . . . 10 (𝑆𝑊 → dom 𝑆 ∈ V)
6361, 62eqeltrid 2832 . . . . . . . . 9 (𝑆𝑊𝑌 ∈ V)
64633ad2ant2 1134 . . . . . . . 8 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → 𝑌 ∈ V)
65 rabexg 5287 . . . . . . . 8 (𝑌 ∈ V → {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ∈ V)
6664, 65syl 17 . . . . . . 7 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ∈ V)
6766ralrimivw 3129 . . . . . 6 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑥𝑌 {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ∈ V)
68 eqid 2729 . . . . . . 7 (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) = (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})
69 imaeq2 6016 . . . . . . . 8 (𝑧 = {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} → (𝐹𝑧) = (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}))
7069eleq1d 2813 . . . . . . 7 (𝑧 = {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} → ((𝐹𝑧) ∈ (ordTop‘𝑅) ↔ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∈ (ordTop‘𝑅)))
7168, 70ralrnmptw 7048 . . . . . 6 (∀𝑥𝑌 {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ∈ V → (∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})(𝐹𝑧) ∈ (ordTop‘𝑅) ↔ ∀𝑥𝑌 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∈ (ordTop‘𝑅)))
7267, 71syl 17 . . . . 5 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})(𝐹𝑧) ∈ (ordTop‘𝑅) ↔ ∀𝑥𝑌 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∈ (ordTop‘𝑅)))
7360, 72mpbird 257 . . . 4 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})(𝐹𝑧) ∈ (ordTop‘𝑅))
74 cnvimass 6042 . . . . . . . . . 10 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ⊆ dom 𝐹
7574, 21sseqtrid 3986 . . . . . . . . 9 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ⊆ 𝑋)
76 sseqin2 4182 . . . . . . . . 9 ((𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ⊆ 𝑋 ↔ (𝑋 ∩ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})) = (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))
7775, 76sylib 218 . . . . . . . 8 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝑋 ∩ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})) = (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))
78 elpreima 7012 . . . . . . . . . . 11 (𝐹 Fn 𝑋 → (𝑧 ∈ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ↔ (𝑧𝑋 ∧ (𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})))
7927, 78syl 17 . . . . . . . . . 10 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝑧 ∈ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ↔ (𝑧𝑋 ∧ (𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})))
8030biantrurd 532 . . . . . . . . . 10 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ↔ (𝑧𝑋 ∧ (𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})))
81 breq2 5106 . . . . . . . . . . . . . 14 (𝑦 = (𝐹𝑧) → (𝑥𝑆𝑦𝑥𝑆(𝐹𝑧)))
8281notbid 318 . . . . . . . . . . . . 13 (𝑦 = (𝐹𝑧) → (¬ 𝑥𝑆𝑦 ↔ ¬ 𝑥𝑆(𝐹𝑧)))
8382elrab3 3657 . . . . . . . . . . . 12 ((𝐹𝑧) ∈ 𝑌 → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ↔ ¬ 𝑥𝑆(𝐹𝑧)))
8433, 83syl 17 . . . . . . . . . . 11 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ↔ ¬ 𝑥𝑆(𝐹𝑧)))
85 isorel 7283 . . . . . . . . . . . . . 14 ((𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌) ∧ ((𝐹𝑥) ∈ 𝑋𝑧𝑋)) → ((𝐹𝑥)𝑅𝑧 ↔ (𝐹‘(𝐹𝑥))𝑆(𝐹𝑧)))
8638, 43, 30, 85syl12anc 836 . . . . . . . . . . . . 13 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑥)𝑅𝑧 ↔ (𝐹‘(𝐹𝑥))𝑆(𝐹𝑧)))
8748breq1d 5112 . . . . . . . . . . . . 13 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹‘(𝐹𝑥))𝑆(𝐹𝑧) ↔ 𝑥𝑆(𝐹𝑧)))
8886, 87bitrd 279 . . . . . . . . . . . 12 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑥)𝑅𝑧𝑥𝑆(𝐹𝑧)))
8988notbid 318 . . . . . . . . . . 11 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (¬ (𝐹𝑥)𝑅𝑧 ↔ ¬ 𝑥𝑆(𝐹𝑧)))
9084, 89bitr4d 282 . . . . . . . . . 10 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ↔ ¬ (𝐹𝑥)𝑅𝑧))
9179, 80, 903bitr2d 307 . . . . . . . . 9 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝑧 ∈ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ↔ ¬ (𝐹𝑥)𝑅𝑧))
9291rabbi2dva 4185 . . . . . . . 8 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝑋 ∩ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})) = {𝑧𝑋 ∣ ¬ (𝐹𝑥)𝑅𝑧})
9377, 92eqtr3d 2766 . . . . . . 7 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) = {𝑧𝑋 ∣ ¬ (𝐹𝑥)𝑅𝑧})
947ordtopn2 23115 . . . . . . . 8 ((𝑅𝑉 ∧ (𝐹𝑥) ∈ 𝑋) → {𝑧𝑋 ∣ ¬ (𝐹𝑥)𝑅𝑧} ∈ (ordTop‘𝑅))
9556, 42, 94syl2anc 584 . . . . . . 7 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → {𝑧𝑋 ∣ ¬ (𝐹𝑥)𝑅𝑧} ∈ (ordTop‘𝑅))
9693, 95eqeltrd 2828 . . . . . 6 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ∈ (ordTop‘𝑅))
9796ralrimiva 3125 . . . . 5 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑥𝑌 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ∈ (ordTop‘𝑅))
98 rabexg 5287 . . . . . . . 8 (𝑌 ∈ V → {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ∈ V)
9964, 98syl 17 . . . . . . 7 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ∈ V)
10099ralrimivw 3129 . . . . . 6 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑥𝑌 {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ∈ V)
101 eqid 2729 . . . . . . 7 (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) = (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})
102 imaeq2 6016 . . . . . . . 8 (𝑧 = {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} → (𝐹𝑧) = (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))
103102eleq1d 2813 . . . . . . 7 (𝑧 = {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} → ((𝐹𝑧) ∈ (ordTop‘𝑅) ↔ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ∈ (ordTop‘𝑅)))
104101, 103ralrnmptw 7048 . . . . . 6 (∀𝑥𝑌 {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ∈ V → (∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})(𝐹𝑧) ∈ (ordTop‘𝑅) ↔ ∀𝑥𝑌 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ∈ (ordTop‘𝑅)))
105100, 104syl 17 . . . . 5 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})(𝐹𝑧) ∈ (ordTop‘𝑅) ↔ ∀𝑥𝑌 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ∈ (ordTop‘𝑅)))
10697, 105mpbird 257 . . . 4 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})(𝐹𝑧) ∈ (ordTop‘𝑅))
107 ralunb 4156 . . . 4 (∀𝑧 ∈ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))(𝐹𝑧) ∈ (ordTop‘𝑅) ↔ (∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})(𝐹𝑧) ∈ (ordTop‘𝑅) ∧ ∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})(𝐹𝑧) ∈ (ordTop‘𝑅)))
10873, 106, 107sylanbrc 583 . . 3 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑧 ∈ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))(𝐹𝑧) ∈ (ordTop‘𝑅))
109 ralunb 4156 . . 3 (∀𝑧 ∈ ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})))(𝐹𝑧) ∈ (ordTop‘𝑅) ↔ (∀𝑧 ∈ {𝑌} (𝐹𝑧) ∈ (ordTop‘𝑅) ∧ ∀𝑧 ∈ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))(𝐹𝑧) ∈ (ordTop‘𝑅)))
11017, 108, 109sylanbrc 583 . 2 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑧 ∈ ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})))(𝐹𝑧) ∈ (ordTop‘𝑅))
111 eqid 2729 . . . . . . 7 ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) = ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})
112 eqid 2729 . . . . . . 7 ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) = ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})
11361, 111, 112ordtuni 23110 . . . . . 6 (𝑆𝑊𝑌 = ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))))
114113, 63eqeltrrd 2829 . . . . 5 (𝑆𝑊 ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))) ∈ V)
115 uniexb 7720 . . . . 5 (({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))) ∈ V ↔ ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))) ∈ V)
116114, 115sylibr 234 . . . 4 (𝑆𝑊 → ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))) ∈ V)
1171163ad2ant2 1134 . . 3 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))) ∈ V)
11861, 111, 112ordtval 23109 . . . 4 (𝑆𝑊 → (ordTop‘𝑆) = (topGen‘(fi‘({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))))))
1191183ad2ant2 1134 . . 3 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (ordTop‘𝑆) = (topGen‘(fi‘({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))))))
12061ordttopon 23113 . . . 4 (𝑆𝑊 → (ordTop‘𝑆) ∈ (TopOn‘𝑌))
1211203ad2ant2 1134 . . 3 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (ordTop‘𝑆) ∈ (TopOn‘𝑌))
1229, 117, 119, 121subbascn 23174 . 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 206  wa 395  w3a 1086   = wceq 1540  wcel 2109  wral 3044  {crab 3402  Vcvv 3444  cun 3909  cin 3910  wss 3911  {csn 4585   cuni 4867   class class class wbr 5102  cmpt 5183  ccnv 5630  dom cdm 5631  ran crn 5632  cima 5634   Fn wfn 6494  wf 6495  1-1-ontowf1o 6498  cfv 6499   Isom wiso 6500  (class class class)co 7369  ficfi 9337  topGenctg 17376  ordTopcordt 17438  TopOnctopon 22830   Cn ccn 23144
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2701  ax-sep 5246  ax-nul 5256  ax-pow 5315  ax-pr 5382  ax-un 7691
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2533  df-eu 2562  df-clab 2708  df-cleq 2721  df-clel 2803  df-nfc 2878  df-ne 2926  df-ral 3045  df-rex 3054  df-reu 3352  df-rab 3403  df-v 3446  df-sbc 3751  df-csb 3860  df-dif 3914  df-un 3916  df-in 3918  df-ss 3928  df-pss 3931  df-nul 4293  df-if 4485  df-pw 4561  df-sn 4586  df-pr 4588  df-op 4592  df-uni 4868  df-int 4907  df-iun 4953  df-iin 4954  df-br 5103  df-opab 5165  df-mpt 5184  df-tr 5210  df-id 5526  df-eprel 5531  df-po 5539  df-so 5540  df-fr 5584  df-we 5586  df-xp 5637  df-rel 5638  df-cnv 5639  df-co 5640  df-dm 5641  df-rn 5642  df-res 5643  df-ima 5644  df-ord 6323  df-on 6324  df-lim 6325  df-suc 6326  df-iota 6452  df-fun 6501  df-fn 6502  df-f 6503  df-f1 6504  df-fo 6505  df-f1o 6506  df-fv 6507  df-isom 6508  df-ov 7372  df-oprab 7373  df-mpo 7374  df-om 7823  df-1st 7947  df-2nd 7948  df-1o 8411  df-2o 8412  df-map 8778  df-en 8896  df-dom 8897  df-fin 8899  df-fi 9338  df-topgen 17382  df-ordt 17440  df-top 22814  df-topon 22831  df-bases 22866  df-cn 23147
This theorem is referenced by:  ordthmeo  23722  xrmulc1cn  33913
  Copyright terms: Public domain W3C validator