Theorem ltrncnv 40940

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 2763	. . . 4 ⊢ ((LDil‘𝐾)‘𝑊) = ((LDil‘𝐾)‘𝑊)
3		ltrncnv.t	. . . 4 ⊢ 𝑇 = ((LTrn‘𝐾)‘𝑊)
4	1, 2, 3	ltrnldil 40916	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → 𝐹 ∈ ((LDil‘𝐾)‘𝑊))
5	1, 2	ldilcnv 40909	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ ((LDil‘𝐾)‘𝑊)) → ◡𝐹 ∈ ((LDil‘𝐾)‘𝑊))
6	4, 5	syldan 602	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → ◡𝐹 ∈ ((LDil‘𝐾)‘𝑊))
7		simp1 1154	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇))
8		simp1l 1216	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
9		simp1r 1217	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → 𝐹 ∈ 𝑇)
10		simp2l 1218	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → 𝑝 ∈ (Atoms‘𝐾))
11		simp3l 1220	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ¬ 𝑝(le‘𝐾)𝑊)
12		eqid 2763	. . . . . . . 8 ⊢ (le‘𝐾) = (le‘𝐾)
13		eqid 2763	. . . . . . . 8 ⊢ (Atoms‘𝐾) = (Atoms‘𝐾)
14	12, 13, 1, 3	ltrncnvel 40936	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ ¬ 𝑝(le‘𝐾)𝑊)) → ((◡𝐹‘𝑝) ∈ (Atoms‘𝐾) ∧ ¬ (◡𝐹‘𝑝)(le‘𝐾)𝑊))
15	8, 9, 10, 11, 14	syl112anc 1401	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((◡𝐹‘𝑝) ∈ (Atoms‘𝐾) ∧ ¬ (◡𝐹‘𝑝)(le‘𝐾)𝑊))
16		simp2r 1219	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → 𝑞 ∈ (Atoms‘𝐾))
17		simp3r 1221	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ¬ 𝑞(le‘𝐾)𝑊)
18	12, 13, 1, 3	ltrncnvel 40936	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ (𝑞 ∈ (Atoms‘𝐾) ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((◡𝐹‘𝑞) ∈ (Atoms‘𝐾) ∧ ¬ (◡𝐹‘𝑞)(le‘𝐾)𝑊))
19	8, 9, 16, 17, 18	syl112anc 1401	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((◡𝐹‘𝑞) ∈ (Atoms‘𝐾) ∧ ¬ (◡𝐹‘𝑞)(le‘𝐾)𝑊))
20		eqid 2763	. . . . . . 7 ⊢ (join‘𝐾) = (join‘𝐾)
21		eqid 2763	. . . . . . 7 ⊢ (meet‘𝐾) = (meet‘𝐾)
22	12, 20, 21, 13, 1, 3	ltrnu 40915	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ ((◡𝐹‘𝑝) ∈ (Atoms‘𝐾) ∧ ¬ (◡𝐹‘𝑝)(le‘𝐾)𝑊) ∧ ((◡𝐹‘𝑞) ∈ (Atoms‘𝐾) ∧ ¬ (◡𝐹‘𝑞)(le‘𝐾)𝑊)) → (((◡𝐹‘𝑝)(join‘𝐾)(𝐹‘(◡𝐹‘𝑝)))(meet‘𝐾)𝑊) = (((◡𝐹‘𝑞)(join‘𝐾)(𝐹‘(◡𝐹‘𝑞)))(meet‘𝐾)𝑊))
23	7, 15, 19, 22	syl3anc 1398	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → (((◡𝐹‘𝑝)(join‘𝐾)(𝐹‘(◡𝐹‘𝑝)))(meet‘𝐾)𝑊) = (((◡𝐹‘𝑞)(join‘𝐾)(𝐹‘(◡𝐹‘𝑞)))(meet‘𝐾)𝑊))
24		eqid 2763	. . . . . . . . . . 11 ⊢ (Base‘𝐾) = (Base‘𝐾)
25	24, 1, 3	ltrn1o 40918	. . . . . . . . . 10 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → 𝐹:(Base‘𝐾)–1-1-onto→(Base‘𝐾))
26	25	3ad2ant1 1151	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → 𝐹:(Base‘𝐾)–1-1-onto→(Base‘𝐾))
27	24, 13	atbase 40083	. . . . . . . . . 10 ⊢ (𝑝 ∈ (Atoms‘𝐾) → 𝑝 ∈ (Base‘𝐾))
28	10, 27	syl 18	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → 𝑝 ∈ (Base‘𝐾))
29		f1ocnvfv2 7275	. . . . . . . . 9 ⊢ ((𝐹:(Base‘𝐾)–1-1-onto→(Base‘𝐾) ∧ 𝑝 ∈ (Base‘𝐾)) → (𝐹‘(◡𝐹‘𝑝)) = 𝑝)
30	26, 28, 29	syl2anc 595	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → (𝐹‘(◡𝐹‘𝑝)) = 𝑝)
31	30	oveq2d 7426	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((◡𝐹‘𝑝)(join‘𝐾)(𝐹‘(◡𝐹‘𝑝))) = ((◡𝐹‘𝑝)(join‘𝐾)𝑝))
32		simp1ll 1255	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → 𝐾 ∈ HL)
33	12, 13, 1, 3	ltrncnvat 40935	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝑝 ∈ (Atoms‘𝐾)) → (◡𝐹‘𝑝) ∈ (Atoms‘𝐾))
34	8, 9, 10, 33	syl3anc 1398	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → (◡𝐹‘𝑝) ∈ (Atoms‘𝐾))
35	20, 13	hlatjcom 40162	. . . . . . . 8 ⊢ ((𝐾 ∈ HL ∧ (◡𝐹‘𝑝) ∈ (Atoms‘𝐾) ∧ 𝑝 ∈ (Atoms‘𝐾)) → ((◡𝐹‘𝑝)(join‘𝐾)𝑝) = (𝑝(join‘𝐾)(◡𝐹‘𝑝)))
36	32, 34, 10, 35	syl3anc 1398	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((◡𝐹‘𝑝)(join‘𝐾)𝑝) = (𝑝(join‘𝐾)(◡𝐹‘𝑝)))
37	31, 36	eqtrd 2798	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((◡𝐹‘𝑝)(join‘𝐾)(𝐹‘(◡𝐹‘𝑝))) = (𝑝(join‘𝐾)(◡𝐹‘𝑝)))
38	37	oveq1d 7425	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → (((◡𝐹‘𝑝)(join‘𝐾)(𝐹‘(◡𝐹‘𝑝)))(meet‘𝐾)𝑊) = ((𝑝(join‘𝐾)(◡𝐹‘𝑝))(meet‘𝐾)𝑊))
39	24, 13	atbase 40083	. . . . . . . . . 10 ⊢ (𝑞 ∈ (Atoms‘𝐾) → 𝑞 ∈ (Base‘𝐾))
40	16, 39	syl 18	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → 𝑞 ∈ (Base‘𝐾))
41		f1ocnvfv2 7275	. . . . . . . . 9 ⊢ ((𝐹:(Base‘𝐾)–1-1-onto→(Base‘𝐾) ∧ 𝑞 ∈ (Base‘𝐾)) → (𝐹‘(◡𝐹‘𝑞)) = 𝑞)
42	26, 40, 41	syl2anc 595	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → (𝐹‘(◡𝐹‘𝑞)) = 𝑞)
43	42	oveq2d 7426	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((◡𝐹‘𝑞)(join‘𝐾)(𝐹‘(◡𝐹‘𝑞))) = ((◡𝐹‘𝑞)(join‘𝐾)𝑞))
44	12, 13, 1, 3	ltrncnvat 40935	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝑞 ∈ (Atoms‘𝐾)) → (◡𝐹‘𝑞) ∈ (Atoms‘𝐾))
45	8, 9, 16, 44	syl3anc 1398	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → (◡𝐹‘𝑞) ∈ (Atoms‘𝐾))
46	20, 13	hlatjcom 40162	. . . . . . . 8 ⊢ ((𝐾 ∈ HL ∧ (◡𝐹‘𝑞) ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) → ((◡𝐹‘𝑞)(join‘𝐾)𝑞) = (𝑞(join‘𝐾)(◡𝐹‘𝑞)))
47	32, 45, 16, 46	syl3anc 1398	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((◡𝐹‘𝑞)(join‘𝐾)𝑞) = (𝑞(join‘𝐾)(◡𝐹‘𝑞)))
48	43, 47	eqtrd 2798	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((◡𝐹‘𝑞)(join‘𝐾)(𝐹‘(◡𝐹‘𝑞))) = (𝑞(join‘𝐾)(◡𝐹‘𝑞)))
49	48	oveq1d 7425	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → (((◡𝐹‘𝑞)(join‘𝐾)(𝐹‘(◡𝐹‘𝑞)))(meet‘𝐾)𝑊) = ((𝑞(join‘𝐾)(◡𝐹‘𝑞))(meet‘𝐾)𝑊))
50	23, 38, 49	3eqtr3d 2806	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((𝑝(join‘𝐾)(◡𝐹‘𝑝))(meet‘𝐾)𝑊) = ((𝑞(join‘𝐾)(◡𝐹‘𝑞))(meet‘𝐾)𝑊))
51	50	3exp 1137	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → ((𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) → ((¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊) → ((𝑝(join‘𝐾)(◡𝐹‘𝑝))(meet‘𝐾)𝑊) = ((𝑞(join‘𝐾)(◡𝐹‘𝑞))(meet‘𝐾)𝑊))))
52	51	ralrimivv 3206	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → ∀𝑝 ∈ (Atoms‘𝐾)∀𝑞 ∈ (Atoms‘𝐾)((¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊) → ((𝑝(join‘𝐾)(◡𝐹‘𝑝))(meet‘𝐾)𝑊) = ((𝑞(join‘𝐾)(◡𝐹‘𝑞))(meet‘𝐾)𝑊)))
53	12, 20, 21, 13, 1, 2, 3	isltrn 40913	. . 3 ⊢ ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) → (◡𝐹 ∈ 𝑇 ↔ (◡𝐹 ∈ ((LDil‘𝐾)‘𝑊) ∧ ∀𝑝 ∈ (Atoms‘𝐾)∀𝑞 ∈ (Atoms‘𝐾)((¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊) → ((𝑝(join‘𝐾)(◡𝐹‘𝑝))(meet‘𝐾)𝑊) = ((𝑞(join‘𝐾)(◡𝐹‘𝑞))(meet‘𝐾)𝑊)))))
54	53	adantr 485	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → (◡𝐹 ∈ 𝑇 ↔ (◡𝐹 ∈ ((LDil‘𝐾)‘𝑊) ∧ ∀𝑝 ∈ (Atoms‘𝐾)∀𝑞 ∈ (Atoms‘𝐾)((¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊) → ((𝑝(join‘𝐾)(◡𝐹‘𝑝))(meet‘𝐾)𝑊) = ((𝑞(join‘𝐾)(◡𝐹‘𝑞))(meet‘𝐾)𝑊)))))
55	6, 52, 54	mpbir2and 725	1 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → ◡𝐹 ∈ 𝑇)

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 400   ∧ w3a 1103   = wceq 1570   ∈ wcel 2143  ∀wral 3079   class class class wbr 5109  ^◡ccnv 5660  –1-1-onto→wf1o 6535  ‘cfv 6536  (class class class)co 7410  Basecbs 17264  lecple 17312  joincjn 18362  meetcmee 18363  Atomscatm 40057  HLchlt 40144  LHypclh 40778  LDilcldil 40894  LTrncltrn 40895

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5238  ax-sep 5257  ax-nul 5269  ax-pow 5336  ax-pr 5404  ax-un 7732

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-ral 3080  df-rex 3090  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3745  df-csb 3854  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-nul 4287  df-if 4488  df-pw 4564  df-sn 4590  df-pr 4592  df-op 4596  df-uni 4873  df-iun 4958  df-br 5110  df-opab 5174  df-mpt 5193  df-id 5556  df-xp 5667  df-rel 5668  df-cnv 5669  df-co 5670  df-dm 5671  df-rn 5672  df-res 5673  df-ima 5674  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-riota 7367  df-ov 7413  df-oprab 7414  df-mpo 7415  df-map 8822  df-proset 18345  df-poset 18364  df-plt 18379  df-lub 18395  df-glb 18396  df-join 18397  df-p0 18474  df-lat 18483  df-oposet 39970  df-ol 39972  df-oml 39973  df-covers 40060  df-ats 40061  df-atl 40092  df-cvlat 40116  df-hlat 40145  df-lhyp 40782  df-laut 40783  df-ldil 40898  df-ltrn 40899

This theorem is referenced by:  trlcnv  40959  trlcocnv  41514  trlcoabs2N  41516  trlcoat  41517  trlcocnvat  41518  trlcone  41522  cdlemg46  41529  tgrpgrplem  41543  tendoicl  41590  cdlemh1  41609  cdlemh2  41610  cdlemh  41611  cdlemi2  41613  cdlemi  41614  cdlemk2  41626  cdlemk3  41627  cdlemk4  41628  cdlemk8  41632  cdlemk9  41633  cdlemk9bN  41634  cdlemkvcl  41636  cdlemk10  41637  cdlemk11  41643  cdlemk12  41644  cdlemk14  41648  cdlemk11u  41665  cdlemk12u  41666  cdlemk37  41708  cdlemkfid1N  41715  cdlemkid1  41716  cdlemkid2  41718  tendocnv  41815  tendospcanN  41817  dvhgrp  41901  cdlemn8  41998  dihopelvalcpre  42042  dih1  42080  dihglbcpreN  42094  dihjatcclem3  42214  dihjatcclem4  42215