Theorem ordtrestNEW 31871

Description: The subspace topology of an order topology is in general finer than the topology generated by the restricted order, but we do have inclusion in one direction. (Contributed by Mario Carneiro, 9-Sep-2015.) (Revised by Thierry Arnoux, 11-Sep-2018.)

Hypotheses

Ref	Expression
ordtNEW.b	⊢ 𝐵 = (Base‘𝐾)
ordtNEW.l	⊢ ≤ = ((le‘𝐾) ∩ (𝐵 × 𝐵))

Assertion

Ref	Expression
ordtrestNEW	⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → (ordTop‘( ≤ ∩ (𝐴 × 𝐴))) ⊆ ((ordTop‘ ≤ ) ↾t 𝐴))

Proof of Theorem ordtrestNEW

Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		ordtNEW.l	. . . . 5 ⊢ ≤ = ((le‘𝐾) ∩ (𝐵 × 𝐵))
2		fvex 6787	. . . . . 6 ⊢ (le‘𝐾) ∈ V
3	2	inex1 5241	. . . . 5 ⊢ ((le‘𝐾) ∩ (𝐵 × 𝐵)) ∈ V
4	1, 3	eqeltri 2835	. . . 4 ⊢ ≤ ∈ V
5	4	inex1 5241	. . 3 ⊢ ( ≤ ∩ (𝐴 × 𝐴)) ∈ V
6		eqid 2738	. . . 4 ⊢ dom ( ≤ ∩ (𝐴 × 𝐴)) = dom ( ≤ ∩ (𝐴 × 𝐴))
7		eqid 2738	. . . 4 ⊢ ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥}) = ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥})
8		eqid 2738	. . . 4 ⊢ ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦}) = ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦})
9	6, 7, 8	ordtval 22340	. . 3 ⊢ (( ≤ ∩ (𝐴 × 𝐴)) ∈ V → (ordTop‘( ≤ ∩ (𝐴 × 𝐴))) = (topGen‘(fi‘({dom ( ≤ ∩ (𝐴 × 𝐴))} ∪ (ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥}) ∪ ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦}))))))
10	5, 9	mp1i 13	. 2 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → (ordTop‘( ≤ ∩ (𝐴 × 𝐴))) = (topGen‘(fi‘({dom ( ≤ ∩ (𝐴 × 𝐴))} ∪ (ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥}) ∪ ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦}))))))
11		ordttop 22351	. . . . . 6 ⊢ ( ≤ ∈ V → (ordTop‘ ≤ ) ∈ Top)
12	4, 11	ax-mp 5	. . . . 5 ⊢ (ordTop‘ ≤ ) ∈ Top
13		ordtNEW.b	. . . . . . 7 ⊢ 𝐵 = (Base‘𝐾)
14		fvex 6787	. . . . . . 7 ⊢ (Base‘𝐾) ∈ V
15	13, 14	eqeltri 2835	. . . . . 6 ⊢ 𝐵 ∈ V
16	15	ssex 5245	. . . . 5 ⊢ (𝐴 ⊆ 𝐵 → 𝐴 ∈ V)
17		resttop 22311	. . . . 5 ⊢ (((ordTop‘ ≤ ) ∈ Top ∧ 𝐴 ∈ V) → ((ordTop‘ ≤ ) ↾t 𝐴) ∈ Top)
18	12, 16, 17	sylancr 587	. . . 4 ⊢ (𝐴 ⊆ 𝐵 → ((ordTop‘ ≤ ) ↾t 𝐴) ∈ Top)
19	18	adantl 482	. . 3 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → ((ordTop‘ ≤ ) ↾t 𝐴) ∈ Top)
20	13	ressprs 31241	. . . . . . . . 9 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → (𝐾 ↾s 𝐴) ∈ Proset )
21		eqid 2738	. . . . . . . . . 10 ⊢ (Base‘(𝐾 ↾s 𝐴)) = (Base‘(𝐾 ↾s 𝐴))
22		eqid 2738	. . . . . . . . . 10 ⊢ ((le‘(𝐾 ↾s 𝐴)) ∩ ((Base‘(𝐾 ↾s 𝐴)) × (Base‘(𝐾 ↾s 𝐴)))) = ((le‘(𝐾 ↾s 𝐴)) ∩ ((Base‘(𝐾 ↾s 𝐴)) × (Base‘(𝐾 ↾s 𝐴))))
23	21, 22	prsdm 31864	. . . . . . . . 9 ⊢ ((𝐾 ↾s 𝐴) ∈ Proset → dom ((le‘(𝐾 ↾s 𝐴)) ∩ ((Base‘(𝐾 ↾s 𝐴)) × (Base‘(𝐾 ↾s 𝐴)))) = (Base‘(𝐾 ↾s 𝐴)))
24	20, 23	syl 17	. . . . . . . 8 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → dom ((le‘(𝐾 ↾s 𝐴)) ∩ ((Base‘(𝐾 ↾s 𝐴)) × (Base‘(𝐾 ↾s 𝐴)))) = (Base‘(𝐾 ↾s 𝐴)))
25		eqid 2738	. . . . . . . . . . . . . 14 ⊢ (𝐾 ↾s 𝐴) = (𝐾 ↾s 𝐴)
26	25, 13	ressbas2 16949	. . . . . . . . . . . . 13 ⊢ (𝐴 ⊆ 𝐵 → 𝐴 = (Base‘(𝐾 ↾s 𝐴)))
27		fvex 6787	. . . . . . . . . . . . 13 ⊢ (Base‘(𝐾 ↾s 𝐴)) ∈ V
28	26, 27	eqeltrdi 2847	. . . . . . . . . . . 12 ⊢ (𝐴 ⊆ 𝐵 → 𝐴 ∈ V)
29		eqid 2738	. . . . . . . . . . . . 13 ⊢ (le‘𝐾) = (le‘𝐾)
30	25, 29	ressle 17090	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ V → (le‘𝐾) = (le‘(𝐾 ↾s 𝐴)))
31	28, 30	syl 17	. . . . . . . . . . 11 ⊢ (𝐴 ⊆ 𝐵 → (le‘𝐾) = (le‘(𝐾 ↾s 𝐴)))
32	31	adantl 482	. . . . . . . . . 10 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → (le‘𝐾) = (le‘(𝐾 ↾s 𝐴)))
33	26	adantl 482	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → 𝐴 = (Base‘(𝐾 ↾s 𝐴)))
34	33	sqxpeqd 5621	. . . . . . . . . 10 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → (𝐴 × 𝐴) = ((Base‘(𝐾 ↾s 𝐴)) × (Base‘(𝐾 ↾s 𝐴))))
35	32, 34	ineq12d 4147	. . . . . . . . 9 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → ((le‘𝐾) ∩ (𝐴 × 𝐴)) = ((le‘(𝐾 ↾s 𝐴)) ∩ ((Base‘(𝐾 ↾s 𝐴)) × (Base‘(𝐾 ↾s 𝐴)))))
36	35	dmeqd 5814	. . . . . . . 8 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → dom ((le‘𝐾) ∩ (𝐴 × 𝐴)) = dom ((le‘(𝐾 ↾s 𝐴)) ∩ ((Base‘(𝐾 ↾s 𝐴)) × (Base‘(𝐾 ↾s 𝐴)))))
37	24, 36, 33	3eqtr4d 2788	. . . . . . 7 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → dom ((le‘𝐾) ∩ (𝐴 × 𝐴)) = 𝐴)
38	13, 1	prsss 31866	. . . . . . . 8 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → ( ≤ ∩ (𝐴 × 𝐴)) = ((le‘𝐾) ∩ (𝐴 × 𝐴)))
39	38	dmeqd 5814	. . . . . . 7 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → dom ( ≤ ∩ (𝐴 × 𝐴)) = dom ((le‘𝐾) ∩ (𝐴 × 𝐴)))
40	13, 1	prsdm 31864	. . . . . . . . . 10 ⊢ (𝐾 ∈ Proset → dom ≤ = 𝐵)
41	40	sseq2d 3953	. . . . . . . . 9 ⊢ (𝐾 ∈ Proset → (𝐴 ⊆ dom ≤ ↔ 𝐴 ⊆ 𝐵))
42	41	biimpar 478	. . . . . . . 8 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → 𝐴 ⊆ dom ≤ )
43		sseqin2 4149	. . . . . . . 8 ⊢ (𝐴 ⊆ dom ≤ ↔ (dom ≤ ∩ 𝐴) = 𝐴)
44	42, 43	sylib 217	. . . . . . 7 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → (dom ≤ ∩ 𝐴) = 𝐴)
45	37, 39, 44	3eqtr4d 2788	. . . . . 6 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → dom ( ≤ ∩ (𝐴 × 𝐴)) = (dom ≤ ∩ 𝐴))
46	4, 11	mp1i 13	. . . . . . 7 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → (ordTop‘ ≤ ) ∈ Top)
47	16	adantl 482	. . . . . . 7 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → 𝐴 ∈ V)
48		eqid 2738	. . . . . . . . . 10 ⊢ dom ≤ = dom ≤
49	48	ordttopon 22344	. . . . . . . . 9 ⊢ ( ≤ ∈ V → (ordTop‘ ≤ ) ∈ (TopOn‘dom ≤ ))
50	4, 49	mp1i 13	. . . . . . . 8 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → (ordTop‘ ≤ ) ∈ (TopOn‘dom ≤ ))
51		toponmax 22075	. . . . . . . 8 ⊢ ((ordTop‘ ≤ ) ∈ (TopOn‘dom ≤ ) → dom ≤ ∈ (ordTop‘ ≤ ))
52	50, 51	syl 17	. . . . . . 7 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → dom ≤ ∈ (ordTop‘ ≤ ))
53		elrestr 17139	. . . . . . 7 ⊢ (((ordTop‘ ≤ ) ∈ Top ∧ 𝐴 ∈ V ∧ dom ≤ ∈ (ordTop‘ ≤ )) → (dom ≤ ∩ 𝐴) ∈ ((ordTop‘ ≤ ) ↾t 𝐴))
54	46, 47, 52, 53	syl3anc 1370	. . . . . 6 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → (dom ≤ ∩ 𝐴) ∈ ((ordTop‘ ≤ ) ↾t 𝐴))
55	45, 54	eqeltrd 2839	. . . . 5 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → dom ( ≤ ∩ (𝐴 × 𝐴)) ∈ ((ordTop‘ ≤ ) ↾t 𝐴))
56	55	snssd 4742	. . . 4 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → {dom ( ≤ ∩ (𝐴 × 𝐴))} ⊆ ((ordTop‘ ≤ ) ↾t 𝐴))
57		rabeq 3418	. . . . . . . . 9 ⊢ (dom ( ≤ ∩ (𝐴 × 𝐴)) = (dom ≤ ∩ 𝐴) → {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥} = {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥})
58	45, 57	syl 17	. . . . . . . 8 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥} = {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥})
59	45, 58	mpteq12dv 5165	. . . . . . 7 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥}) = (𝑥 ∈ (dom ≤ ∩ 𝐴) ↦ {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥}))
60	59	rneqd 5847	. . . . . 6 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥}) = ran (𝑥 ∈ (dom ≤ ∩ 𝐴) ↦ {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥}))
61		inrab2 4241	. . . . . . . . . 10 ⊢ ({𝑦 ∈ dom ≤ ∣ ¬ 𝑦 ≤ 𝑥} ∩ 𝐴) = {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑦 ≤ 𝑥}
62		inss2 4163	. . . . . . . . . . . . . 14 ⊢ (dom ≤ ∩ 𝐴) ⊆ 𝐴
63		simpr 485	. . . . . . . . . . . . . 14 ⊢ ((((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) ∧ 𝑦 ∈ (dom ≤ ∩ 𝐴)) → 𝑦 ∈ (dom ≤ ∩ 𝐴))
64	62, 63	sselid 3919	. . . . . . . . . . . . 13 ⊢ ((((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) ∧ 𝑦 ∈ (dom ≤ ∩ 𝐴)) → 𝑦 ∈ 𝐴)
65		simpr 485	. . . . . . . . . . . . . . 15 ⊢ (((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) → 𝑥 ∈ (dom ≤ ∩ 𝐴))
66	62, 65	sselid 3919	. . . . . . . . . . . . . 14 ⊢ (((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) → 𝑥 ∈ 𝐴)
67	66	adantr 481	. . . . . . . . . . . . 13 ⊢ ((((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) ∧ 𝑦 ∈ (dom ≤ ∩ 𝐴)) → 𝑥 ∈ 𝐴)
68		brinxp 5665	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∈ 𝐴 ∧ 𝑥 ∈ 𝐴) → (𝑦 ≤ 𝑥 ↔ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥))
69	64, 67, 68	syl2anc 584	. . . . . . . . . . . 12 ⊢ ((((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) ∧ 𝑦 ∈ (dom ≤ ∩ 𝐴)) → (𝑦 ≤ 𝑥 ↔ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥))
70	69	notbid 318	. . . . . . . . . . 11 ⊢ ((((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) ∧ 𝑦 ∈ (dom ≤ ∩ 𝐴)) → (¬ 𝑦 ≤ 𝑥 ↔ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥))
71	70	rabbidva 3413	. . . . . . . . . 10 ⊢ (((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) → {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑦 ≤ 𝑥} = {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥})
72	61, 71	eqtrid 2790	. . . . . . . . 9 ⊢ (((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) → ({𝑦 ∈ dom ≤ ∣ ¬ 𝑦 ≤ 𝑥} ∩ 𝐴) = {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥})
73	4, 11	mp1i 13	. . . . . . . . . 10 ⊢ (((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) → (ordTop‘ ≤ ) ∈ Top)
74	47	adantr 481	. . . . . . . . . 10 ⊢ (((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) → 𝐴 ∈ V)
75		simpl 483	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → 𝐾 ∈ Proset )
76		inss1 4162	. . . . . . . . . . . 12 ⊢ (dom ≤ ∩ 𝐴) ⊆ dom ≤
77	76	sseli 3917	. . . . . . . . . . 11 ⊢ (𝑥 ∈ (dom ≤ ∩ 𝐴) → 𝑥 ∈ dom ≤ )
78	48	ordtopn1 22345	. . . . . . . . . . . . 13 ⊢ (( ≤ ∈ V ∧ 𝑥 ∈ dom ≤ ) → {𝑦 ∈ dom ≤ ∣ ¬ 𝑦 ≤ 𝑥} ∈ (ordTop‘ ≤ ))
79	4, 78	mpan 687	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ dom ≤ → {𝑦 ∈ dom ≤ ∣ ¬ 𝑦 ≤ 𝑥} ∈ (ordTop‘ ≤ ))
80	79	adantl 482	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ Proset ∧ 𝑥 ∈ dom ≤ ) → {𝑦 ∈ dom ≤ ∣ ¬ 𝑦 ≤ 𝑥} ∈ (ordTop‘ ≤ ))
81	75, 77, 80	syl2an 596	. . . . . . . . . 10 ⊢ (((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) → {𝑦 ∈ dom ≤ ∣ ¬ 𝑦 ≤ 𝑥} ∈ (ordTop‘ ≤ ))
82		elrestr 17139	. . . . . . . . . 10 ⊢ (((ordTop‘ ≤ ) ∈ Top ∧ 𝐴 ∈ V ∧ {𝑦 ∈ dom ≤ ∣ ¬ 𝑦 ≤ 𝑥} ∈ (ordTop‘ ≤ )) → ({𝑦 ∈ dom ≤ ∣ ¬ 𝑦 ≤ 𝑥} ∩ 𝐴) ∈ ((ordTop‘ ≤ ) ↾t 𝐴))
83	73, 74, 81, 82	syl3anc 1370	. . . . . . . . 9 ⊢ (((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) → ({𝑦 ∈ dom ≤ ∣ ¬ 𝑦 ≤ 𝑥} ∩ 𝐴) ∈ ((ordTop‘ ≤ ) ↾t 𝐴))
84	72, 83	eqeltrrd 2840	. . . . . . . 8 ⊢ (((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) → {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥} ∈ ((ordTop‘ ≤ ) ↾t 𝐴))
85	84	fmpttd 6989	. . . . . . 7 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → (𝑥 ∈ (dom ≤ ∩ 𝐴) ↦ {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥}):(dom ≤ ∩ 𝐴)⟶((ordTop‘ ≤ ) ↾t 𝐴))
86	85	frnd 6608	. . . . . 6 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → ran (𝑥 ∈ (dom ≤ ∩ 𝐴) ↦ {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥}) ⊆ ((ordTop‘ ≤ ) ↾t 𝐴))
87	60, 86	eqsstrd 3959	. . . . 5 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥}) ⊆ ((ordTop‘ ≤ ) ↾t 𝐴))
88		rabeq 3418	. . . . . . . . 9 ⊢ (dom ( ≤ ∩ (𝐴 × 𝐴)) = (dom ≤ ∩ 𝐴) → {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦} = {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦})
89	45, 88	syl 17	. . . . . . . 8 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦} = {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦})
90	45, 89	mpteq12dv 5165	. . . . . . 7 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦}) = (𝑥 ∈ (dom ≤ ∩ 𝐴) ↦ {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦}))
91	90	rneqd 5847	. . . . . 6 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦}) = ran (𝑥 ∈ (dom ≤ ∩ 𝐴) ↦ {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦}))
92		inrab2 4241	. . . . . . . . . 10 ⊢ ({𝑦 ∈ dom ≤ ∣ ¬ 𝑥 ≤ 𝑦} ∩ 𝐴) = {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑥 ≤ 𝑦}
93		brinxp 5665	. . . . . . . . . . . . 13 ⊢ ((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) → (𝑥 ≤ 𝑦 ↔ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦))
94	67, 64, 93	syl2anc 584	. . . . . . . . . . . 12 ⊢ ((((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) ∧ 𝑦 ∈ (dom ≤ ∩ 𝐴)) → (𝑥 ≤ 𝑦 ↔ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦))
95	94	notbid 318	. . . . . . . . . . 11 ⊢ ((((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) ∧ 𝑦 ∈ (dom ≤ ∩ 𝐴)) → (¬ 𝑥 ≤ 𝑦 ↔ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦))
96	95	rabbidva 3413	. . . . . . . . . 10 ⊢ (((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) → {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑥 ≤ 𝑦} = {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦})
97	92, 96	eqtrid 2790	. . . . . . . . 9 ⊢ (((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) → ({𝑦 ∈ dom ≤ ∣ ¬ 𝑥 ≤ 𝑦} ∩ 𝐴) = {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦})
98	48	ordtopn2 22346	. . . . . . . . . . . . 13 ⊢ (( ≤ ∈ V ∧ 𝑥 ∈ dom ≤ ) → {𝑦 ∈ dom ≤ ∣ ¬ 𝑥 ≤ 𝑦} ∈ (ordTop‘ ≤ ))
99	4, 98	mpan 687	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ dom ≤ → {𝑦 ∈ dom ≤ ∣ ¬ 𝑥 ≤ 𝑦} ∈ (ordTop‘ ≤ ))
100	99	adantl 482	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ Proset ∧ 𝑥 ∈ dom ≤ ) → {𝑦 ∈ dom ≤ ∣ ¬ 𝑥 ≤ 𝑦} ∈ (ordTop‘ ≤ ))
101	75, 77, 100	syl2an 596	. . . . . . . . . 10 ⊢ (((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) → {𝑦 ∈ dom ≤ ∣ ¬ 𝑥 ≤ 𝑦} ∈ (ordTop‘ ≤ ))
102		elrestr 17139	. . . . . . . . . 10 ⊢ (((ordTop‘ ≤ ) ∈ Top ∧ 𝐴 ∈ V ∧ {𝑦 ∈ dom ≤ ∣ ¬ 𝑥 ≤ 𝑦} ∈ (ordTop‘ ≤ )) → ({𝑦 ∈ dom ≤ ∣ ¬ 𝑥 ≤ 𝑦} ∩ 𝐴) ∈ ((ordTop‘ ≤ ) ↾t 𝐴))
103	73, 74, 101, 102	syl3anc 1370	. . . . . . . . 9 ⊢ (((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) → ({𝑦 ∈ dom ≤ ∣ ¬ 𝑥 ≤ 𝑦} ∩ 𝐴) ∈ ((ordTop‘ ≤ ) ↾t 𝐴))
104	97, 103	eqeltrrd 2840	. . . . . . . 8 ⊢ (((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) → {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦} ∈ ((ordTop‘ ≤ ) ↾t 𝐴))
105	104	fmpttd 6989	. . . . . . 7 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → (𝑥 ∈ (dom ≤ ∩ 𝐴) ↦ {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦}):(dom ≤ ∩ 𝐴)⟶((ordTop‘ ≤ ) ↾t 𝐴))
106	105	frnd 6608	. . . . . 6 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → ran (𝑥 ∈ (dom ≤ ∩ 𝐴) ↦ {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦}) ⊆ ((ordTop‘ ≤ ) ↾t 𝐴))
107	91, 106	eqsstrd 3959	. . . . 5 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦}) ⊆ ((ordTop‘ ≤ ) ↾t 𝐴))
108	87, 107	unssd 4120	. . . 4 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → (ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥}) ∪ ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦})) ⊆ ((ordTop‘ ≤ ) ↾t 𝐴))
109	56, 108	unssd 4120	. . 3 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → ({dom ( ≤ ∩ (𝐴 × 𝐴))} ∪ (ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥}) ∪ ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦}))) ⊆ ((ordTop‘ ≤ ) ↾t 𝐴))
110		tgfiss 22141	. . 3 ⊢ ((((ordTop‘ ≤ ) ↾t 𝐴) ∈ Top ∧ ({dom ( ≤ ∩ (𝐴 × 𝐴))} ∪ (ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥}) ∪ ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦}))) ⊆ ((ordTop‘ ≤ ) ↾t 𝐴)) → (topGen‘(fi‘({dom ( ≤ ∩ (𝐴 × 𝐴))} ∪ (ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥}) ∪ ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦}))))) ⊆ ((ordTop‘ ≤ ) ↾t 𝐴))
111	19, 109, 110	syl2anc 584	. 2 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → (topGen‘(fi‘({dom ( ≤ ∩ (𝐴 × 𝐴))} ∪ (ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥}) ∪ ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦}))))) ⊆ ((ordTop‘ ≤ ) ↾t 𝐴))
112	10, 111	eqsstrd 3959	1 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → (ordTop‘( ≤ ∩ (𝐴 × 𝐴))) ⊆ ((ordTop‘ ≤ ) ↾t 𝐴))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 205   ∧ wa 396   = wceq 1539   ∈ wcel 2106  {crab 3068  Vcvv 3432   ∪ cun 3885   ∩ cin 3886   ⊆ wss 3887  {csn 4561   class class class wbr 5074   ↦ cmpt 5157   × cxp 5587  dom cdm 5589  ran crn 5590  ‘cfv 6433  (class class class)co 7275  ficfi 9169  Basecbs 16912   ↾_s cress 16941  lecple 16969   ↾_t crest 17131  topGenctg 17148  ordTopcordt 17210   Proset cproset 18011  Topctop 22042  TopOnctopon 22059

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2709  ax-rep 5209  ax-sep 5223  ax-nul 5230  ax-pow 5288  ax-pr 5352  ax-un 7588  ax-cnex 10927  ax-resscn 10928  ax-1cn 10929  ax-icn 10930  ax-addcl 10931  ax-addrcl 10932  ax-mulcl 10933  ax-mulrcl 10934  ax-mulcom 10935  ax-addass 10936  ax-mulass 10937  ax-distr 10938  ax-i2m1 10939  ax-1ne0 10940  ax-1rid 10941  ax-rnegex 10942  ax-rrecex 10943  ax-cnre 10944  ax-pre-lttri 10945  ax-pre-lttrn 10946  ax-pre-ltadd 10947  ax-pre-mulgt0 10948

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3or 1087  df-3an 1088  df-tru 1542  df-fal 1552  df-ex 1783  df-nf 1787  df-sb 2068  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2816  df-nfc 2889  df-ne 2944  df-nel 3050  df-ral 3069  df-rex 3070  df-reu 3072  df-rab 3073  df-v 3434  df-sbc 3717  df-csb 3833  df-dif 3890  df-un 3892  df-in 3894  df-ss 3904  df-pss 3906  df-nul 4257  df-if 4460  df-pw 4535  df-sn 4562  df-pr 4564  df-op 4568  df-uni 4840  df-int 4880  df-iun 4926  df-br 5075  df-opab 5137  df-mpt 5158  df-tr 5192  df-id 5489  df-eprel 5495  df-po 5503  df-so 5504  df-fr 5544  df-we 5546  df-xp 5595  df-rel 5596  df-cnv 5597  df-co 5598  df-dm 5599  df-rn 5600  df-res 5601  df-ima 5602  df-pred 6202  df-ord 6269  df-on 6270  df-lim 6271  df-suc 6272  df-iota 6391  df-fun 6435  df-fn 6436  df-f 6437  df-f1 6438  df-fo 6439  df-f1o 6440  df-fv 6441  df-riota 7232  df-ov 7278  df-oprab 7279  df-mpo 7280  df-om 7713  df-1st 7831  df-2nd 7832  df-frecs 8097  df-wrecs 8128  df-recs 8202  df-rdg 8241  df-1o 8297  df-er 8498  df-en 8734  df-dom 8735  df-sdom 8736  df-fin 8737  df-fi 9170  df-pnf 11011  df-mnf 11012  df-xr 11013  df-ltxr 11014  df-le 11015  df-sub 11207  df-neg 11208  df-nn 11974  df-2 12036  df-3 12037  df-4 12038  df-5 12039  df-6 12040  df-7 12041  df-8 12042  df-9 12043  df-dec 12438  df-sets 16865  df-slot 16883  df-ndx 16895  df-base 16913  df-ress 16942  df-ple 16982  df-rest 17133  df-topgen 17154  df-ordt 17212  df-proset 18013  df-top 22043  df-topon 22060  df-bases 22096

This theorem is referenced by:  ordtrest2NEW  31873