Theorem ltrncnv 37442

Description: The converse of a lattice translation is a lattice translation. (Contributed by NM, 10-May-2013.)

Hypotheses

Ref	Expression
ltrncnv.h	⊢ 𝐻 = (LHyp‘𝐾)
ltrncnv.t	⊢ 𝑇 = ((LTrn‘𝐾)‘𝑊)

Assertion

Ref	Expression
ltrncnv	⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → ◡𝐹 ∈ 𝑇)

Proof of Theorem ltrncnv

Dummy variables 𝑞 𝑝 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		ltrncnv.h	. . . 4 ⊢ 𝐻 = (LHyp‘𝐾)
2		eqid 2798	. . . 4 ⊢ ((LDil‘𝐾)‘𝑊) = ((LDil‘𝐾)‘𝑊)
3		ltrncnv.t	. . . 4 ⊢ 𝑇 = ((LTrn‘𝐾)‘𝑊)
4	1, 2, 3	ltrnldil 37418	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → 𝐹 ∈ ((LDil‘𝐾)‘𝑊))
5	1, 2	ldilcnv 37411	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ ((LDil‘𝐾)‘𝑊)) → ◡𝐹 ∈ ((LDil‘𝐾)‘𝑊))
6	4, 5	syldan 594	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → ◡𝐹 ∈ ((LDil‘𝐾)‘𝑊))
7		simp1 1133	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇))
8		simp1l 1194	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
9		simp1r 1195	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → 𝐹 ∈ 𝑇)
10		simp2l 1196	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → 𝑝 ∈ (Atoms‘𝐾))
11		simp3l 1198	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ¬ 𝑝(le‘𝐾)𝑊)
12		eqid 2798	. . . . . . . 8 ⊢ (le‘𝐾) = (le‘𝐾)
13		eqid 2798	. . . . . . . 8 ⊢ (Atoms‘𝐾) = (Atoms‘𝐾)
14	12, 13, 1, 3	ltrncnvel 37438	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ ¬ 𝑝(le‘𝐾)𝑊)) → ((◡𝐹‘𝑝) ∈ (Atoms‘𝐾) ∧ ¬ (◡𝐹‘𝑝)(le‘𝐾)𝑊))
15	8, 9, 10, 11, 14	syl112anc 1371	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((◡𝐹‘𝑝) ∈ (Atoms‘𝐾) ∧ ¬ (◡𝐹‘𝑝)(le‘𝐾)𝑊))
16		simp2r 1197	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → 𝑞 ∈ (Atoms‘𝐾))
17		simp3r 1199	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ¬ 𝑞(le‘𝐾)𝑊)
18	12, 13, 1, 3	ltrncnvel 37438	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ (𝑞 ∈ (Atoms‘𝐾) ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((◡𝐹‘𝑞) ∈ (Atoms‘𝐾) ∧ ¬ (◡𝐹‘𝑞)(le‘𝐾)𝑊))
19	8, 9, 16, 17, 18	syl112anc 1371	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((◡𝐹‘𝑞) ∈ (Atoms‘𝐾) ∧ ¬ (◡𝐹‘𝑞)(le‘𝐾)𝑊))
20		eqid 2798	. . . . . . 7 ⊢ (join‘𝐾) = (join‘𝐾)
21		eqid 2798	. . . . . . 7 ⊢ (meet‘𝐾) = (meet‘𝐾)
22	12, 20, 21, 13, 1, 3	ltrnu 37417	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ ((◡𝐹‘𝑝) ∈ (Atoms‘𝐾) ∧ ¬ (◡𝐹‘𝑝)(le‘𝐾)𝑊) ∧ ((◡𝐹‘𝑞) ∈ (Atoms‘𝐾) ∧ ¬ (◡𝐹‘𝑞)(le‘𝐾)𝑊)) → (((◡𝐹‘𝑝)(join‘𝐾)(𝐹‘(◡𝐹‘𝑝)))(meet‘𝐾)𝑊) = (((◡𝐹‘𝑞)(join‘𝐾)(𝐹‘(◡𝐹‘𝑞)))(meet‘𝐾)𝑊))
23	7, 15, 19, 22	syl3anc 1368	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → (((◡𝐹‘𝑝)(join‘𝐾)(𝐹‘(◡𝐹‘𝑝)))(meet‘𝐾)𝑊) = (((◡𝐹‘𝑞)(join‘𝐾)(𝐹‘(◡𝐹‘𝑞)))(meet‘𝐾)𝑊))
24		eqid 2798	. . . . . . . . . . 11 ⊢ (Base‘𝐾) = (Base‘𝐾)
25	24, 1, 3	ltrn1o 37420	. . . . . . . . . 10 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → 𝐹:(Base‘𝐾)–1-1-onto→(Base‘𝐾))
26	25	3ad2ant1 1130	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → 𝐹:(Base‘𝐾)–1-1-onto→(Base‘𝐾))
27	24, 13	atbase 36585	. . . . . . . . . 10 ⊢ (𝑝 ∈ (Atoms‘𝐾) → 𝑝 ∈ (Base‘𝐾))
28	10, 27	syl 17	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → 𝑝 ∈ (Base‘𝐾))
29		f1ocnvfv2 7012	. . . . . . . . 9 ⊢ ((𝐹:(Base‘𝐾)–1-1-onto→(Base‘𝐾) ∧ 𝑝 ∈ (Base‘𝐾)) → (𝐹‘(◡𝐹‘𝑝)) = 𝑝)
30	26, 28, 29	syl2anc 587	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → (𝐹‘(◡𝐹‘𝑝)) = 𝑝)
31	30	oveq2d 7151	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((◡𝐹‘𝑝)(join‘𝐾)(𝐹‘(◡𝐹‘𝑝))) = ((◡𝐹‘𝑝)(join‘𝐾)𝑝))
32		simp1ll 1233	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → 𝐾 ∈ HL)
33	12, 13, 1, 3	ltrncnvat 37437	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝑝 ∈ (Atoms‘𝐾)) → (◡𝐹‘𝑝) ∈ (Atoms‘𝐾))
34	8, 9, 10, 33	syl3anc 1368	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → (◡𝐹‘𝑝) ∈ (Atoms‘𝐾))
35	20, 13	hlatjcom 36664	. . . . . . . 8 ⊢ ((𝐾 ∈ HL ∧ (◡𝐹‘𝑝) ∈ (Atoms‘𝐾) ∧ 𝑝 ∈ (Atoms‘𝐾)) → ((◡𝐹‘𝑝)(join‘𝐾)𝑝) = (𝑝(join‘𝐾)(◡𝐹‘𝑝)))
36	32, 34, 10, 35	syl3anc 1368	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((◡𝐹‘𝑝)(join‘𝐾)𝑝) = (𝑝(join‘𝐾)(◡𝐹‘𝑝)))
37	31, 36	eqtrd 2833	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((◡𝐹‘𝑝)(join‘𝐾)(𝐹‘(◡𝐹‘𝑝))) = (𝑝(join‘𝐾)(◡𝐹‘𝑝)))
38	37	oveq1d 7150	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → (((◡𝐹‘𝑝)(join‘𝐾)(𝐹‘(◡𝐹‘𝑝)))(meet‘𝐾)𝑊) = ((𝑝(join‘𝐾)(◡𝐹‘𝑝))(meet‘𝐾)𝑊))
39	24, 13	atbase 36585	. . . . . . . . . 10 ⊢ (𝑞 ∈ (Atoms‘𝐾) → 𝑞 ∈ (Base‘𝐾))
40	16, 39	syl 17	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → 𝑞 ∈ (Base‘𝐾))
41		f1ocnvfv2 7012	. . . . . . . . 9 ⊢ ((𝐹:(Base‘𝐾)–1-1-onto→(Base‘𝐾) ∧ 𝑞 ∈ (Base‘𝐾)) → (𝐹‘(◡𝐹‘𝑞)) = 𝑞)
42	26, 40, 41	syl2anc 587	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → (𝐹‘(◡𝐹‘𝑞)) = 𝑞)
43	42	oveq2d 7151	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((◡𝐹‘𝑞)(join‘𝐾)(𝐹‘(◡𝐹‘𝑞))) = ((◡𝐹‘𝑞)(join‘𝐾)𝑞))
44	12, 13, 1, 3	ltrncnvat 37437	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝑞 ∈ (Atoms‘𝐾)) → (◡𝐹‘𝑞) ∈ (Atoms‘𝐾))
45	8, 9, 16, 44	syl3anc 1368	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → (◡𝐹‘𝑞) ∈ (Atoms‘𝐾))
46	20, 13	hlatjcom 36664	. . . . . . . 8 ⊢ ((𝐾 ∈ HL ∧ (◡𝐹‘𝑞) ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) → ((◡𝐹‘𝑞)(join‘𝐾)𝑞) = (𝑞(join‘𝐾)(◡𝐹‘𝑞)))
47	32, 45, 16, 46	syl3anc 1368	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((◡𝐹‘𝑞)(join‘𝐾)𝑞) = (𝑞(join‘𝐾)(◡𝐹‘𝑞)))
48	43, 47	eqtrd 2833	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((◡𝐹‘𝑞)(join‘𝐾)(𝐹‘(◡𝐹‘𝑞))) = (𝑞(join‘𝐾)(◡𝐹‘𝑞)))
49	48	oveq1d 7150	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → (((◡𝐹‘𝑞)(join‘𝐾)(𝐹‘(◡𝐹‘𝑞)))(meet‘𝐾)𝑊) = ((𝑞(join‘𝐾)(◡𝐹‘𝑞))(meet‘𝐾)𝑊))
50	23, 38, 49	3eqtr3d 2841	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((𝑝(join‘𝐾)(◡𝐹‘𝑝))(meet‘𝐾)𝑊) = ((𝑞(join‘𝐾)(◡𝐹‘𝑞))(meet‘𝐾)𝑊))
51	50	3exp 1116	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → ((𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) → ((¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊) → ((𝑝(join‘𝐾)(◡𝐹‘𝑝))(meet‘𝐾)𝑊) = ((𝑞(join‘𝐾)(◡𝐹‘𝑞))(meet‘𝐾)𝑊))))
52	51	ralrimivv 3155	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → ∀𝑝 ∈ (Atoms‘𝐾)∀𝑞 ∈ (Atoms‘𝐾)((¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊) → ((𝑝(join‘𝐾)(◡𝐹‘𝑝))(meet‘𝐾)𝑊) = ((𝑞(join‘𝐾)(◡𝐹‘𝑞))(meet‘𝐾)𝑊)))
53	12, 20, 21, 13, 1, 2, 3	isltrn 37415	. . 3 ⊢ ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) → (◡𝐹 ∈ 𝑇 ↔ (◡𝐹 ∈ ((LDil‘𝐾)‘𝑊) ∧ ∀𝑝 ∈ (Atoms‘𝐾)∀𝑞 ∈ (Atoms‘𝐾)((¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊) → ((𝑝(join‘𝐾)(◡𝐹‘𝑝))(meet‘𝐾)𝑊) = ((𝑞(join‘𝐾)(◡𝐹‘𝑞))(meet‘𝐾)𝑊)))))
54	53	adantr 484	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → (◡𝐹 ∈ 𝑇 ↔ (◡𝐹 ∈ ((LDil‘𝐾)‘𝑊) ∧ ∀𝑝 ∈ (Atoms‘𝐾)∀𝑞 ∈ (Atoms‘𝐾)((¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊) → ((𝑝(join‘𝐾)(◡𝐹‘𝑝))(meet‘𝐾)𝑊) = ((𝑞(join‘𝐾)(◡𝐹‘𝑞))(meet‘𝐾)𝑊)))))
55	6, 52, 54	mpbir2and 712	1 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → ◡𝐹 ∈ 𝑇)

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 399   ∧ w3a 1084   = wceq 1538   ∈ wcel 2111  ∀wral 3106   class class class wbr 5030  ^◡ccnv 5518  –1-1-onto→wf1o 6323  ‘cfv 6324  (class class class)co 7135  Basecbs 16475  lecple 16564  joincjn 17546  meetcmee 17547  Atomscatm 36559  HLchlt 36646  LHypclh 37280  LDilcldil 37396  LTrncltrn 37397

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2113  ax-9 2121  ax-10 2142  ax-11 2158  ax-12 2175  ax-ext 2770  ax-rep 5154  ax-sep 5167  ax-nul 5174  ax-pow 5231  ax-pr 5295  ax-un 7441

