Theorem ordtrestNEW 31850

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 6781	. . . . . 6 ⊢ (le‘𝐾) ∈ V
3	2	inex1 5244	. . . . 5 ⊢ ((le‘𝐾) ∩ (𝐵 × 𝐵)) ∈ V
4	1, 3	eqeltri 2836	. . . 4 ⊢ ≤ ∈ V
5	4	inex1 5244	. . 3 ⊢ ( ≤ ∩ (𝐴 × 𝐴)) ∈ V
6		eqid 2739	. . . 4 ⊢ dom ( ≤ ∩ (𝐴 × 𝐴)) = dom ( ≤ ∩ (𝐴 × 𝐴))
7		eqid 2739	. . . 4 ⊢ ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥}) = ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥})
8		eqid 2739	. . . 4 ⊢ ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦}) = ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦})
9	6, 7, 8	ordtval 22321	. . 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 22332	. . . . . 6 ⊢ ( ≤ ∈ V → (ordTop‘ ≤ ) ∈ Top)
12	4, 11	ax-mp 5	. . . . 5 ⊢ (ordTop‘ ≤ ) ∈ Top
13		ordtNEW.b	. . . . . . 7 ⊢ 𝐵 = (Base‘𝐾)
14		fvex 6781	. . . . . . 7 ⊢ (Base‘𝐾) ∈ V
15	13, 14	eqeltri 2836	. . . . . 6 ⊢ 𝐵 ∈ V
16	15	ssex 5248	. . . . 5 ⊢ (𝐴 ⊆ 𝐵 → 𝐴 ∈ V)
17		resttop 22292	. . . . 5 ⊢ (((ordTop‘ ≤ ) ∈ Top ∧ 𝐴 ∈ V) → ((ordTop‘ ≤ ) ↾t 𝐴) ∈ Top)
18	12, 16, 17	sylancr 586	. . . 4 ⊢ (𝐴 ⊆ 𝐵 → ((ordTop‘ ≤ ) ↾t 𝐴) ∈ Top)
19	18	adantl 481	. . 3 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → ((ordTop‘ ≤ ) ↾t 𝐴) ∈ Top)
20	13	ressprs 31220	. . . . . . . . 9 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → (𝐾 ↾s 𝐴) ∈ Proset )
21		eqid 2739	. . . . . . . . . 10 ⊢ (Base‘(𝐾 ↾s 𝐴)) = (Base‘(𝐾 ↾s 𝐴))
22		eqid 2739	. . . . . . . . . 10 ⊢ ((le‘(𝐾 ↾s 𝐴)) ∩ ((Base‘(𝐾 ↾s 𝐴)) × (Base‘(𝐾 ↾s 𝐴)))) = ((le‘(𝐾 ↾s 𝐴)) ∩ ((Base‘(𝐾 ↾s 𝐴)) × (Base‘(𝐾 ↾s 𝐴))))
23	21, 22	prsdm 31843	. . . . . . . . 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 2739	. . . . . . . . . . . . . 14 ⊢ (𝐾 ↾s 𝐴) = (𝐾 ↾s 𝐴)
26	25, 13	ressbas2 16930	. . . . . . . . . . . . 13 ⊢ (𝐴 ⊆ 𝐵 → 𝐴 = (Base‘(𝐾 ↾s 𝐴)))
27		fvex 6781	. . . . . . . . . . . . 13 ⊢ (Base‘(𝐾 ↾s 𝐴)) ∈ V
28	26, 27	eqeltrdi 2848	. . . . . . . . . . . 12 ⊢ (𝐴 ⊆ 𝐵 → 𝐴 ∈ V)
29		eqid 2739	. . . . . . . . . . . . 13 ⊢ (le‘𝐾) = (le‘𝐾)
30	25, 29	ressle 17071	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ V → (le‘𝐾) = (le‘(𝐾 ↾s 𝐴)))
31	28, 30	syl 17	. . . . . . . . . . 11 ⊢ (𝐴 ⊆ 𝐵 → (le‘𝐾) = (le‘(𝐾 ↾s 𝐴)))
32	31	adantl 481	. . . . . . . . . 10 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → (le‘𝐾) = (le‘(𝐾 ↾s 𝐴)))
33	26	adantl 481	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → 𝐴 = (Base‘(𝐾 ↾s 𝐴)))
34	33	sqxpeqd 5620	. . . . . . . . . 10 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → (𝐴 × 𝐴) = ((Base‘(𝐾 ↾s 𝐴)) × (Base‘(𝐾 ↾s 𝐴))))
35	32, 34	ineq12d 4152	. . . . . . . . 9 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → ((le‘𝐾) ∩ (𝐴 × 𝐴)) = ((le‘(𝐾 ↾s 𝐴)) ∩ ((Base‘(𝐾 ↾s 𝐴)) × (Base‘(𝐾 ↾s 𝐴)))))
36	35	dmeqd 5811	. . . . . . . 8 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → dom ((le‘𝐾) ∩ (𝐴 × 𝐴)) = dom ((le‘(𝐾 ↾s 𝐴)) ∩ ((Base‘(𝐾 ↾s 𝐴)) × (Base‘(𝐾 ↾s 𝐴)))))
37	24, 36, 33	3eqtr4d 2789	. . . . . . 7 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → dom ((le‘𝐾) ∩ (𝐴 × 𝐴)) = 𝐴)
38	13, 1	prsss 31845	. . . . . . . 8 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → ( ≤ ∩ (𝐴 × 𝐴)) = ((le‘𝐾) ∩ (𝐴 × 𝐴)))
39	38	dmeqd 5811	. . . . . . 7 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → dom ( ≤ ∩ (𝐴 × 𝐴)) = dom ((le‘𝐾) ∩ (𝐴 × 𝐴)))
40	13, 1	prsdm 31843	. . . . . . . . . 10 ⊢ (𝐾 ∈ Proset → dom ≤ = 𝐵)
41	40	sseq2d 3957	. . . . . . . . 9 ⊢ (𝐾 ∈ Proset → (𝐴 ⊆ dom ≤ ↔ 𝐴 ⊆ 𝐵))
42	41	biimpar 477	. . . . . . . 8 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → 𝐴 ⊆ dom ≤ )
43		sseqin2 4154	. . . . . . . 8 ⊢ (𝐴 ⊆ dom ≤ ↔ (dom ≤ ∩ 𝐴) = 𝐴)
44	42, 43	sylib 217	. . . . . . 7 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → (dom ≤ ∩ 𝐴) = 𝐴)
45	37, 39, 44	3eqtr4d 2789	. . . . . 6 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → dom ( ≤ ∩ (𝐴 × 𝐴)) = (dom ≤ ∩ 𝐴))
46	4, 11	mp1i 13	. . . . . . 7 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → (ordTop‘ ≤ ) ∈ Top)
47	16	adantl 481	. . . . . . 7 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → 𝐴 ∈ V)
48		eqid 2739	. . . . . . . . . 10 ⊢ dom ≤ = dom ≤
49	48	ordttopon 22325	. . . . . . . . 9 ⊢ ( ≤ ∈ V → (ordTop‘ ≤ ) ∈ (TopOn‘dom ≤ ))
50	4, 49	mp1i 13	. . . . . . . 8 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → (ordTop‘ ≤ ) ∈ (TopOn‘dom ≤ ))
51		toponmax 22056	. . . . . . . 8 ⊢ ((ordTop‘ ≤ ) ∈ (TopOn‘dom ≤ ) → dom ≤ ∈ (ordTop‘ ≤ ))
52	50, 51	syl 17	. . . . . . 7 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → dom ≤ ∈ (ordTop‘ ≤ ))
53		elrestr 17120	. . . . . . 7 ⊢ (((ordTop‘ ≤ ) ∈ Top ∧ 𝐴 ∈ V ∧ dom ≤ ∈ (ordTop‘ ≤ )) → (dom ≤ ∩ 𝐴) ∈ ((ordTop‘ ≤ ) ↾t 𝐴))
54	46, 47, 52, 53	syl3anc 1369	. . . . . 6 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → (dom ≤ ∩ 𝐴) ∈ ((ordTop‘ ≤ ) ↾t 𝐴))
55	45, 54	eqeltrd 2840	. . . . 5 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → dom ( ≤ ∩ (𝐴 × 𝐴)) ∈ ((ordTop‘ ≤ ) ↾t 𝐴))
56	55	snssd 4747	. . . 4 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → {dom ( ≤ ∩ (𝐴 × 𝐴))} ⊆ ((ordTop‘ ≤ ) ↾t 𝐴))
57		rabeq 3416	. . . . . . . . 9 ⊢ (dom ( ≤ ∩ (𝐴 × 𝐴)) = (dom ≤ ∩ 𝐴) → {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥} = {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥})
58	45, 57	syl 17	. . . . . . . 8 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥} = {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥})
59	45, 58	mpteq12dv 5169	. . . . . . 7 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥}) = (𝑥 ∈ (dom ≤ ∩ 𝐴) ↦ {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥}))
60	59	rneqd 5844	. . . . . 6 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥}) = ran (𝑥 ∈ (dom ≤ ∩ 𝐴) ↦ {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥}))
61		inrab2 4246	. . . . . . . . . 10 ⊢ ({𝑦 ∈ dom ≤ ∣ ¬ 𝑦 ≤ 𝑥} ∩ 𝐴) = {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑦 ≤ 𝑥}
62		inss2 4168	. . . . . . . . . . . . . 14 ⊢ (dom ≤ ∩ 𝐴) ⊆ 𝐴
63		simpr 484	. . . . . . . . . . . . . 14 ⊢ ((((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) ∧ 𝑦 ∈ (dom ≤ ∩ 𝐴)) → 𝑦 ∈ (dom ≤ ∩ 𝐴))
64	62, 63	sselid 3923	. . . . . . . . . . . . 13 ⊢ ((((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) ∧ 𝑦 ∈ (dom ≤ ∩ 𝐴)) → 𝑦 ∈ 𝐴)
65		simpr 484	. . . . . . . . . . . . . . 15 ⊢ (((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) → 𝑥 ∈ (dom ≤ ∩ 𝐴))
66	62, 65	sselid 3923	. . . . . . . . . . . . . 14 ⊢ (((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) → 𝑥 ∈ 𝐴)
67	66	adantr 480	. . . . . . . . . . . . 13 ⊢ ((((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) ∧ 𝑦 ∈ (dom ≤ ∩ 𝐴)) → 𝑥 ∈ 𝐴)
68		brinxp 5664	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∈ 𝐴 ∧ 𝑥 ∈ 𝐴) → (𝑦 ≤ 𝑥 ↔ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥))
69	64, 67, 68	syl2anc 583	. . . . . . . . . . . 12 ⊢ ((((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) ∧ 𝑦 ∈ (dom ≤ ∩ 𝐴)) → (𝑦 ≤ 𝑥 ↔ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥))
70	69	notbid 317	. . . . . . . . . . 11 ⊢ ((((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) ∧ 𝑦 ∈ (dom ≤ ∩ 𝐴)) → (¬ 𝑦 ≤ 𝑥 ↔ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥))
71	70	rabbidva 3410	. . . . . . . . . 10 ⊢ (((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) → {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑦 ≤ 𝑥} = {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥})
72	61, 71	eqtrid 2791	. . . . . . . . 9 ⊢ (((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) → ({𝑦 ∈ dom ≤ ∣ ¬ 𝑦 ≤ 𝑥} ∩ 𝐴) = {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥})
73	4, 11	mp1i 13	. . . . . . . . . 10 ⊢ (((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) → (ordTop‘ ≤ ) ∈ Top)
74	47	adantr 480	. . . . . . . . . 10 ⊢ (((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) → 𝐴 ∈ V)
75		simpl 482	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → 𝐾 ∈ Proset )
76		inss1 4167	. . . . . . . . . . . 12 ⊢ (dom ≤ ∩ 𝐴) ⊆ dom ≤
77	76	sseli 3921	. . . . . . . . . . 11 ⊢ (𝑥 ∈ (dom ≤ ∩ 𝐴) → 𝑥 ∈ dom ≤ )
78	48	ordtopn1 22326	. . . . . . . . . . . . 13 ⊢ (( ≤ ∈ V ∧ 𝑥 ∈ dom ≤ ) → {𝑦 ∈ dom ≤ ∣ ¬ 𝑦 ≤ 𝑥} ∈ (ordTop‘ ≤ ))
79	4, 78	mpan 686	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ dom ≤ → {𝑦 ∈ dom ≤ ∣ ¬ 𝑦 ≤ 𝑥} ∈ (ordTop‘ ≤ ))
80	79	adantl 481	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ Proset ∧ 𝑥 ∈ dom ≤ ) → {𝑦 ∈ dom ≤ ∣ ¬ 𝑦 ≤ 𝑥} ∈ (ordTop‘ ≤ ))
81	75, 77, 80	syl2an 595	. . . . . . . . . 10 ⊢ (((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) → {𝑦 ∈ dom ≤ ∣ ¬ 𝑦 ≤ 𝑥} ∈ (ordTop‘ ≤ ))
82		elrestr 17120	. . . . . . . . . 10 ⊢ (((ordTop‘ ≤ ) ∈ Top ∧ 𝐴 ∈ V ∧ {𝑦 ∈ dom ≤ ∣ ¬ 𝑦 ≤ 𝑥} ∈ (ordTop‘ ≤ )) → ({𝑦 ∈ dom ≤ ∣ ¬ 𝑦 ≤ 𝑥} ∩ 𝐴) ∈ ((ordTop‘ ≤ ) ↾t 𝐴))
83	73, 74, 81, 82	syl3anc 1369	. . . . . . . . 9 ⊢ (((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) → ({𝑦 ∈ dom ≤ ∣ ¬ 𝑦 ≤ 𝑥} ∩ 𝐴) ∈ ((ordTop‘ ≤ ) ↾t 𝐴))
84	72, 83	eqeltrrd 2841	. . . . . . . 8 ⊢ (((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) → {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥} ∈ ((ordTop‘ ≤ ) ↾t 𝐴))
85	84	fmpttd 6983	. . . . . . 7 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → (𝑥 ∈ (dom ≤ ∩ 𝐴) ↦ {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥}):(dom ≤ ∩ 𝐴)⟶((ordTop‘ ≤ ) ↾t 𝐴))
86	85	frnd 6604	. . . . . 6 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → ran (𝑥 ∈ (dom ≤ ∩ 𝐴) ↦ {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥}) ⊆ ((ordTop‘ ≤ ) ↾t 𝐴))
87	60, 86	eqsstrd 3963	. . . . 5 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥}) ⊆ ((ordTop‘ ≤ ) ↾t 𝐴))
88		rabeq 3416	. . . . . . . . 9 ⊢ (dom ( ≤ ∩ (𝐴 × 𝐴)) = (dom ≤ ∩ 𝐴) → {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦} = {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦})
89	45, 88	syl 17	. . . . . . . 8 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦} = {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦})
90	45, 89	mpteq12dv 5169	. . . . . . 7 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦}) = (𝑥 ∈ (dom ≤ ∩ 𝐴) ↦ {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦}))
91	90	rneqd 5844	. . . . . 6 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦}) = ran (𝑥 ∈ (dom ≤ ∩ 𝐴) ↦ {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦}))
92		inrab2 4246	. . . . . . . . . 10 ⊢ ({𝑦 ∈ dom ≤ ∣ ¬ 𝑥 ≤ 𝑦} ∩ 𝐴) = {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑥 ≤ 𝑦}
93		brinxp 5664	. . . . . . . . . . . . 13 ⊢ ((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) → (𝑥 ≤ 𝑦 ↔ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦))
94	67, 64, 93	syl2anc 583	. . . . . . . . . . . 12 ⊢ ((((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) ∧ 𝑦 ∈ (dom ≤ ∩ 𝐴)) → (𝑥 ≤ 𝑦 ↔ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦))
95	94	notbid 317	. . . . . . . . . . 11 ⊢ ((((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) ∧ 𝑦 ∈ (dom ≤ ∩ 𝐴)) → (¬ 𝑥 ≤ 𝑦 ↔ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦))
96	95	rabbidva 3410	. . . . . . . . . 10 ⊢ (((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) → {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑥 ≤ 𝑦} = {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦})
97	92, 96	eqtrid 2791	. . . . . . . . 9 ⊢ (((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) → ({𝑦 ∈ dom ≤ ∣ ¬ 𝑥 ≤ 𝑦} ∩ 𝐴) = {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦})
98	48	ordtopn2 22327	. . . . . . . . . . . . 13 ⊢ (( ≤ ∈ V ∧ 𝑥 ∈ dom ≤ ) → {𝑦 ∈ dom ≤ ∣ ¬ 𝑥 ≤ 𝑦} ∈ (ordTop‘ ≤ ))
99	4, 98	mpan 686	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ dom ≤ → {𝑦 ∈ dom ≤ ∣ ¬ 𝑥 ≤ 𝑦} ∈ (ordTop‘ ≤ ))
100	99	adantl 481	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ Proset ∧ 𝑥 ∈ dom ≤ ) → {𝑦 ∈ dom ≤ ∣ ¬ 𝑥 ≤ 𝑦} ∈ (ordTop‘ ≤ ))
101	75, 77, 100	syl2an 595	. . . . . . . . . 10 ⊢ (((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) → {𝑦 ∈ dom ≤ ∣ ¬ 𝑥 ≤ 𝑦} ∈ (ordTop‘ ≤ ))
102		elrestr 17120	. . . . . . . . . 10 ⊢ (((ordTop‘ ≤ ) ∈ Top ∧ 𝐴 ∈ V ∧ {𝑦 ∈ dom ≤ ∣ ¬ 𝑥 ≤ 𝑦} ∈ (ordTop‘ ≤ )) → ({𝑦 ∈ dom ≤ ∣ ¬ 𝑥 ≤ 𝑦} ∩ 𝐴) ∈ ((ordTop‘ ≤ ) ↾t 𝐴))
103	73, 74, 101, 102	syl3anc 1369	. . . . . . . . 9 ⊢ (((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) → ({𝑦 ∈ dom ≤ ∣ ¬ 𝑥 ≤ 𝑦} ∩ 𝐴) ∈ ((ordTop‘ ≤ ) ↾t 𝐴))
104	97, 103	eqeltrrd 2841	. . . . . . . 8 ⊢ (((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) ∧ 𝑥 ∈ (dom ≤ ∩ 𝐴)) → {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦} ∈ ((ordTop‘ ≤ ) ↾t 𝐴))
105	104	fmpttd 6983	. . . . . . 7 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → (𝑥 ∈ (dom ≤ ∩ 𝐴) ↦ {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦}):(dom ≤ ∩ 𝐴)⟶((ordTop‘ ≤ ) ↾t 𝐴))
106	105	frnd 6604	. . . . . 6 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → ran (𝑥 ∈ (dom ≤ ∩ 𝐴) ↦ {𝑦 ∈ (dom ≤ ∩ 𝐴) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦}) ⊆ ((ordTop‘ ≤ ) ↾t 𝐴))
107	91, 106	eqsstrd 3963	. . . . 5 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦}) ⊆ ((ordTop‘ ≤ ) ↾t 𝐴))
108	87, 107	unssd 4124	. . . 4 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → (ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥}) ∪ ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦})) ⊆ ((ordTop‘ ≤ ) ↾t 𝐴))
109	56, 108	unssd 4124	. . 3 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → ({dom ( ≤ ∩ (𝐴 × 𝐴))} ∪ (ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥}) ∪ ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦}))) ⊆ ((ordTop‘ ≤ ) ↾t 𝐴))
110		tgfiss 22122	. . 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 583	. 2 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → (topGen‘(fi‘({dom ( ≤ ∩ (𝐴 × 𝐴))} ∪ (ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑦( ≤ ∩ (𝐴 × 𝐴))𝑥}) ∪ ran (𝑥 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ↦ {𝑦 ∈ dom ( ≤ ∩ (𝐴 × 𝐴)) ∣ ¬ 𝑥( ≤ ∩ (𝐴 × 𝐴))𝑦}))))) ⊆ ((ordTop‘ ≤ ) ↾t 𝐴))
112	10, 111	eqsstrd 3963	1 ⊢ ((𝐾 ∈ Proset ∧ 𝐴 ⊆ 𝐵) → (ordTop‘( ≤ ∩ (𝐴 × 𝐴))) ⊆ ((ordTop‘ ≤ ) ↾t 𝐴))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 205   ∧ wa 395   = wceq 1541   ∈ wcel 2109  {crab 3069  Vcvv 3430   ∪ cun 3889   ∩ cin 3890   ⊆ wss 3891  {csn 4566   class class class wbr 5078   ↦ cmpt 5161   × cxp 5586  dom cdm 5588  ran crn 5589  ‘cfv 6430  (class class class)co 7268  ficfi 9130  Basecbs 16893   ↾_s cress 16922  lecple 16950   ↾_t crest 17112  topGenctg 17129  ordTopcordt 17191   Proset cproset 17992  Topctop 22023  TopOnctopon 22040

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1801  ax-4 1815  ax-5 1916  ax-6 1974  ax-7 2014  ax-8 2111  ax-9 2119  ax-10 2140  ax-11 2157  ax-12 2174  ax-ext 2710  ax-rep 5213  ax-sep 5226  ax-nul 5233  ax-pow 5291  ax-pr 5355  ax-un 7579  ax-cnex 10911  ax-resscn 10912  ax-1cn 10913  ax-icn 10914  ax-addcl 10915  ax-addrcl 10916  ax-mulcl 10917  ax-mulrcl 10918  ax-mulcom 10919  ax-addass 10920  ax-mulass 10921  ax-distr 10922  ax-i2m1 10923  ax-1ne0 10924  ax-1rid 10925  ax-rnegex 10926  ax-rrecex 10927  ax-cnre 10928  ax-pre-lttri 10929  ax-pre-lttrn 10930  ax-pre-ltadd 10931  ax-pre-mulgt0 10932

This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-3or 1086  df-3an 1087  df-tru 1544  df-fal 1554  df-ex 1786  df-nf 1790  df-sb 2071  df-mo 2541  df-eu 2570  df-clab 2717  df-cleq 2731  df-clel 2817  df-nfc 2890  df-ne 2945  df-nel 3051  df-ral 3070  df-rex 3071  df-reu 3072  df-rab 3074  df-v 3432  df-sbc 3720  df-csb 3837  df-dif 3894  df-un 3896  df-in 3898  df-ss 3908  df-pss 3910  df-nul 4262  df-if 4465  df-pw 4540  df-sn 4567  df-pr 4569  df-tp 4571  df-op 4573  df-uni 4845  df-int 4885  df-iun 4931  df-br 5079  df-opab 5141  df-mpt 5162  df-tr 5196  df-id 5488  df-eprel 5494  df-po 5502  df-so 5503  df-fr 5543  df-we 5545  df-xp 5594  df-rel 5595  df-cnv 5596  df-co 5597  df-dm 5598  df-rn 5599  df-res 5600  df-ima 5601  df-pred 6199  df-ord 6266  df-on 6267  df-lim 6268  df-suc 6269  df-iota 6388  df-fun 6432  df-fn 6433  df-f 6434  df-f1 6435  df-fo 6436  df-f1o 6437  df-fv 6438  df-riota 7225  df-ov 7271  df-oprab 7272  df-mpo 7273  df-om 7701  df-1st 7817  df-2nd 7818  df-frecs 8081  df-wrecs 8112  df-recs 8186  df-rdg 8225  df-1o 8281  df-er 8472  df-en 8708  df-dom 8709  df-sdom 8710  df-fin 8711  df-fi 9131  df-pnf 10995  df-mnf 10996  df-xr 10997  df-ltxr 10998  df-le 10999  df-sub 11190  df-neg 11191  df-nn 11957  df-2 12019  df-3 12020  df-4 12021  df-5 12022  df-6 12023  df-7 12024  df-8 12025  df-9 12026  df-dec 12420  df-sets 16846  df-slot 16864  df-ndx 16876  df-base 16894  df-ress 16923  df-ple 16963  df-rest 17114  df-topgen 17135  df-ordt 17193  df-proset 17994  df-top 22024  df-topon 22041  df-bases 22077

This theorem is referenced by:  ordtrest2NEW  31852