filnetlem3 - Mathbox for Jeff Hankins

	Mathbox for Jeff Hankins		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > filnetlem3		Structured version Visualization version GIF version

Theorem filnetlem3 32375

Description: Lemma for filnet 32377. (Contributed by Jeff Hankins, 13-Dec-2009.) (Revised by Mario Carneiro, 8-Aug-2015.)

**Hypotheses**
Ref	Expression
filnet.h	⊢ 𝐻 = ∪ 𝑛 ∈ 𝐹 ({𝑛} × 𝑛)
filnet.d	⊢ 𝐷 = {⟨𝑥, 𝑦⟩ ∣ ((𝑥 ∈ 𝐻 ∧ 𝑦 ∈ 𝐻) ∧ (1^st ‘𝑦) ⊆ (1^st ‘𝑥))}

**Assertion**
Ref	Expression
filnetlem3	⊢ (𝐻 = ∪ ∪ 𝐷 ∧ (𝐹 ∈ (Fil‘𝑋) → (𝐻 ⊆ (𝐹 × 𝑋) ∧ 𝐷 ∈ DirRel)))

Distinct variable groups: 𝑥,𝑦,𝑛,𝐹 𝑥,𝐻,𝑦 𝑛,𝑋 Allowed substitution hints: 𝐷(𝑥,𝑦,𝑛) 𝐻(𝑛) 𝑋(𝑥,𝑦)

