Theorem ltrncnv 40810

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 2769	. . . 4 ⊢ ((LDil‘𝐾)‘𝑊) = ((LDil‘𝐾)‘𝑊)
3		ltrncnv.t	. . . 4 ⊢ 𝑇 = ((LTrn‘𝐾)‘𝑊)
4	1, 2, 3	ltrnldil 40786	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → 𝐹 ∈ ((LDil‘𝐾)‘𝑊))
5	1, 2	ldilcnv 40779	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ ((LDil‘𝐾)‘𝑊)) → ◡𝐹 ∈ ((LDil‘𝐾)‘𝑊))
6	4, 5	syldan 602	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → ◡𝐹 ∈ ((LDil‘𝐾)‘𝑊))
7		simp1 1152	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇))
8		simp1l 1214	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
9		simp1r 1215	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → 𝐹 ∈ 𝑇)
10		simp2l 1216	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → 𝑝 ∈ (Atoms‘𝐾))
11		simp3l 1218	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ¬ 𝑝(le‘𝐾)𝑊)
12		eqid 2769	. . . . . . . 8 ⊢ (le‘𝐾) = (le‘𝐾)
13		eqid 2769	. . . . . . . 8 ⊢ (Atoms‘𝐾) = (Atoms‘𝐾)
14	12, 13, 1, 3	ltrncnvel 40806	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ ¬ 𝑝(le‘𝐾)𝑊)) → ((◡𝐹‘𝑝) ∈ (Atoms‘𝐾) ∧ ¬ (◡𝐹‘𝑝)(le‘𝐾)𝑊))
15	8, 9, 10, 11, 14	syl112anc 1399	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((◡𝐹‘𝑝) ∈ (Atoms‘𝐾) ∧ ¬ (◡𝐹‘𝑝)(le‘𝐾)𝑊))
16		simp2r 1217	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → 𝑞 ∈ (Atoms‘𝐾))
17		simp3r 1219	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ¬ 𝑞(le‘𝐾)𝑊)
18	12, 13, 1, 3	ltrncnvel 40806	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ (𝑞 ∈ (Atoms‘𝐾) ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((◡𝐹‘𝑞) ∈ (Atoms‘𝐾) ∧ ¬ (◡𝐹‘𝑞)(le‘𝐾)𝑊))
19	8, 9, 16, 17, 18	syl112anc 1399	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((◡𝐹‘𝑞) ∈ (Atoms‘𝐾) ∧ ¬ (◡𝐹‘𝑞)(le‘𝐾)𝑊))
20		eqid 2769	. . . . . . 7 ⊢ (join‘𝐾) = (join‘𝐾)
21		eqid 2769	. . . . . . 7 ⊢ (meet‘𝐾) = (meet‘𝐾)
22	12, 20, 21, 13, 1, 3	ltrnu 40785	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ ((◡𝐹‘𝑝) ∈ (Atoms‘𝐾) ∧ ¬ (◡𝐹‘𝑝)(le‘𝐾)𝑊) ∧ ((◡𝐹‘𝑞) ∈ (Atoms‘𝐾) ∧ ¬ (◡𝐹‘𝑞)(le‘𝐾)𝑊)) → (((◡𝐹‘𝑝)(join‘𝐾)(𝐹‘(◡𝐹‘𝑝)))(meet‘𝐾)𝑊) = (((◡𝐹‘𝑞)(join‘𝐾)(𝐹‘(◡𝐹‘𝑞)))(meet‘𝐾)𝑊))
23	7, 15, 19, 22	syl3anc 1396	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → (((◡𝐹‘𝑝)(join‘𝐾)(𝐹‘(◡𝐹‘𝑝)))(meet‘𝐾)𝑊) = (((◡𝐹‘𝑞)(join‘𝐾)(𝐹‘(◡𝐹‘𝑞)))(meet‘𝐾)𝑊))
24		eqid 2769	. . . . . . . . . . 11 ⊢ (Base‘𝐾) = (Base‘𝐾)
25	24, 1, 3	ltrn1o 40788	. . . . . . . . . 10 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → 𝐹:(Base‘𝐾)–1-1-onto→(Base‘𝐾))
26	25	3ad2ant1 1149	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → 𝐹:(Base‘𝐾)–1-1-onto→(Base‘𝐾))
27	24, 13	atbase 39953	. . . . . . . . . 10 ⊢ (𝑝 ∈ (Atoms‘𝐾) → 𝑝 ∈ (Base‘𝐾))
28	10, 27	syl 18	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → 𝑝 ∈ (Base‘𝐾))
29		f1ocnvfv2 7276	. . . . . . . . 9 ⊢ ((𝐹:(Base‘𝐾)–1-1-onto→(Base‘𝐾) ∧ 𝑝 ∈ (Base‘𝐾)) → (𝐹‘(◡𝐹‘𝑝)) = 𝑝)
30	26, 28, 29	syl2anc 595	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → (𝐹‘(◡𝐹‘𝑝)) = 𝑝)
31	30	oveq2d 7427	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((◡𝐹‘𝑝)(join‘𝐾)(𝐹‘(◡𝐹‘𝑝))) = ((◡𝐹‘𝑝)(join‘𝐾)𝑝))
32		simp1ll 1253	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → 𝐾 ∈ HL)
33	12, 13, 1, 3	ltrncnvat 40805	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝑝 ∈ (Atoms‘𝐾)) → (◡𝐹‘𝑝) ∈ (Atoms‘𝐾))
34	8, 9, 10, 33	syl3anc 1396	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → (◡𝐹‘𝑝) ∈ (Atoms‘𝐾))
35	20, 13	hlatjcom 40032	. . . . . . . 8 ⊢ ((𝐾 ∈ HL ∧ (◡𝐹‘𝑝) ∈ (Atoms‘𝐾) ∧ 𝑝 ∈ (Atoms‘𝐾)) → ((◡𝐹‘𝑝)(join‘𝐾)𝑝) = (𝑝(join‘𝐾)(◡𝐹‘𝑝)))
36	32, 34, 10, 35	syl3anc 1396	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((◡𝐹‘𝑝)(join‘𝐾)𝑝) = (𝑝(join‘𝐾)(◡𝐹‘𝑝)))
37	31, 36	eqtrd 2804	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((◡𝐹‘𝑝)(join‘𝐾)(𝐹‘(◡𝐹‘𝑝))) = (𝑝(join‘𝐾)(◡𝐹‘𝑝)))
38	37	oveq1d 7426	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → (((◡𝐹‘𝑝)(join‘𝐾)(𝐹‘(◡𝐹‘𝑝)))(meet‘𝐾)𝑊) = ((𝑝(join‘𝐾)(◡𝐹‘𝑝))(meet‘𝐾)𝑊))
39	24, 13	atbase 39953	. . . . . . . . . 10 ⊢ (𝑞 ∈ (Atoms‘𝐾) → 𝑞 ∈ (Base‘𝐾))
40	16, 39	syl 18	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → 𝑞 ∈ (Base‘𝐾))
41		f1ocnvfv2 7276	. . . . . . . . 9 ⊢ ((𝐹:(Base‘𝐾)–1-1-onto→(Base‘𝐾) ∧ 𝑞 ∈ (Base‘𝐾)) → (𝐹‘(◡𝐹‘𝑞)) = 𝑞)
42	26, 40, 41	syl2anc 595	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → (𝐹‘(◡𝐹‘𝑞)) = 𝑞)
43	42	oveq2d 7427	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((◡𝐹‘𝑞)(join‘𝐾)(𝐹‘(◡𝐹‘𝑞))) = ((◡𝐹‘𝑞)(join‘𝐾)𝑞))
44	12, 13, 1, 3	ltrncnvat 40805	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝑞 ∈ (Atoms‘𝐾)) → (◡𝐹‘𝑞) ∈ (Atoms‘𝐾))
45	8, 9, 16, 44	syl3anc 1396	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → (◡𝐹‘𝑞) ∈ (Atoms‘𝐾))
46	20, 13	hlatjcom 40032	. . . . . . . 8 ⊢ ((𝐾 ∈ HL ∧ (◡𝐹‘𝑞) ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) → ((◡𝐹‘𝑞)(join‘𝐾)𝑞) = (𝑞(join‘𝐾)(◡𝐹‘𝑞)))
47	32, 45, 16, 46	syl3anc 1396	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((◡𝐹‘𝑞)(join‘𝐾)𝑞) = (𝑞(join‘𝐾)(◡𝐹‘𝑞)))
48	43, 47	eqtrd 2804	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((◡𝐹‘𝑞)(join‘𝐾)(𝐹‘(◡𝐹‘𝑞))) = (𝑞(join‘𝐾)(◡𝐹‘𝑞)))
49	48	oveq1d 7426	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → (((◡𝐹‘𝑞)(join‘𝐾)(𝐹‘(◡𝐹‘𝑞)))(meet‘𝐾)𝑊) = ((𝑞(join‘𝐾)(◡𝐹‘𝑞))(meet‘𝐾)𝑊))
50	23, 38, 49	3eqtr3d 2812	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊)) → ((𝑝(join‘𝐾)(◡𝐹‘𝑝))(meet‘𝐾)𝑊) = ((𝑞(join‘𝐾)(◡𝐹‘𝑞))(meet‘𝐾)𝑊))
51	50	3exp 1135	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → ((𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) → ((¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊) → ((𝑝(join‘𝐾)(◡𝐹‘𝑝))(meet‘𝐾)𝑊) = ((𝑞(join‘𝐾)(◡𝐹‘𝑞))(meet‘𝐾)𝑊))))
52	51	ralrimivv 3212	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → ∀𝑝 ∈ (Atoms‘𝐾)∀𝑞 ∈ (Atoms‘𝐾)((¬ 𝑝(le‘𝐾)𝑊 ∧ ¬ 𝑞(le‘𝐾)𝑊) → ((𝑝(join‘𝐾)(◡𝐹‘𝑝))(meet‘𝐾)𝑊) = ((𝑞(join‘𝐾)(◡𝐹‘𝑞))(meet‘𝐾)𝑊)))
53	12, 20, 21, 13, 1, 2, 3	isltrn 40783	. . 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 1101   = wceq 1567   ∈ wcel 2149  ∀wral 3085   class class class wbr 5113  ^◡ccnv 5661  –1-1-onto→wf1o 6536  ‘cfv 6537  (class class class)co 7411  Basecbs 17269  lecple 17317  joincjn 18367  meetcmee 18368  Atomscatm 39927  HLchlt 40014  LHypclh 40648  LDilcldil 40764  LTrncltrn 40765

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1822  ax-4 1836  ax-5 1937  ax-6 1994  ax-7 2035  ax-8 2151  ax-9 2159  ax-10 2182  ax-11 2198  ax-12 2219  ax-ext 2741  ax-rep 5242  ax-sep 5261  ax-nul 5271  ax-pow 5337  ax-pr 5405  ax-un 7733

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3an 1103  df-tru 1570  df-fal 1580  df-ex 1807  df-nf 1811  df-sb 2098  df-mo 2573  df-eu 2603  df-clab 2748  df-cleq 2761  df-clel 2844  df-nfc 2918  df-ne 2965  df-ral 3086  df-rex 3096  df-rmo 3376  df-reu 3377  df-rab 3424  df-v 3465  df-sbc 3754  df-csb 3862  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-nul 4295  df-if 4493  df-pw 4569  df-sn 4595  df-pr 4597  df-op 4601  df-uni 4877  df-iun 4962  df-br 5114  df-opab 5178  df-mpt 5197  df-id 5557  df-xp 5668  df-rel 5669  df-cnv 5670  df-co 5671  df-dm 5672  df-rn 5673  df-res 5674  df-ima 5675  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-riota 7368  df-ov 7414  df-oprab 7415  df-mpo 7416  df-map 8826  df-proset 18350  df-poset 18369  df-plt 18384  df-lub 18400  df-glb 18401  df-join 18402  df-p0 18479  df-lat 18488  df-oposet 39840  df-ol 39842  df-oml 39843  df-covers 39930  df-ats 39931  df-atl 39962  df-cvlat 39986  df-hlat 40015  df-lhyp 40652  df-laut 40653  df-ldil 40768  df-ltrn 40769

This theorem is referenced by:  trlcnv  40829  trlcocnv  41384  trlcoabs2N  41386  trlcoat  41387  trlcocnvat  41388  trlcone  41392  cdlemg46  41399  tgrpgrplem  41413  tendoicl  41460  cdlemh1  41479  cdlemh2  41480  cdlemh  41481  cdlemi2  41483  cdlemi  41484  cdlemk2  41496  cdlemk3  41497  cdlemk4  41498  cdlemk8  41502  cdlemk9  41503  cdlemk9bN  41504  cdlemkvcl  41506  cdlemk10  41507  cdlemk11  41513  cdlemk12  41514  cdlemk14  41518  cdlemk11u  41535  cdlemk12u  41536  cdlemk37  41578  cdlemkfid1N  41585  cdlemkid1  41586  cdlemkid2  41588  tendocnv  41685  tendospcanN  41687  dvhgrp  41771  cdlemn8  41868  dihopelvalcpre  41912  dih1  41950  dihglbcpreN  41964  dihjatcclem3  42084  dihjatcclem4  42085