dibintclN - Mathbox for Norm Megill

	Mathbox for Norm Megill		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > dibintclN		Structured version Visualization version GIF version

Theorem dibintclN 39188

Description: The intersection of partial isomorphism B closed subspaces is a closed subspace. (Contributed by NM, 8-Mar-2014.) (New usage is discouraged.)

**Hypotheses**
Ref	Expression
dibintcl.h	⊢ 𝐻 = (LHyp‘𝐾)
dibintcl.i	⊢ 𝐼 = ((DIsoB‘𝐾)‘𝑊)

**Assertion**
Ref	Expression
dibintclN	⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → ∩ 𝑆 ∈ ran 𝐼)

Proof of Theorem dibintclN Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		dibintcl.h	. . . . . . . 8 ⊢ 𝐻 = (LHyp‘𝐾)
2		dibintcl.i	. . . . . . . 8 ⊢ 𝐼 = ((DIsoB‘𝐾)‘𝑊)
3	1, 2	dibf11N 39182	. . . . . . 7 ⊢ ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) → 𝐼:dom 𝐼–1-1-onto→ran 𝐼)
4	3	adantr 481	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → 𝐼:dom 𝐼–1-1-onto→ran 𝐼)
5		f1ofn 6726	. . . . . 6 ⊢ (𝐼:dom 𝐼–1-1-onto→ran 𝐼 → 𝐼 Fn dom 𝐼)
6	4, 5	syl 17	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → 𝐼 Fn dom 𝐼)
7		cnvimass 5992	. . . . 5 ⊢ (^◡𝐼 “ 𝑆) ⊆ dom 𝐼
8		fnssres 6564	. . . . 5 ⊢ ((𝐼 Fn dom 𝐼 ∧ (^◡𝐼 “ 𝑆) ⊆ dom 𝐼) → (𝐼 ↾ (^◡𝐼 “ 𝑆)) Fn (^◡𝐼 “ 𝑆))
9	6, 7, 8	sylancl 586	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → (𝐼 ↾ (^◡𝐼 “ 𝑆)) Fn (^◡𝐼 “ 𝑆))
10		fniinfv 6855	. . . 4 ⊢ ((𝐼 ↾ (^◡𝐼 “ 𝑆)) Fn (^◡𝐼 “ 𝑆) → ∩ 𝑦 ∈ (^◡𝐼 “ 𝑆)((𝐼 ↾ (^◡𝐼 “ 𝑆))‘𝑦) = ∩ ran (𝐼 ↾ (^◡𝐼 “ 𝑆)))
11	9, 10	syl 17	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → ∩ 𝑦 ∈ (^◡𝐼 “ 𝑆)((𝐼 ↾ (^◡𝐼 “ 𝑆))‘𝑦) = ∩ ran (𝐼 ↾ (^◡𝐼 “ 𝑆)))
12		df-ima 5603	. . . . 5 ⊢ (𝐼 “ (^◡𝐼 “ 𝑆)) = ran (𝐼 ↾ (^◡𝐼 “ 𝑆))
13		f1ofo 6732	. . . . . . . 8 ⊢ (𝐼:dom 𝐼–1-1-onto→ran 𝐼 → 𝐼:dom 𝐼–onto→ran 𝐼)
14	3, 13	syl 17	. . . . . . 7 ⊢ ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) → 𝐼:dom 𝐼–onto→ran 𝐼)
15	14	adantr 481	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → 𝐼:dom 𝐼–onto→ran 𝐼)
16		simprl 768	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → 𝑆 ⊆ ran 𝐼)
17		foimacnv 6742	. . . . . 6 ⊢ ((𝐼:dom 𝐼–onto→ran 𝐼 ∧ 𝑆 ⊆ ran 𝐼) → (𝐼 “ (^◡𝐼 “ 𝑆)) = 𝑆)
18	15, 16, 17	syl2anc 584	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → (𝐼 “ (^◡𝐼 “ 𝑆)) = 𝑆)
19	12, 18	eqtr3id 2793	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → ran (𝐼 ↾ (^◡𝐼 “ 𝑆)) = 𝑆)
20	19	inteqd 4885	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → ∩ ran (𝐼 ↾ (^◡𝐼 “ 𝑆)) = ∩ 𝑆)
21	11, 20	eqtrd 2779	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → ∩ 𝑦 ∈ (^◡𝐼 “ 𝑆)((𝐼 ↾ (^◡𝐼 “ 𝑆))‘𝑦) = ∩ 𝑆)
22		simpl 483	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
23	7	a1i 11	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → (^◡𝐼 “ 𝑆) ⊆ dom 𝐼)
24		simprr 770	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → 𝑆 ≠ ∅)
25		n0 4281	. . . . . . 7 ⊢ (𝑆 ≠ ∅ ↔ ∃𝑦 𝑦 ∈ 𝑆)
26	24, 25	sylib 217	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → ∃𝑦 𝑦 ∈ 𝑆)
27	16	sselda 3922	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) ∧ 𝑦 ∈ 𝑆) → 𝑦 ∈ ran 𝐼)
28	3	ad2antrr 723	. . . . . . . . . 10 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) ∧ 𝑦 ∈ 𝑆) → 𝐼:dom 𝐼–1-1-onto→ran 𝐼)
29	28, 5	syl 17	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) ∧ 𝑦 ∈ 𝑆) → 𝐼 Fn dom 𝐼)
30		fvelrnb 6839	. . . . . . . . 9 ⊢ (𝐼 Fn dom 𝐼 → (𝑦 ∈ ran 𝐼 ↔ ∃𝑥 ∈ dom 𝐼(𝐼‘𝑥) = 𝑦))
31	29, 30	syl 17	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) ∧ 𝑦 ∈ 𝑆) → (𝑦 ∈ ran 𝐼 ↔ ∃𝑥 ∈ dom 𝐼(𝐼‘𝑥) = 𝑦))
32	27, 31	mpbid 231	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) ∧ 𝑦 ∈ 𝑆) → ∃𝑥 ∈ dom 𝐼(𝐼‘𝑥) = 𝑦)
33		f1ofun 6727	. . . . . . . . . . . . . . . 16 ⊢ (𝐼:dom 𝐼–1-1-onto→ran 𝐼 → Fun 𝐼)
34	3, 33	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) → Fun 𝐼)
35	34	adantr 481	. . . . . . . . . . . . . 14 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → Fun 𝐼)
36		fvimacnv 6939	. . . . . . . . . . . . . 14 ⊢ ((Fun 𝐼 ∧ 𝑥 ∈ dom 𝐼) → ((𝐼‘𝑥) ∈ 𝑆 ↔ 𝑥 ∈ (^◡𝐼 “ 𝑆)))
37	35, 36	sylan 580	. . . . . . . . . . . . 13 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) ∧ 𝑥 ∈ dom 𝐼) → ((𝐼‘𝑥) ∈ 𝑆 ↔ 𝑥 ∈ (^◡𝐼 “ 𝑆)))
38		ne0i 4269	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ (^◡𝐼 “ 𝑆) → (^◡𝐼 “ 𝑆) ≠ ∅)
39	37, 38	syl6bi 252	. . . . . . . . . . . 12 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) ∧ 𝑥 ∈ dom 𝐼) → ((𝐼‘𝑥) ∈ 𝑆 → (^◡𝐼 “ 𝑆) ≠ ∅))
40	39	ex 413	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → (𝑥 ∈ dom 𝐼 → ((𝐼‘𝑥) ∈ 𝑆 → (^◡𝐼 “ 𝑆) ≠ ∅)))
41		eleq1 2827	. . . . . . . . . . . . 13 ⊢ ((𝐼‘𝑥) = 𝑦 → ((𝐼‘𝑥) ∈ 𝑆 ↔ 𝑦 ∈ 𝑆))
42	41	biimprd 247	. . . . . . . . . . . 12 ⊢ ((𝐼‘𝑥) = 𝑦 → (𝑦 ∈ 𝑆 → (𝐼‘𝑥) ∈ 𝑆))
43	42	imim1d 82	. . . . . . . . . . 11 ⊢ ((𝐼‘𝑥) = 𝑦 → (((𝐼‘𝑥) ∈ 𝑆 → (^◡𝐼 “ 𝑆) ≠ ∅) → (𝑦 ∈ 𝑆 → (^◡𝐼 “ 𝑆) ≠ ∅)))
44	40, 43	syl9 77	. . . . . . . . . 10 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → ((𝐼‘𝑥) = 𝑦 → (𝑥 ∈ dom 𝐼 → (𝑦 ∈ 𝑆 → (^◡𝐼 “ 𝑆) ≠ ∅))))
45	44	com24 95	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → (𝑦 ∈ 𝑆 → (𝑥 ∈ dom 𝐼 → ((𝐼‘𝑥) = 𝑦 → (^◡𝐼 “ 𝑆) ≠ ∅))))
46	45	imp 407	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) ∧ 𝑦 ∈ 𝑆) → (𝑥 ∈ dom 𝐼 → ((𝐼‘𝑥) = 𝑦 → (^◡𝐼 “ 𝑆) ≠ ∅)))
47	46	rexlimdv 3213	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) ∧ 𝑦 ∈ 𝑆) → (∃𝑥 ∈ dom 𝐼(𝐼‘𝑥) = 𝑦 → (^◡𝐼 “ 𝑆) ≠ ∅))
48	32, 47	mpd 15	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) ∧ 𝑦 ∈ 𝑆) → (^◡𝐼 “ 𝑆) ≠ ∅)
49	26, 48	exlimddv 1939	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → (^◡𝐼 “ 𝑆) ≠ ∅)
50		eqid 2739	. . . . . 6 ⊢ (glb‘𝐾) = (glb‘𝐾)
51	50, 1, 2	dibglbN 39187	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((^◡𝐼 “ 𝑆) ⊆ dom 𝐼 ∧ (^◡𝐼 “ 𝑆) ≠ ∅)) → (𝐼‘((glb‘𝐾)‘(^◡𝐼 “ 𝑆))) = ∩ 𝑦 ∈ (^◡𝐼 “ 𝑆)(𝐼‘𝑦))
52	22, 23, 49, 51	syl12anc 834	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → (𝐼‘((glb‘𝐾)‘(^◡𝐼 “ 𝑆))) = ∩ 𝑦 ∈ (^◡𝐼 “ 𝑆)(𝐼‘𝑦))
53		fvres 6802	. . . . 5 ⊢ (𝑦 ∈ (^◡𝐼 “ 𝑆) → ((𝐼 ↾ (^◡𝐼 “ 𝑆))‘𝑦) = (𝐼‘𝑦))
54	53	iineq2i 4947	. . . 4 ⊢ ∩ 𝑦 ∈ (^◡𝐼 “ 𝑆)((𝐼 ↾ (^◡𝐼 “ 𝑆))‘𝑦) = ∩ 𝑦 ∈ (^◡𝐼 “ 𝑆)(𝐼‘𝑦)
55	52, 54	eqtr4di 2797	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → (𝐼‘((glb‘𝐾)‘(^◡𝐼 “ 𝑆))) = ∩ 𝑦 ∈ (^◡𝐼 “ 𝑆)((𝐼 ↾ (^◡𝐼 “ 𝑆))‘𝑦))
56		hlclat 37379	. . . . . . 7 ⊢ (𝐾 ∈ HL → 𝐾 ∈ CLat)
57	56	ad2antrr 723	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → 𝐾 ∈ CLat)
58		eqid 2739	. . . . . . . . . 10 ⊢ (Base‘𝐾) = (Base‘𝐾)
59		eqid 2739	. . . . . . . . . 10 ⊢ (le‘𝐾) = (le‘𝐾)
60	58, 59, 1, 2	dibdmN 39178	. . . . . . . . 9 ⊢ ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) → dom 𝐼 = {𝑥 ∈ (Base‘𝐾) ∣ 𝑥(le‘𝐾)𝑊})
61		ssrab2 4014	. . . . . . . . 9 ⊢ {𝑥 ∈ (Base‘𝐾) ∣ 𝑥(le‘𝐾)𝑊} ⊆ (Base‘𝐾)
62	60, 61	eqsstrdi 3976	. . . . . . . 8 ⊢ ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) → dom 𝐼 ⊆ (Base‘𝐾))
63	62	adantr 481	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → dom 𝐼 ⊆ (Base‘𝐾))
64	7, 63	sstrid 3933	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → (^◡𝐼 “ 𝑆) ⊆ (Base‘𝐾))
65	58, 50	clatglbcl 18232	. . . . . 6 ⊢ ((𝐾 ∈ CLat ∧ (^◡𝐼 “ 𝑆) ⊆ (Base‘𝐾)) → ((glb‘𝐾)‘(^◡𝐼 “ 𝑆)) ∈ (Base‘𝐾))
66	57, 64, 65	syl2anc 584	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → ((glb‘𝐾)‘(^◡𝐼 “ 𝑆)) ∈ (Base‘𝐾))
67		n0 4281	. . . . . . 7 ⊢ ((^◡𝐼 “ 𝑆) ≠ ∅ ↔ ∃𝑦 𝑦 ∈ (^◡𝐼 “ 𝑆))
68	49, 67	sylib 217	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → ∃𝑦 𝑦 ∈ (^◡𝐼 “ 𝑆))
69		hllat 37384	. . . . . . . 8 ⊢ (𝐾 ∈ HL → 𝐾 ∈ Lat)
70	69	ad3antrrr 727	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) ∧ 𝑦 ∈ (^◡𝐼 “ 𝑆)) → 𝐾 ∈ Lat)
71	66	adantr 481	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) ∧ 𝑦 ∈ (^◡𝐼 “ 𝑆)) → ((glb‘𝐾)‘(^◡𝐼 “ 𝑆)) ∈ (Base‘𝐾))
72	64	sselda 3922	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) ∧ 𝑦 ∈ (^◡𝐼 “ 𝑆)) → 𝑦 ∈ (Base‘𝐾))
73	58, 1	lhpbase 38019	. . . . . . . 8 ⊢ (𝑊 ∈ 𝐻 → 𝑊 ∈ (Base‘𝐾))
74	73	ad3antlr 728	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) ∧ 𝑦 ∈ (^◡𝐼 “ 𝑆)) → 𝑊 ∈ (Base‘𝐾))
75	56	ad3antrrr 727	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) ∧ 𝑦 ∈ (^◡𝐼 “ 𝑆)) → 𝐾 ∈ CLat)
76	60	adantr 481	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → dom 𝐼 = {𝑥 ∈ (Base‘𝐾) ∣ 𝑥(le‘𝐾)𝑊})
77	7, 76	sseqtrid 3974	. . . . . . . . . 10 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → (^◡𝐼 “ 𝑆) ⊆ {𝑥 ∈ (Base‘𝐾) ∣ 𝑥(le‘𝐾)𝑊})
78	77, 61	sstrdi 3934	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → (^◡𝐼 “ 𝑆) ⊆ (Base‘𝐾))
79	78	adantr 481	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) ∧ 𝑦 ∈ (^◡𝐼 “ 𝑆)) → (^◡𝐼 “ 𝑆) ⊆ (Base‘𝐾))
80		simpr 485	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) ∧ 𝑦 ∈ (^◡𝐼 “ 𝑆)) → 𝑦 ∈ (^◡𝐼 “ 𝑆))
81	58, 59, 50	clatglble 18244	. . . . . . . 8 ⊢ ((𝐾 ∈ CLat ∧ (^◡𝐼 “ 𝑆) ⊆ (Base‘𝐾) ∧ 𝑦 ∈ (^◡𝐼 “ 𝑆)) → ((glb‘𝐾)‘(^◡𝐼 “ 𝑆))(le‘𝐾)𝑦)
82	75, 79, 80, 81	syl3anc 1370	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) ∧ 𝑦 ∈ (^◡𝐼 “ 𝑆)) → ((glb‘𝐾)‘(^◡𝐼 “ 𝑆))(le‘𝐾)𝑦)
83	7	sseli 3918	. . . . . . . . . 10 ⊢ (𝑦 ∈ (^◡𝐼 “ 𝑆) → 𝑦 ∈ dom 𝐼)
84	83	adantl 482	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) ∧ 𝑦 ∈ (^◡𝐼 “ 𝑆)) → 𝑦 ∈ dom 𝐼)
85	58, 59, 1, 2	dibeldmN 39179	. . . . . . . . . 10 ⊢ ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) → (𝑦 ∈ dom 𝐼 ↔ (𝑦 ∈ (Base‘𝐾) ∧ 𝑦(le‘𝐾)𝑊)))
86	85	ad2antrr 723	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) ∧ 𝑦 ∈ (^◡𝐼 “ 𝑆)) → (𝑦 ∈ dom 𝐼 ↔ (𝑦 ∈ (Base‘𝐾) ∧ 𝑦(le‘𝐾)𝑊)))
87	84, 86	mpbid 231	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) ∧ 𝑦 ∈ (^◡𝐼 “ 𝑆)) → (𝑦 ∈ (Base‘𝐾) ∧ 𝑦(le‘𝐾)𝑊))
88	87	simprd 496	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) ∧ 𝑦 ∈ (^◡𝐼 “ 𝑆)) → 𝑦(le‘𝐾)𝑊)
89	58, 59, 70, 71, 72, 74, 82, 88	lattrd 18173	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) ∧ 𝑦 ∈ (^◡𝐼 “ 𝑆)) → ((glb‘𝐾)‘(^◡𝐼 “ 𝑆))(le‘𝐾)𝑊)
90	68, 89	exlimddv 1939	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → ((glb‘𝐾)‘(^◡𝐼 “ 𝑆))(le‘𝐾)𝑊)
91	58, 59, 1, 2	dibeldmN 39179	. . . . . 6 ⊢ ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) → (((glb‘𝐾)‘(^◡𝐼 “ 𝑆)) ∈ dom 𝐼 ↔ (((glb‘𝐾)‘(^◡𝐼 “ 𝑆)) ∈ (Base‘𝐾) ∧ ((glb‘𝐾)‘(^◡𝐼 “ 𝑆))(le‘𝐾)𝑊)))
92	91	adantr 481	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → (((glb‘𝐾)‘(^◡𝐼 “ 𝑆)) ∈ dom 𝐼 ↔ (((glb‘𝐾)‘(^◡𝐼 “ 𝑆)) ∈ (Base‘𝐾) ∧ ((glb‘𝐾)‘(^◡𝐼 “ 𝑆))(le‘𝐾)𝑊)))
93	66, 90, 92	mpbir2and 710	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → ((glb‘𝐾)‘(^◡𝐼 “ 𝑆)) ∈ dom 𝐼)
94	1, 2	dibclN 39183	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((glb‘𝐾)‘(^◡𝐼 “ 𝑆)) ∈ dom 𝐼) → (𝐼‘((glb‘𝐾)‘(^◡𝐼 “ 𝑆))) ∈ ran 𝐼)
95	93, 94	syldan 591	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → (𝐼‘((glb‘𝐾)‘(^◡𝐼 “ 𝑆))) ∈ ran 𝐼)
96	55, 95	eqeltrrd 2841	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → ∩ 𝑦 ∈ (^◡𝐼 “ 𝑆)((𝐼 ↾ (^◡𝐼 “ 𝑆))‘𝑦) ∈ ran 𝐼)
97	21, 96	eqeltrrd 2841	1 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑆 ⊆ ran 𝐼 ∧ 𝑆 ≠ ∅)) → ∩ 𝑆 ∈ ran 𝐼)

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 205 ∧ wa 396 = wceq 1539 ∃wex 1782 ∈ wcel 2107 ≠ wne 2944 ∃wrex 3066 {crab 3069 ⊆ wss 3888 ∅c0 4257 ∩ cint 4880 ∩ ciin 4926 class class class wbr 5075 ^◡ccnv 5589 dom cdm 5590 ran crn 5591 ↾ cres 5592 “ cima 5593 Fun wfun 6431 Fn wfn 6432 –onto→wfo 6435 –1-1-onto→wf1o 6436 ‘cfv 6437 Basecbs 16921 lecple 16978 glbcglb 18037 Latclat 18158 CLatccla 18225 HLchlt 37371 LHypclh 38005 DIsoBcdib 39159

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 1914 ax-6 1972 ax-7 2012 ax-8 2109 ax-9 2117 ax-10 2138 ax-11 2155 ax-12 2172 ax-ext 2710 ax-rep 5210 ax-sep 5224 ax-nul 5231 ax-pow 5289 ax-pr 5353 ax-un 7597 ax-riotaBAD 36974

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 2069 df-mo 2541 df-eu 2570 df-clab 2717 df-cleq 2731 df-clel 2817 df-nfc 2890 df-ne 2945 df-ral 3070 df-rex 3071 df-rmo 3072 df-reu 3073 df-rab 3074 df-v 3435 df-sbc 3718 df-csb 3834 df-dif 3891 df-un 3893 df-in 3895 df-ss 3905 df-nul 4258 df-if 4461 df-pw 4536 df-sn 4563 df-pr 4565 df-op 4569 df-uni 4841 df-int 4881 df-iun 4927 df-iin 4928 df-br 5076 df-opab 5138 df-mpt 5159 df-id 5490 df-xp 5596 df-rel 5597 df-cnv 5598 df-co 5599 df-dm 5600 df-rn 5601 df-res 5602 df-ima 5603 df-iota 6395 df-fun 6439 df-fn 6440 df-f 6441 df-f1 6442 df-fo 6443 df-f1o 6444 df-fv 6445 df-riota 7241 df-ov 7287 df-oprab 7288 df-mpo 7289 df-1st 7840 df-2nd 7841 df-undef 8098 df-map 8626 df-proset 18022 df-poset 18040 df-plt 18057 df-lub 18073 df-glb 18074 df-join 18075 df-meet 18076 df-p0 18152 df-p1 18153 df-lat 18159 df-clat 18226 df-oposet 37197 df-ol 37199 df-oml 37200 df-covers 37287 df-ats 37288 df-atl 37319 df-cvlat 37343 df-hlat 37372 df-llines 37519 df-lplanes 37520 df-lvols 37521 df-lines 37522 df-psubsp 37524 df-pmap 37525 df-padd 37817 df-lhyp 38009 df-laut 38010 df-ldil 38125 df-ltrn 38126 df-trl 38180 df-disoa 39050 df-dib 39160

This theorem is referenced by: (None)

W3C validator