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

Theorem ordthmeolem 23830
Description: Lemma for ordthmeo 23831. (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 7359 . . . 4 (𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌) → 𝐹:𝑋1-1-onto𝑌)
213ad2ant3 1135 . . 3 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → 𝐹:𝑋1-1-onto𝑌)
3 f1of 6862 . . 3 (𝐹:𝑋1-1-onto𝑌𝐹:𝑋𝑌)
42, 3syl 17 . 2 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → 𝐹:𝑋𝑌)
5 fimacnv 6769 . . . . . . 7 (𝐹:𝑋𝑌 → (𝐹𝑌) = 𝑋)
64, 5syl 17 . . . . . 6 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (𝐹𝑌) = 𝑋)
7 ordthmeo.1 . . . . . . . . 9 𝑋 = dom 𝑅
87ordttopon 23222 . . . . . . . 8 (𝑅𝑉 → (ordTop‘𝑅) ∈ (TopOn‘𝑋))
983ad2ant1 1133 . . . . . . 7 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (ordTop‘𝑅) ∈ (TopOn‘𝑋))
10 toponmax 22953 . . . . . . 7 ((ordTop‘𝑅) ∈ (TopOn‘𝑋) → 𝑋 ∈ (ordTop‘𝑅))
119, 10syl 17 . . . . . 6 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → 𝑋 ∈ (ordTop‘𝑅))
126, 11eqeltrd 2844 . . . . 5 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (𝐹𝑌) ∈ (ordTop‘𝑅))
13 elsni 4665 . . . . . . 7 (𝑧 ∈ {𝑌} → 𝑧 = 𝑌)
1413imaeq2d 6089 . . . . . 6 (𝑧 ∈ {𝑌} → (𝐹𝑧) = (𝐹𝑌))
1514eleq1d 2829 . . . . 5 (𝑧 ∈ {𝑌} → ((𝐹𝑧) ∈ (ordTop‘𝑅) ↔ (𝐹𝑌) ∈ (ordTop‘𝑅)))
1612, 15syl5ibrcom 247 . . . 4 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (𝑧 ∈ {𝑌} → (𝐹𝑧) ∈ (ordTop‘𝑅)))
1716ralrimiv 3151 . . 3 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑧 ∈ {𝑌} (𝐹𝑧) ∈ (ordTop‘𝑅))
18 cnvimass 6111 . . . . . . . . . 10 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ⊆ dom 𝐹
19 f1odm 6866 . . . . . . . . . . . 12 (𝐹:𝑋1-1-onto𝑌 → dom 𝐹 = 𝑋)
202, 19syl 17 . . . . . . . . . . 11 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → dom 𝐹 = 𝑋)
2120adantr 480 . . . . . . . . . 10 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → dom 𝐹 = 𝑋)
2218, 21sseqtrid 4061 . . . . . . . . 9 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ⊆ 𝑋)
23 sseqin2 4244 . . . . . . . . 9 ((𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ⊆ 𝑋 ↔ (𝑋 ∩ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})) = (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}))
2422, 23sylib 218 . . . . . . . 8 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝑋 ∩ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})) = (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}))
252ad2antrr 725 . . . . . . . . . . . 12 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → 𝐹:𝑋1-1-onto𝑌)
26 f1ofn 6863 . . . . . . . . . . . 12 (𝐹:𝑋1-1-onto𝑌𝐹 Fn 𝑋)
2725, 26syl 17 . . . . . . . . . . 11 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → 𝐹 Fn 𝑋)
28 elpreima 7091 . . . . . . . . . . 11 (𝐹 Fn 𝑋 → (𝑧 ∈ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ↔ (𝑧𝑋 ∧ (𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})))
2927, 28syl 17 . . . . . . . . . 10 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝑧 ∈ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ↔ (𝑧𝑋 ∧ (𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})))
30 simpr 484 . . . . . . . . . . 11 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → 𝑧𝑋)
3130biantrurd 532 . . . . . . . . . 10 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ↔ (𝑧𝑋 ∧ (𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})))
324adantr 480 . . . . . . . . . . . . 13 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → 𝐹:𝑋𝑌)
3332ffvelcdmda 7118 . . . . . . . . . . . 12 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝐹𝑧) ∈ 𝑌)
34 breq1 5169 . . . . . . . . . . . . . 14 (𝑦 = (𝐹𝑧) → (𝑦𝑆𝑥 ↔ (𝐹𝑧)𝑆𝑥))
3534notbid 318 . . . . . . . . . . . . 13 (𝑦 = (𝐹𝑧) → (¬ 𝑦𝑆𝑥 ↔ ¬ (𝐹𝑧)𝑆𝑥))
3635elrab3 3709 . . . . . . . . . . . 12 ((𝐹𝑧) ∈ 𝑌 → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ↔ ¬ (𝐹𝑧)𝑆𝑥))
3733, 36syl 17 . . . . . . . . . . 11 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ↔ ¬ (𝐹𝑧)𝑆𝑥))
38 simpll3 1214 . . . . . . . . . . . . . 14 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → 𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌))
39 f1ocnv 6874 . . . . . . . . . . . . . . . . 17 (𝐹:𝑋1-1-onto𝑌𝐹:𝑌1-1-onto𝑋)
40 f1of 6862 . . . . . . . . . . . . . . . . 17 (𝐹:𝑌1-1-onto𝑋𝐹:𝑌𝑋)
412, 39, 403syl 18 . . . . . . . . . . . . . . . 16 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → 𝐹:𝑌𝑋)
4241ffvelcdmda 7118 . . . . . . . . . . . . . . 15 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹𝑥) ∈ 𝑋)
4342adantr 480 . . . . . . . . . . . . . 14 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝐹𝑥) ∈ 𝑋)
44 isorel 7362 . . . . . . . . . . . . . 14 ((𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌) ∧ (𝑧𝑋 ∧ (𝐹𝑥) ∈ 𝑋)) → (𝑧𝑅(𝐹𝑥) ↔ (𝐹𝑧)𝑆(𝐹‘(𝐹𝑥))))
4538, 30, 43, 44syl12anc 836 . . . . . . . . . . . . 13 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝑧𝑅(𝐹𝑥) ↔ (𝐹𝑧)𝑆(𝐹‘(𝐹𝑥))))
46 f1ocnvfv2 7313 . . . . . . . . . . . . . . . 16 ((𝐹:𝑋1-1-onto𝑌𝑥𝑌) → (𝐹‘(𝐹𝑥)) = 𝑥)
472, 46sylan 579 . . . . . . . . . . . . . . 15 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹‘(𝐹𝑥)) = 𝑥)
4847adantr 480 . . . . . . . . . . . . . 14 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝐹‘(𝐹𝑥)) = 𝑥)
4948breq2d 5178 . . . . . . . . . . . . 13 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑧)𝑆(𝐹‘(𝐹𝑥)) ↔ (𝐹𝑧)𝑆𝑥))
5045, 49bitrd 279 . . . . . . . . . . . 12 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝑧𝑅(𝐹𝑥) ↔ (𝐹𝑧)𝑆𝑥))
5150notbid 318 . . . . . . . . . . 11 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (¬ 𝑧𝑅(𝐹𝑥) ↔ ¬ (𝐹𝑧)𝑆𝑥))
5237, 51bitr4d 282 . . . . . . . . . 10 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ↔ ¬ 𝑧𝑅(𝐹𝑥)))
5329, 31, 523bitr2d 307 . . . . . . . . 9 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝑧 ∈ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ↔ ¬ 𝑧𝑅(𝐹𝑥)))
5453rabbi2dva 4247 . . . . . . . 8 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝑋 ∩ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})) = {𝑧𝑋 ∣ ¬ 𝑧𝑅(𝐹𝑥)})
5524, 54eqtr3d 2782 . . . . . . 7 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) = {𝑧𝑋 ∣ ¬ 𝑧𝑅(𝐹𝑥)})
56 simpl1 1191 . . . . . . . 8 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → 𝑅𝑉)
577ordtopn1 23223 . . . . . . . 8 ((𝑅𝑉 ∧ (𝐹𝑥) ∈ 𝑋) → {𝑧𝑋 ∣ ¬ 𝑧𝑅(𝐹𝑥)} ∈ (ordTop‘𝑅))
5856, 42, 57syl2anc 583 . . . . . . 7 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → {𝑧𝑋 ∣ ¬ 𝑧𝑅(𝐹𝑥)} ∈ (ordTop‘𝑅))
5955, 58eqeltrd 2844 . . . . . 6 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∈ (ordTop‘𝑅))
6059ralrimiva 3152 . . . . 5 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑥𝑌 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∈ (ordTop‘𝑅))
61 ordthmeo.2 . . . . . . . . . 10 𝑌 = dom 𝑆
62 dmexg 7941 . . . . . . . . . 10 (𝑆𝑊 → dom 𝑆 ∈ V)
6361, 62eqeltrid 2848 . . . . . . . . 9 (𝑆𝑊𝑌 ∈ V)
64633ad2ant2 1134 . . . . . . . 8 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → 𝑌 ∈ V)
65 rabexg 5355 . . . . . . . 8 (𝑌 ∈ V → {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ∈ V)
6664, 65syl 17 . . . . . . 7 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ∈ V)
6766ralrimivw 3156 . . . . . 6 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑥𝑌 {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ∈ V)
68 eqid 2740 . . . . . . 7 (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) = (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})
69 imaeq2 6085 . . . . . . . 8 (𝑧 = {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} → (𝐹𝑧) = (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}))
7069eleq1d 2829 . . . . . . 7 (𝑧 = {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} → ((𝐹𝑧) ∈ (ordTop‘𝑅) ↔ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∈ (ordTop‘𝑅)))
7168, 70ralrnmptw 7128 . . . . . 6 (∀𝑥𝑌 {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥} ∈ V → (∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})(𝐹𝑧) ∈ (ordTop‘𝑅) ↔ ∀𝑥𝑌 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∈ (ordTop‘𝑅)))
7267, 71syl 17 . . . . 5 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})(𝐹𝑧) ∈ (ordTop‘𝑅) ↔ ∀𝑥𝑌 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∈ (ordTop‘𝑅)))
7360, 72mpbird 257 . . . 4 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})(𝐹𝑧) ∈ (ordTop‘𝑅))
74 cnvimass 6111 . . . . . . . . . 10 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ⊆ dom 𝐹
7574, 21sseqtrid 4061 . . . . . . . . 9 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ⊆ 𝑋)
76 sseqin2 4244 . . . . . . . . 9 ((𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ⊆ 𝑋 ↔ (𝑋 ∩ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})) = (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))
7775, 76sylib 218 . . . . . . . 8 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝑋 ∩ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})) = (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))
78 elpreima 7091 . . . . . . . . . . 11 (𝐹 Fn 𝑋 → (𝑧 ∈ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ↔ (𝑧𝑋 ∧ (𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})))
7927, 78syl 17 . . . . . . . . . 10 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝑧 ∈ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ↔ (𝑧𝑋 ∧ (𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})))
8030biantrurd 532 . . . . . . . . . 10 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ↔ (𝑧𝑋 ∧ (𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})))
81 breq2 5170 . . . . . . . . . . . . . 14 (𝑦 = (𝐹𝑧) → (𝑥𝑆𝑦𝑥𝑆(𝐹𝑧)))
8281notbid 318 . . . . . . . . . . . . 13 (𝑦 = (𝐹𝑧) → (¬ 𝑥𝑆𝑦 ↔ ¬ 𝑥𝑆(𝐹𝑧)))
8382elrab3 3709 . . . . . . . . . . . 12 ((𝐹𝑧) ∈ 𝑌 → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ↔ ¬ 𝑥𝑆(𝐹𝑧)))
8433, 83syl 17 . . . . . . . . . . 11 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ↔ ¬ 𝑥𝑆(𝐹𝑧)))
85 isorel 7362 . . . . . . . . . . . . . 14 ((𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌) ∧ ((𝐹𝑥) ∈ 𝑋𝑧𝑋)) → ((𝐹𝑥)𝑅𝑧 ↔ (𝐹‘(𝐹𝑥))𝑆(𝐹𝑧)))
8638, 43, 30, 85syl12anc 836 . . . . . . . . . . . . 13 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑥)𝑅𝑧 ↔ (𝐹‘(𝐹𝑥))𝑆(𝐹𝑧)))
8748breq1d 5176 . . . . . . . . . . . . 13 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹‘(𝐹𝑥))𝑆(𝐹𝑧) ↔ 𝑥𝑆(𝐹𝑧)))
8886, 87bitrd 279 . . . . . . . . . . . 12 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑥)𝑅𝑧𝑥𝑆(𝐹𝑧)))
8988notbid 318 . . . . . . . . . . 11 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (¬ (𝐹𝑥)𝑅𝑧 ↔ ¬ 𝑥𝑆(𝐹𝑧)))
9084, 89bitr4d 282 . . . . . . . . . 10 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → ((𝐹𝑧) ∈ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ↔ ¬ (𝐹𝑥)𝑅𝑧))
9179, 80, 903bitr2d 307 . . . . . . . . 9 ((((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) ∧ 𝑧𝑋) → (𝑧 ∈ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ↔ ¬ (𝐹𝑥)𝑅𝑧))
9291rabbi2dva 4247 . . . . . . . 8 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝑋 ∩ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})) = {𝑧𝑋 ∣ ¬ (𝐹𝑥)𝑅𝑧})
9377, 92eqtr3d 2782 . . . . . . 7 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) = {𝑧𝑋 ∣ ¬ (𝐹𝑥)𝑅𝑧})
947ordtopn2 23224 . . . . . . . 8 ((𝑅𝑉 ∧ (𝐹𝑥) ∈ 𝑋) → {𝑧𝑋 ∣ ¬ (𝐹𝑥)𝑅𝑧} ∈ (ordTop‘𝑅))
9556, 42, 94syl2anc 583 . . . . . . 7 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → {𝑧𝑋 ∣ ¬ (𝐹𝑥)𝑅𝑧} ∈ (ordTop‘𝑅))
9693, 95eqeltrd 2844 . . . . . 6 (((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) ∧ 𝑥𝑌) → (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ∈ (ordTop‘𝑅))
9796ralrimiva 3152 . . . . 5 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑥𝑌 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ∈ (ordTop‘𝑅))
98 rabexg 5355 . . . . . . . 8 (𝑌 ∈ V → {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ∈ V)
9964, 98syl 17 . . . . . . 7 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ∈ V)
10099ralrimivw 3156 . . . . . 6 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑥𝑌 {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ∈ V)
101 eqid 2740 . . . . . . 7 (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) = (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})
102 imaeq2 6085 . . . . . . . 8 (𝑧 = {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} → (𝐹𝑧) = (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))
103102eleq1d 2829 . . . . . . 7 (𝑧 = {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} → ((𝐹𝑧) ∈ (ordTop‘𝑅) ↔ (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ∈ (ordTop‘𝑅)))
104101, 103ralrnmptw 7128 . . . . . 6 (∀𝑥𝑌 {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦} ∈ V → (∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})(𝐹𝑧) ∈ (ordTop‘𝑅) ↔ ∀𝑥𝑌 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ∈ (ordTop‘𝑅)))
105100, 104syl 17 . . . . 5 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})(𝐹𝑧) ∈ (ordTop‘𝑅) ↔ ∀𝑥𝑌 (𝐹 “ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) ∈ (ordTop‘𝑅)))
10697, 105mpbird 257 . . . 4 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})(𝐹𝑧) ∈ (ordTop‘𝑅))
107 ralunb 4220 . . . 4 (∀𝑧 ∈ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))(𝐹𝑧) ∈ (ordTop‘𝑅) ↔ (∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})(𝐹𝑧) ∈ (ordTop‘𝑅) ∧ ∀𝑧 ∈ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})(𝐹𝑧) ∈ (ordTop‘𝑅)))
10873, 106, 107sylanbrc 582 . . 3 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑧 ∈ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))(𝐹𝑧) ∈ (ordTop‘𝑅))
109 ralunb 4220 . . 3 (∀𝑧 ∈ ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})))(𝐹𝑧) ∈ (ordTop‘𝑅) ↔ (∀𝑧 ∈ {𝑌} (𝐹𝑧) ∈ (ordTop‘𝑅) ∧ ∀𝑧 ∈ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))(𝐹𝑧) ∈ (ordTop‘𝑅)))
11017, 108, 109sylanbrc 582 . 2 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ∀𝑧 ∈ ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})))(𝐹𝑧) ∈ (ordTop‘𝑅))
111 eqid 2740 . . . . . . 7 ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) = ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥})
112 eqid 2740 . . . . . . 7 ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}) = ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})
11361, 111, 112ordtuni 23219 . . . . . 6 (𝑆𝑊𝑌 = ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))))
114113, 63eqeltrrd 2845 . . . . 5 (𝑆𝑊 ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))) ∈ V)
115 uniexb 7799 . . . . 5 (({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))) ∈ V ↔ ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))) ∈ V)
116114, 115sylibr 234 . . . 4 (𝑆𝑊 → ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))) ∈ V)
1171163ad2ant2 1134 . . 3 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))) ∈ V)
11861, 111, 112ordtval 23218 . . . 4 (𝑆𝑊 → (ordTop‘𝑆) = (topGen‘(fi‘({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))))))
1191183ad2ant2 1134 . . 3 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (ordTop‘𝑆) = (topGen‘(fi‘({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦}))))))
12061ordttopon 23222 . . . 4 (𝑆𝑊 → (ordTop‘𝑆) ∈ (TopOn‘𝑌))
1211203ad2ant2 1134 . . 3 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (ordTop‘𝑆) ∈ (TopOn‘𝑌))
1229, 117, 119, 121subbascn 23283 . 2 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → (𝐹 ∈ ((ordTop‘𝑅) Cn (ordTop‘𝑆)) ↔ (𝐹:𝑋𝑌 ∧ ∀𝑧 ∈ ({𝑌} ∪ (ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑦𝑆𝑥}) ∪ ran (𝑥𝑌 ↦ {𝑦𝑌 ∣ ¬ 𝑥𝑆𝑦})))(𝐹𝑧) ∈ (ordTop‘𝑅))))
1234, 110, 122mpbir2and 712 1 ((𝑅𝑉𝑆𝑊𝐹 Isom 𝑅, 𝑆 (𝑋, 𝑌)) → 𝐹 ∈ ((ordTop‘𝑅) Cn (ordTop‘𝑆)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 206  wa 395  w3a 1087   = wceq 1537  wcel 2108  wral 3067  {crab 3443  Vcvv 3488  cun 3974  cin 3975  wss 3976  {csn 4648   cuni 4931   class class class wbr 5166  cmpt 5249  ccnv 5699  dom cdm 5700  ran crn 5701  cima 5703   Fn wfn 6568  wf 6569  1-1-ontowf1o 6572  cfv 6573   Isom wiso 6574  (class class class)co 7448  ficfi 9479  topGenctg 17497  ordTopcordt 17559  TopOnctopon 22937   Cn ccn 23253
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1793  ax-4 1807  ax-5 1909  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2158  ax-12 2178  ax-ext 2711  ax-sep 5317  ax-nul 5324  ax-pow 5383  ax-pr 5447  ax-un 7770
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 847  df-3or 1088  df-3an 1089  df-tru 1540  df-fal 1550  df-ex 1778  df-nf 1782  df-sb 2065  df-mo 2543  df-eu 2572  df-clab 2718  df-cleq 2732  df-clel 2819  df-nfc 2895  df-ne 2947  df-ral 3068  df-rex 3077  df-reu 3389  df-rab 3444  df-v 3490  df-sbc 3805  df-csb 3922  df-dif 3979  df-un 3981  df-in 3983  df-ss 3993  df-pss 3996  df-nul 4353  df-if 4549  df-pw 4624  df-sn 4649  df-pr 4651  df-op 4655  df-uni 4932  df-int 4971  df-iun 5017  df-iin 5018  df-br 5167  df-opab 5229  df-mpt 5250  df-tr 5284  df-id 5593  df-eprel 5599  df-po 5607  df-so 5608  df-fr 5652  df-we 5654  df-xp 5706  df-rel 5707  df-cnv 5708  df-co 5709  df-dm 5710  df-rn 5711  df-res 5712  df-ima 5713  df-ord 6398  df-on 6399  df-lim 6400  df-suc 6401  df-iota 6525  df-fun 6575  df-fn 6576  df-f 6577  df-f1 6578  df-fo 6579  df-f1o 6580  df-fv 6581  df-isom 6582  df-ov 7451  df-oprab 7452  df-mpo 7453  df-om 7904  df-1st 8030  df-2nd 8031  df-1o 8522  df-2o 8523  df-map 8886  df-en 9004  df-dom 9005  df-fin 9007  df-fi 9480  df-topgen 17503  df-ordt 17561  df-top 22921  df-topon 22938  df-bases 22974  df-cn 23256
This theorem is referenced by:  ordthmeo  23831  xrmulc1cn  33876
  Copyright terms: Public domain W3C validator