Proof of Theorem filnetlem3 Dummy variables 𝑢 𝑣 𝑤 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		dmresi 5457	. . . . . 6 ⊢ dom ( I ↾ 𝐻) = 𝐻
2		filnet.h	. . . . . . . . 9 ⊢ 𝐻 = ∪ 𝑛 ∈ 𝐹 ({𝑛} × 𝑛)
3		filnet.d	. . . . . . . . 9 ⊢ 𝐷 = {⟨𝑥, 𝑦⟩ ∣ ((𝑥 ∈ 𝐻 ∧ 𝑦 ∈ 𝐻) ∧ (1^st ‘𝑦) ⊆ (1^st ‘𝑥))}
4	2, 3	filnetlem2 32374	. . . . . . . 8 ⊢ (( I ↾ 𝐻) ⊆ 𝐷 ∧ 𝐷 ⊆ (𝐻 × 𝐻))
5	4	simpli 474	. . . . . . 7 ⊢ ( I ↾ 𝐻) ⊆ 𝐷
6		dmss 5323	. . . . . . 7 ⊢ (( I ↾ 𝐻) ⊆ 𝐷 → dom ( I ↾ 𝐻) ⊆ dom 𝐷)
7	5, 6	ax-mp 5	. . . . . 6 ⊢ dom ( I ↾ 𝐻) ⊆ dom 𝐷
8	1, 7	eqsstr3i 3636	. . . . 5 ⊢ 𝐻 ⊆ dom 𝐷
9		ssun1 3776	. . . . 5 ⊢ dom 𝐷 ⊆ (dom 𝐷 ∪ ran 𝐷)
10	8, 9	sstri 3612	. . . 4 ⊢ 𝐻 ⊆ (dom 𝐷 ∪ ran 𝐷)
11		dmrnssfld 5384	. . . 4 ⊢ (dom 𝐷 ∪ ran 𝐷) ⊆ ∪ ∪ 𝐷
12	10, 11	sstri 3612	. . 3 ⊢ 𝐻 ⊆ ∪ ∪ 𝐷
13	4	simpri 478	. . . . 5 ⊢ 𝐷 ⊆ (𝐻 × 𝐻)
14		uniss 4458	. . . . 5 ⊢ (𝐷 ⊆ (𝐻 × 𝐻) → ∪ 𝐷 ⊆ ∪ (𝐻 × 𝐻))
15		uniss 4458	. . . . 5 ⊢ (∪ 𝐷 ⊆ ∪ (𝐻 × 𝐻) → ∪ ∪ 𝐷 ⊆ ∪ ∪ (𝐻 × 𝐻))
16	13, 14, 15	mp2b 10	. . . 4 ⊢ ∪ ∪ 𝐷 ⊆ ∪ ∪ (𝐻 × 𝐻)
17		unixpss 5234	. . . . 5 ⊢ ∪ ∪ (𝐻 × 𝐻) ⊆ (𝐻 ∪ 𝐻)
18		unidm 3756	. . . . 5 ⊢ (𝐻 ∪ 𝐻) = 𝐻
19	17, 18	sseqtri 3637	. . . 4 ⊢ ∪ ∪ (𝐻 × 𝐻) ⊆ 𝐻
20	16, 19	sstri 3612	. . 3 ⊢ ∪ ∪ 𝐷 ⊆ 𝐻
21	12, 20	eqssi 3619	. 2 ⊢ 𝐻 = ∪ ∪ 𝐷
22		filelss 21656	. . . . . . . 8 ⊢ ((𝐹 ∈ (Fil‘𝑋) ∧ 𝑛 ∈ 𝐹) → 𝑛 ⊆ 𝑋)
23		xpss2 5229	. . . . . . . 8 ⊢ (𝑛 ⊆ 𝑋 → ({𝑛} × 𝑛) ⊆ ({𝑛} × 𝑋))
24	22, 23	syl 17	. . . . . . 7 ⊢ ((𝐹 ∈ (Fil‘𝑋) ∧ 𝑛 ∈ 𝐹) → ({𝑛} × 𝑛) ⊆ ({𝑛} × 𝑋))
25	24	ralrimiva 2966	. . . . . 6 ⊢ (𝐹 ∈ (Fil‘𝑋) → ∀𝑛 ∈ 𝐹 ({𝑛} × 𝑛) ⊆ ({𝑛} × 𝑋))
26		ss2iun 4536	. . . . . 6 ⊢ (∀𝑛 ∈ 𝐹 ({𝑛} × 𝑛) ⊆ ({𝑛} × 𝑋) → ∪ 𝑛 ∈ 𝐹 ({𝑛} × 𝑛) ⊆ ∪ 𝑛 ∈ 𝐹 ({𝑛} × 𝑋))
27	25, 26	syl 17	. . . . 5 ⊢ (𝐹 ∈ (Fil‘𝑋) → ∪ 𝑛 ∈ 𝐹 ({𝑛} × 𝑛) ⊆ ∪ 𝑛 ∈ 𝐹 ({𝑛} × 𝑋))
28		iunxpconst 5175	. . . . 5 ⊢ ∪ 𝑛 ∈ 𝐹 ({𝑛} × 𝑋) = (𝐹 × 𝑋)
29	27, 28	syl6sseq 3651	. . . 4 ⊢ (𝐹 ∈ (Fil‘𝑋) → ∪ 𝑛 ∈ 𝐹 ({𝑛} × 𝑛) ⊆ (𝐹 × 𝑋))
30	2, 29	syl5eqss 3649	. . 3 ⊢ (𝐹 ∈ (Fil‘𝑋) → 𝐻 ⊆ (𝐹 × 𝑋))
31	5	a1i 11	. . . . 5 ⊢ (𝐹 ∈ (Fil‘𝑋) → ( I ↾ 𝐻) ⊆ 𝐷)
32	3	relopabi 5245	. . . . 5 ⊢ Rel 𝐷
33	31, 32	jctil 560	. . . 4 ⊢ (𝐹 ∈ (Fil‘𝑋) → (Rel 𝐷 ∧ ( I ↾ 𝐻) ⊆ 𝐷))
34		simpl 473	. . . . . . . . . 10 ⊢ ((𝐹 ∈ (Fil‘𝑋) ∧ (𝑣 ∈ 𝐻 ∧ 𝑧 ∈ 𝐻)) → 𝐹 ∈ (Fil‘𝑋))
35	30	adantr 481	. . . . . . . . . . . 12 ⊢ ((𝐹 ∈ (Fil‘𝑋) ∧ (𝑣 ∈ 𝐻 ∧ 𝑧 ∈ 𝐻)) → 𝐻 ⊆ (𝐹 × 𝑋))
36		simprl 794	. . . . . . . . . . . 12 ⊢ ((𝐹 ∈ (Fil‘𝑋) ∧ (𝑣 ∈ 𝐻 ∧ 𝑧 ∈ 𝐻)) → 𝑣 ∈ 𝐻)
37	35, 36	sseldd 3604	. . . . . . . . . . 11 ⊢ ((𝐹 ∈ (Fil‘𝑋) ∧ (𝑣 ∈ 𝐻 ∧ 𝑧 ∈ 𝐻)) → 𝑣 ∈ (𝐹 × 𝑋))
38		xp1st 7198	. . . . . . . . . . 11 ⊢ (𝑣 ∈ (𝐹 × 𝑋) → (1^st ‘𝑣) ∈ 𝐹)
39	37, 38	syl 17	. . . . . . . . . 10 ⊢ ((𝐹 ∈ (Fil‘𝑋) ∧ (𝑣 ∈ 𝐻 ∧ 𝑧 ∈ 𝐻)) → (1^st ‘𝑣) ∈ 𝐹)
40		simprr 796	. . . . . . . . . . . 12 ⊢ ((𝐹 ∈ (Fil‘𝑋) ∧ (𝑣 ∈ 𝐻 ∧ 𝑧 ∈ 𝐻)) → 𝑧 ∈ 𝐻)
41	35, 40	sseldd 3604	. . . . . . . . . . 11 ⊢ ((𝐹 ∈ (Fil‘𝑋) ∧ (𝑣 ∈ 𝐻 ∧ 𝑧 ∈ 𝐻)) → 𝑧 ∈ (𝐹 × 𝑋))
42		xp1st 7198	. . . . . . . . . . 11 ⊢ (𝑧 ∈ (𝐹 × 𝑋) → (1^st ‘𝑧) ∈ 𝐹)
43	41, 42	syl 17	. . . . . . . . . 10 ⊢ ((𝐹 ∈ (Fil‘𝑋) ∧ (𝑣 ∈ 𝐻 ∧ 𝑧 ∈ 𝐻)) → (1^st ‘𝑧) ∈ 𝐹)
44		filinn0 21664	. . . . . . . . . 10 ⊢ ((𝐹 ∈ (Fil‘𝑋) ∧ (1^st ‘𝑣) ∈ 𝐹 ∧ (1^st ‘𝑧) ∈ 𝐹) → ((1^st ‘𝑣) ∩ (1^st ‘𝑧)) ≠ ∅)
45	34, 39, 43, 44	syl3anc 1326	. . . . . . . . 9 ⊢ ((𝐹 ∈ (Fil‘𝑋) ∧ (𝑣 ∈ 𝐻 ∧ 𝑧 ∈ 𝐻)) → ((1^st ‘𝑣) ∩ (1^st ‘𝑧)) ≠ ∅)
46		n0 3931	. . . . . . . . 9 ⊢ (((1^st ‘𝑣) ∩ (1^st ‘𝑧)) ≠ ∅ ↔ ∃𝑢 𝑢 ∈ ((1^st ‘𝑣) ∩ (1^st ‘𝑧)))
47	45, 46	sylib 208	. . . . . . . 8 ⊢ ((𝐹 ∈ (Fil‘𝑋) ∧ (𝑣 ∈ 𝐻 ∧ 𝑧 ∈ 𝐻)) → ∃𝑢 𝑢 ∈ ((1^st ‘𝑣) ∩ (1^st ‘𝑧)))
48	36	adantr 481	. . . . . . . . . 10 ⊢ (((𝐹 ∈ (Fil‘𝑋) ∧ (𝑣 ∈ 𝐻 ∧ 𝑧 ∈ 𝐻)) ∧ 𝑢 ∈ ((1^st ‘𝑣) ∩ (1^st ‘𝑧))) → 𝑣 ∈ 𝐻)
49		filin 21658	. . . . . . . . . . . . . 14 ⊢ ((𝐹 ∈ (Fil‘𝑋) ∧ (1^st ‘𝑣) ∈ 𝐹 ∧ (1^st ‘𝑧) ∈ 𝐹) → ((1^st ‘𝑣) ∩ (1^st ‘𝑧)) ∈ 𝐹)
50	34, 39, 43, 49	syl3anc 1326	. . . . . . . . . . . . 13 ⊢ ((𝐹 ∈ (Fil‘𝑋) ∧ (𝑣 ∈ 𝐻 ∧ 𝑧 ∈ 𝐻)) → ((1^st ‘𝑣) ∩ (1^st ‘𝑧)) ∈ 𝐹)
51	50	adantr 481	. . . . . . . . . . . 12 ⊢ (((𝐹 ∈ (Fil‘𝑋) ∧ (𝑣 ∈ 𝐻 ∧ 𝑧 ∈ 𝐻)) ∧ 𝑢 ∈ ((1^st ‘𝑣) ∩ (1^st ‘𝑧))) → ((1^st ‘𝑣) ∩ (1^st ‘𝑧)) ∈ 𝐹)
52		simpr 477	. . . . . . . . . . . 12 ⊢ (((𝐹 ∈ (Fil‘𝑋) ∧ (𝑣 ∈ 𝐻 ∧ 𝑧 ∈ 𝐻)) ∧ 𝑢 ∈ ((1^st ‘𝑣) ∩ (1^st ‘𝑧))) → 𝑢 ∈ ((1^st ‘𝑣) ∩ (1^st ‘𝑧)))
53		id 22	. . . . . . . . . . . . 13 ⊢ (𝑛 = ((1^st ‘𝑣) ∩ (1^st ‘𝑧)) → 𝑛 = ((1^st ‘𝑣) ∩ (1^st ‘𝑧)))
54	53	opeliunxp2 5260	. . . . . . . . . . . 12 ⊢ (⟨((1^st ‘𝑣) ∩ (1^st ‘𝑧)), 𝑢⟩ ∈ ∪ 𝑛 ∈ 𝐹 ({𝑛} × 𝑛) ↔ (((1^st ‘𝑣) ∩ (1^st ‘𝑧)) ∈ 𝐹 ∧ 𝑢 ∈ ((1^st ‘𝑣) ∩ (1^st ‘𝑧))))
55	51, 52, 54	sylanbrc 698	. . . . . . . . . . 11 ⊢ (((𝐹 ∈ (Fil‘𝑋) ∧ (𝑣 ∈ 𝐻 ∧ 𝑧 ∈ 𝐻)) ∧ 𝑢 ∈ ((1^st ‘𝑣) ∩ (1^st ‘𝑧))) → ⟨((1^st ‘𝑣) ∩ (1^st ‘𝑧)), 𝑢⟩ ∈ ∪ 𝑛 ∈ 𝐹 ({𝑛} × 𝑛))
56	55, 2	syl6eleqr 2712	. . . . . . . . . 10 ⊢ (((𝐹 ∈ (Fil‘𝑋) ∧ (𝑣 ∈ 𝐻 ∧ 𝑧 ∈ 𝐻)) ∧ 𝑢 ∈ ((1^st ‘𝑣) ∩ (1^st ‘𝑧))) → ⟨((1^st ‘𝑣) ∩ (1^st ‘𝑧)), 𝑢⟩ ∈ 𝐻)
57		fvex 6201	. . . . . . . . . . . . . 14 ⊢ (1^st ‘𝑣) ∈ V
58	57	inex1 4799	. . . . . . . . . . . . 13 ⊢ ((1^st ‘𝑣) ∩ (1^st ‘𝑧)) ∈ V
59		vex 3203	. . . . . . . . . . . . 13 ⊢ 𝑢 ∈ V
60	58, 59	op1st 7176	. . . . . . . . . . . 12 ⊢ (1^st ‘⟨((1^st ‘𝑣) ∩ (1^st ‘𝑧)), 𝑢⟩) = ((1^st ‘𝑣) ∩ (1^st ‘𝑧))
61		inss1 3833	. . . . . . . . . . . 12 ⊢ ((1^st ‘𝑣) ∩ (1^st ‘𝑧)) ⊆ (1^st ‘𝑣)
62	60, 61	eqsstri 3635	. . . . . . . . . . 11 ⊢ (1^st ‘⟨((1^st ‘𝑣) ∩ (1^st ‘𝑧)), 𝑢⟩) ⊆ (1^st ‘𝑣)
63		vex 3203	. . . . . . . . . . . 12 ⊢ 𝑣 ∈ V
64		opex 4932	. . . . . . . . . . . 12 ⊢ ⟨((1^st ‘𝑣) ∩ (1^st ‘𝑧)), 𝑢⟩ ∈ V
65	2, 3, 63, 64	filnetlem1 32373	. . . . . . . . . . 11 ⊢ (𝑣𝐷⟨((1^st ‘𝑣) ∩ (1^st ‘𝑧)), 𝑢⟩ ↔ ((𝑣 ∈ 𝐻 ∧ ⟨((1^st ‘𝑣) ∩ (1^st ‘𝑧)), 𝑢⟩ ∈ 𝐻) ∧ (1^st ‘⟨((1^st ‘𝑣) ∩ (1^st ‘𝑧)), 𝑢⟩) ⊆ (1^st ‘𝑣)))
66	62, 65	mpbiran2 954	. . . . . . . . . 10 ⊢ (𝑣𝐷⟨((1^st ‘𝑣) ∩ (1^st ‘𝑧)), 𝑢⟩ ↔ (𝑣 ∈ 𝐻 ∧ ⟨((1^st ‘𝑣) ∩ (1^st ‘𝑧)), 𝑢⟩ ∈ 𝐻))
67	48, 56, 66	sylanbrc 698	. . . . . . . . 9 ⊢ (((𝐹 ∈ (Fil‘𝑋) ∧ (𝑣 ∈ 𝐻 ∧ 𝑧 ∈ 𝐻)) ∧ 𝑢 ∈ ((1^st ‘𝑣) ∩ (1^st ‘𝑧))) → 𝑣𝐷⟨((1^st ‘𝑣) ∩ (1^st ‘𝑧)), 𝑢⟩)
68	40	adantr 481	. . . . . . . . . 10 ⊢ (((𝐹 ∈ (Fil‘𝑋) ∧ (𝑣 ∈ 𝐻 ∧ 𝑧 ∈ 𝐻)) ∧ 𝑢 ∈ ((1^st ‘𝑣) ∩ (1^st ‘𝑧))) → 𝑧 ∈ 𝐻)
69		inss2 3834	. . . . . . . . . . . 12 ⊢ ((1^st ‘𝑣) ∩ (1^st ‘𝑧)) ⊆ (1^st ‘𝑧)
70	60, 69	eqsstri 3635	. . . . . . . . . . 11 ⊢ (1^st ‘⟨((1^st ‘𝑣) ∩ (1^st ‘𝑧)), 𝑢⟩) ⊆ (1^st ‘𝑧)
71		vex 3203	. . . . . . . . . . . 12 ⊢ 𝑧 ∈ V
72	2, 3, 71, 64	filnetlem1 32373	. . . . . . . . . . 11 ⊢ (𝑧𝐷⟨((1^st ‘𝑣) ∩ (1^st ‘𝑧)), 𝑢⟩ ↔ ((𝑧 ∈ 𝐻 ∧ ⟨((1^st ‘𝑣) ∩ (1^st ‘𝑧)), 𝑢⟩ ∈ 𝐻) ∧ (1^st ‘⟨((1^st ‘𝑣) ∩ (1^st ‘𝑧)), 𝑢⟩) ⊆ (1^st ‘𝑧)))
73	70, 72	mpbiran2 954	. . . . . . . . . 10 ⊢ (𝑧𝐷⟨((1^st ‘𝑣) ∩ (1^st ‘𝑧)), 𝑢⟩ ↔ (𝑧 ∈ 𝐻 ∧ ⟨((1^st ‘𝑣) ∩ (1^st ‘𝑧)), 𝑢⟩ ∈ 𝐻))
74	68, 56, 73	sylanbrc 698	. . . . . . . . 9 ⊢ (((𝐹 ∈ (Fil‘𝑋) ∧ (𝑣 ∈ 𝐻 ∧ 𝑧 ∈ 𝐻)) ∧ 𝑢 ∈ ((1^st ‘𝑣) ∩ (1^st ‘𝑧))) → 𝑧𝐷⟨((1^st ‘𝑣) ∩ (1^st ‘𝑧)), 𝑢⟩)
75		breq2 4657	. . . . . . . . . . 11 ⊢ (𝑤 = ⟨((1^st ‘𝑣) ∩ (1^st ‘𝑧)), 𝑢⟩ → (𝑣𝐷𝑤 ↔ 𝑣𝐷⟨((1^st ‘𝑣) ∩ (1^st ‘𝑧)), 𝑢⟩))
76		breq2 4657	. . . . . . . . . . 11 ⊢ (𝑤 = ⟨((1^st ‘𝑣) ∩ (1^st ‘𝑧)), 𝑢⟩ → (𝑧𝐷𝑤 ↔ 𝑧𝐷⟨((1^st ‘𝑣) ∩ (1^st ‘𝑧)), 𝑢⟩))
77	75, 76	anbi12d 747	. . . . . . . . . 10 ⊢ (𝑤 = ⟨((1^st ‘𝑣) ∩ (1^st ‘𝑧)), 𝑢⟩ → ((𝑣𝐷𝑤 ∧ 𝑧𝐷𝑤) ↔ (𝑣𝐷⟨((1^st ‘𝑣) ∩ (1^st ‘𝑧)), 𝑢⟩ ∧ 𝑧𝐷⟨((1^st ‘𝑣) ∩ (1^st ‘𝑧)), 𝑢⟩)))
78	64, 77	spcev 3300	. . . . . . . . 9 ⊢ ((𝑣𝐷⟨((1^st ‘𝑣) ∩ (1^st ‘𝑧)), 𝑢⟩ ∧ 𝑧𝐷⟨((1^st ‘𝑣) ∩ (1^st ‘𝑧)), 𝑢⟩) → ∃𝑤(𝑣𝐷𝑤 ∧ 𝑧𝐷𝑤))
79	67, 74, 78	syl2anc 693	. . . . . . . 8 ⊢ (((𝐹 ∈ (Fil‘𝑋) ∧ (𝑣 ∈ 𝐻 ∧ 𝑧 ∈ 𝐻)) ∧ 𝑢 ∈ ((1^st ‘𝑣) ∩ (1^st ‘𝑧))) → ∃𝑤(𝑣𝐷𝑤 ∧ 𝑧𝐷𝑤))
80	47, 79	exlimddv 1863	. . . . . . 7 ⊢ ((𝐹 ∈ (Fil‘𝑋) ∧ (𝑣 ∈ 𝐻 ∧ 𝑧 ∈ 𝐻)) → ∃𝑤(𝑣𝐷𝑤 ∧ 𝑧𝐷𝑤))
81	80	ralrimivva 2971	. . . . . 6 ⊢ (𝐹 ∈ (Fil‘𝑋) → ∀𝑣 ∈ 𝐻 ∀𝑧 ∈ 𝐻 ∃𝑤(𝑣𝐷𝑤 ∧ 𝑧𝐷𝑤))
82		codir 5516	. . . . . 6 ⊢ ((𝐻 × 𝐻) ⊆ (^◡𝐷 ∘ 𝐷) ↔ ∀𝑣 ∈ 𝐻 ∀𝑧 ∈ 𝐻 ∃𝑤(𝑣𝐷𝑤 ∧ 𝑧𝐷𝑤))
83	81, 82	sylibr 224	. . . . 5 ⊢ (𝐹 ∈ (Fil‘𝑋) → (𝐻 × 𝐻) ⊆ (^◡𝐷 ∘ 𝐷))
84		vex 3203	. . . . . . . . . . . . 13 ⊢ 𝑤 ∈ V
85	2, 3, 63, 84	filnetlem1 32373	. . . . . . . . . . . 12 ⊢ (𝑣𝐷𝑤 ↔ ((𝑣 ∈ 𝐻 ∧ 𝑤 ∈ 𝐻) ∧ (1^st ‘𝑤) ⊆ (1^st ‘𝑣)))
86	85	simplbi 476	. . . . . . . . . . 11 ⊢ (𝑣𝐷𝑤 → (𝑣 ∈ 𝐻 ∧ 𝑤 ∈ 𝐻))
87	86	simpld 475	. . . . . . . . . 10 ⊢ (𝑣𝐷𝑤 → 𝑣 ∈ 𝐻)
88	2, 3, 84, 71	filnetlem1 32373	. . . . . . . . . . . 12 ⊢ (𝑤𝐷𝑧 ↔ ((𝑤 ∈ 𝐻 ∧ 𝑧 ∈ 𝐻) ∧ (1^st ‘𝑧) ⊆ (1^st ‘𝑤)))
89	88	simplbi 476	. . . . . . . . . . 11 ⊢ (𝑤𝐷𝑧 → (𝑤 ∈ 𝐻 ∧ 𝑧 ∈ 𝐻))
90	89	simprd 479	. . . . . . . . . 10 ⊢ (𝑤𝐷𝑧 → 𝑧 ∈ 𝐻)
91	87, 90	anim12i 590	. . . . . . . . 9 ⊢ ((𝑣𝐷𝑤 ∧ 𝑤𝐷𝑧) → (𝑣 ∈ 𝐻 ∧ 𝑧 ∈ 𝐻))
92	88	simprbi 480	. . . . . . . . . 10 ⊢ (𝑤𝐷𝑧 → (1^st ‘𝑧) ⊆ (1^st ‘𝑤))
93	85	simprbi 480	. . . . . . . . . 10 ⊢ (𝑣𝐷𝑤 → (1^st ‘𝑤) ⊆ (1^st ‘𝑣))
94	92, 93	sylan9ssr 3617	. . . . . . . . 9 ⊢ ((𝑣𝐷𝑤 ∧ 𝑤𝐷𝑧) → (1^st ‘𝑧) ⊆ (1^st ‘𝑣))
95	2, 3, 63, 71	filnetlem1 32373	. . . . . . . . 9 ⊢ (𝑣𝐷𝑧 ↔ ((𝑣 ∈ 𝐻 ∧ 𝑧 ∈ 𝐻) ∧ (1^st ‘𝑧) ⊆ (1^st ‘𝑣)))
96	91, 94, 95	sylanbrc 698	. . . . . . . 8 ⊢ ((𝑣𝐷𝑤 ∧ 𝑤𝐷𝑧) → 𝑣𝐷𝑧)
97	96	ax-gen 1722	. . . . . . 7 ⊢ ∀𝑧((𝑣𝐷𝑤 ∧ 𝑤𝐷𝑧) → 𝑣𝐷𝑧)
98	97	gen2 1723	. . . . . 6 ⊢ ∀𝑣∀𝑤∀𝑧((𝑣𝐷𝑤 ∧ 𝑤𝐷𝑧) → 𝑣𝐷𝑧)
99		cotr 5508	. . . . . 6 ⊢ ((𝐷 ∘ 𝐷) ⊆ 𝐷 ↔ ∀𝑣∀𝑤∀𝑧((𝑣𝐷𝑤 ∧ 𝑤𝐷𝑧) → 𝑣𝐷𝑧))
100	98, 99	mpbir 221	. . . . 5 ⊢ (𝐷 ∘ 𝐷) ⊆ 𝐷
101	83, 100	jctil 560	. . . 4 ⊢ (𝐹 ∈ (Fil‘𝑋) → ((𝐷 ∘ 𝐷) ⊆ 𝐷 ∧ (𝐻 × 𝐻) ⊆ (^◡𝐷 ∘ 𝐷)))
102		filtop 21659	. . . . . . . . 9 ⊢ (𝐹 ∈ (Fil‘𝑋) → 𝑋 ∈ 𝐹)
103		xpexg 6960	. . . . . . . . 9 ⊢ ((𝐹 ∈ (Fil‘𝑋) ∧ 𝑋 ∈ 𝐹) → (𝐹 × 𝑋) ∈ V)
104	102, 103	mpdan 702	. . . . . . . 8 ⊢ (𝐹 ∈ (Fil‘𝑋) → (𝐹 × 𝑋) ∈ V)
105	104, 30	ssexd 4805	. . . . . . 7 ⊢ (𝐹 ∈ (Fil‘𝑋) → 𝐻 ∈ V)
106		xpexg 6960	. . . . . . 7 ⊢ ((𝐻 ∈ V ∧ 𝐻 ∈ V) → (𝐻 × 𝐻) ∈ V)
107	105, 105, 106	syl2anc 693	. . . . . 6 ⊢ (𝐹 ∈ (Fil‘𝑋) → (𝐻 × 𝐻) ∈ V)
108		ssexg 4804	. . . . . 6 ⊢ ((𝐷 ⊆ (𝐻 × 𝐻) ∧ (𝐻 × 𝐻) ∈ V) → 𝐷 ∈ V)
109	13, 107, 108	sylancr 695	. . . . 5 ⊢ (𝐹 ∈ (Fil‘𝑋) → 𝐷 ∈ V)
110	21	isdir 17232	. . . . 5 ⊢ (𝐷 ∈ V → (𝐷 ∈ DirRel ↔ ((Rel 𝐷 ∧ ( I ↾ 𝐻) ⊆ 𝐷) ∧ ((𝐷 ∘ 𝐷) ⊆ 𝐷 ∧ (𝐻 × 𝐻) ⊆ (^◡𝐷 ∘ 𝐷)))))
111	109, 110	syl 17	. . . 4 ⊢ (𝐹 ∈ (Fil‘𝑋) → (𝐷 ∈ DirRel ↔ ((Rel 𝐷 ∧ ( I ↾ 𝐻) ⊆ 𝐷) ∧ ((𝐷 ∘ 𝐷) ⊆ 𝐷 ∧ (𝐻 × 𝐻) ⊆ (^◡𝐷 ∘ 𝐷)))))
112	33, 101, 111	mpbir2and 957	. . 3 ⊢ (𝐹 ∈ (Fil‘𝑋) → 𝐷 ∈ DirRel)
113	30, 112	jca 554	. 2 ⊢ (𝐹 ∈ (Fil‘𝑋) → (𝐻 ⊆ (𝐹 × 𝑋) ∧ 𝐷 ∈ DirRel))
114	21, 113	pm3.2i 471	1 ⊢ (𝐻 = ∪ ∪ 𝐷 ∧ (𝐹 ∈ (Fil‘𝑋) → (𝐻 ⊆ (𝐹 × 𝑋) ∧ 𝐷 ∈ DirRel)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 196 ∧ wa 384 ∀wal 1481 = wceq 1483 ∃wex 1704 ∈ wcel 1990 ≠ wne 2794 ∀wral 2912 Vcvv 3200 ∪ cun 3572 ∩ cin 3573 ⊆ wss 3574 ∅c0 3915 {csn 4177 ⟨cop 4183 ∪ cuni 4436 ∪ ciun 4520 class class class wbr 4653 {copab 4712 I cid 5023 × cxp 5112 ^◡ccnv 5113 dom cdm 5114 ran crn 5115 ↾ cres 5116 ∘ ccom 5118 Rel wrel 5119 ‘cfv 5888 1^st c1st 7166 DirRelcdir 17228 Filcfil 21649

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1722 ax-4 1737 ax-5 1839 ax-6 1888 ax-7 1935 ax-8 1992 ax-9 1999 ax-10 2019 ax-11 2034 ax-12 2047 ax-13 2246 ax-ext 2602 ax-sep 4781 ax-nul 4789 ax-pow 4843 ax-pr 4906 ax-un 6949

This theorem depends on definitions: df-bi 197 df-or 385 df-an 386 df-3an 1039 df-tru 1486 df-ex 1705 df-nf 1710 df-sb 1881 df-eu 2474 df-mo 2475 df-clab 2609 df-cleq 2615 df-clel 2618 df-nfc 2753 df-ne 2795 df-nel 2898 df-ral 2917 df-rex 2918 df-reu 2919 df-rab 2921 df-v 3202 df-sbc 3436 df-csb 3534 df-dif 3577 df-un 3579 df-in 3581 df-ss 3588 df-nul 3916 df-if 4087 df-pw 4160 df-sn 4178 df-pr 4180 df-op 4184 df-uni 4437 df-iun 4522 df-br 4654 df-opab 4713 df-mpt 4730 df-id 5024 df-xp 5120 df-rel 5121 df-cnv 5122 df-co 5123 df-dm 5124 df-rn 5125 df-res 5126 df-ima 5127 df-iota 5851 df-fun 5890 df-fn 5891 df-f 5892 df-f1 5893 df-fo 5894 df-f1o 5895 df-fv 5896 df-1st 7168 df-dir 17230 df-fbas 19743 df-fil 21650

This theorem is referenced by: filnetlem4 32376

W3C validator