This theorem depends on definitions:  df-bi 210  df-an 400  df-or 845  df-3an 1086  df-tru 1541  df-ex 1782  df-nf 1786  df-sb 2070  df-mo 2598  df-eu 2629  df-clab 2777  df-cleq 2791  df-clel 2870  df-nfc 2938  df-ne 2988  df-ral 3111  df-rex 3112  df-reu 3113  df-rab 3115  df-v 3443  df-sbc 3721  df-csb 3829  df-dif 3884  df-un 3886  df-in 3888  df-ss 3898  df-nul 4244  df-if 4426  df-pw 4499  df-sn 4526  df-pr 4528  df-op 4532  df-uni 4801  df-iun 4883  df-br 5031  df-opab 5093  df-mpt 5111  df-id 5425  df-xp 5525  df-rel 5526  df-cnv 5527  df-co 5528  df-dm 5529  df-rn 5530  df-res 5531  df-ima 5532  df-iota 6283  df-fun 6326  df-fn 6327  df-f 6328  df-f1 6329  df-fo 6330  df-f1o 6331  df-fv 6332  df-riota 7093  df-ov 7138  df-oprab 7139  df-mpo 7140  df-map 8391  df-proset 17530  df-poset 17548  df-plt 17560  df-lub 17576  df-glb 17577  df-join 17578  df-p0 17641  df-lat 17648  df-oposet 36472  df-ol 36474  df-oml 36475  df-covers 36562  df-ats 36563  df-atl 36594  df-cvlat 36618  df-hlat 36647  df-lhyp 37284  df-laut 37285  df-ldil 37400  df-ltrn 37401

This theorem is referenced by:  trlcnv  37461  trlcocnv  38016  trlcoabs2N  38018  trlcoat  38019  trlcocnvat  38020  trlcone  38024  cdlemg46  38031  tgrpgrplem  38045  tendoicl  38092  cdlemh1  38111  cdlemh2  38112  cdlemh  38113  cdlemi2  38115  cdlemi  38116  cdlemk2  38128  cdlemk3  38129  cdlemk4  38130  cdlemk8  38134  cdlemk9  38135  cdlemk9bN  38136  cdlemkvcl  38138  cdlemk10  38139  cdlemk11  38145  cdlemk12  38146  cdlemk14  38150  cdlemk11u  38167  cdlemk12u  38168  cdlemk37  38210  cdlemkfid1N  38217  cdlemkid1  38218  cdlemkid2  38220  tendocnv  38317  tendospcanN  38319  dvhgrp  38403  cdlemn8  38500  dihopelvalcpre  38544  dih1  38582  dihglbcpreN  38596  dihjatcclem3  38716  dihjatcclem4  38717