Metamath Proof Explorer


Theorem dalawlem5

Description: Lemma for dalaw . Special case to eliminate the requirement -. ( P .\/ S ) ./\ ( Q .\/ T ) ) .<_ ( P .\/ Q ) in dalawlem1 . (Contributed by NM, 4-Oct-2012)

Ref Expression
Hypotheses dalawlem.l = ( le ‘ 𝐾 )
dalawlem.j = ( join ‘ 𝐾 )
dalawlem.m = ( meet ‘ 𝐾 )
dalawlem.a 𝐴 = ( Atoms ‘ 𝐾 )
Assertion dalawlem5 ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( 𝑃 𝑄 ) ( 𝑆 𝑇 ) ) ( ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ) )

Proof

Step Hyp Ref Expression
1 dalawlem.l = ( le ‘ 𝐾 )
2 dalawlem.j = ( join ‘ 𝐾 )
3 dalawlem.m = ( meet ‘ 𝐾 )
4 dalawlem.a 𝐴 = ( Atoms ‘ 𝐾 )
5 eqid ( Base ‘ 𝐾 ) = ( Base ‘ 𝐾 )
6 simp11 ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → 𝐾 ∈ HL )
7 6 hllatd ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → 𝐾 ∈ Lat )
8 simp21 ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → 𝑃𝐴 )
9 simp22 ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → 𝑄𝐴 )
10 5 2 4 hlatjcl ( ( 𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴 ) → ( 𝑃 𝑄 ) ∈ ( Base ‘ 𝐾 ) )
11 6 8 9 10 syl3anc ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( 𝑃 𝑄 ) ∈ ( Base ‘ 𝐾 ) )
12 simp31 ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → 𝑆𝐴 )
13 simp32 ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → 𝑇𝐴 )
14 5 2 4 hlatjcl ( ( 𝐾 ∈ HL ∧ 𝑆𝐴𝑇𝐴 ) → ( 𝑆 𝑇 ) ∈ ( Base ‘ 𝐾 ) )
15 6 12 13 14 syl3anc ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( 𝑆 𝑇 ) ∈ ( Base ‘ 𝐾 ) )
16 5 3 latmcl ( ( 𝐾 ∈ Lat ∧ ( 𝑃 𝑄 ) ∈ ( Base ‘ 𝐾 ) ∧ ( 𝑆 𝑇 ) ∈ ( Base ‘ 𝐾 ) ) → ( ( 𝑃 𝑄 ) ( 𝑆 𝑇 ) ) ∈ ( Base ‘ 𝐾 ) )
17 7 11 15 16 syl3anc ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( 𝑃 𝑄 ) ( 𝑆 𝑇 ) ) ∈ ( Base ‘ 𝐾 ) )
18 5 4 atbase ( 𝑇𝐴𝑇 ∈ ( Base ‘ 𝐾 ) )
19 13 18 syl ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → 𝑇 ∈ ( Base ‘ 𝐾 ) )
20 5 2 latjcl ( ( 𝐾 ∈ Lat ∧ ( 𝑃 𝑄 ) ∈ ( Base ‘ 𝐾 ) ∧ 𝑇 ∈ ( Base ‘ 𝐾 ) ) → ( ( 𝑃 𝑄 ) 𝑇 ) ∈ ( Base ‘ 𝐾 ) )
21 7 11 19 20 syl3anc ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( 𝑃 𝑄 ) 𝑇 ) ∈ ( Base ‘ 𝐾 ) )
22 5 4 atbase ( 𝑆𝐴𝑆 ∈ ( Base ‘ 𝐾 ) )
23 12 22 syl ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → 𝑆 ∈ ( Base ‘ 𝐾 ) )
24 5 3 latmcl ( ( 𝐾 ∈ Lat ∧ ( ( 𝑃 𝑄 ) 𝑇 ) ∈ ( Base ‘ 𝐾 ) ∧ 𝑆 ∈ ( Base ‘ 𝐾 ) ) → ( ( ( 𝑃 𝑄 ) 𝑇 ) 𝑆 ) ∈ ( Base ‘ 𝐾 ) )
25 7 21 23 24 syl3anc ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( ( 𝑃 𝑄 ) 𝑇 ) 𝑆 ) ∈ ( Base ‘ 𝐾 ) )
26 5 2 latjcl ( ( 𝐾 ∈ Lat ∧ ( 𝑃 𝑄 ) ∈ ( Base ‘ 𝐾 ) ∧ 𝑆 ∈ ( Base ‘ 𝐾 ) ) → ( ( 𝑃 𝑄 ) 𝑆 ) ∈ ( Base ‘ 𝐾 ) )
27 7 11 23 26 syl3anc ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( 𝑃 𝑄 ) 𝑆 ) ∈ ( Base ‘ 𝐾 ) )
28 5 3 latmcl ( ( 𝐾 ∈ Lat ∧ ( ( 𝑃 𝑄 ) 𝑆 ) ∈ ( Base ‘ 𝐾 ) ∧ 𝑇 ∈ ( Base ‘ 𝐾 ) ) → ( ( ( 𝑃 𝑄 ) 𝑆 ) 𝑇 ) ∈ ( Base ‘ 𝐾 ) )
29 7 27 19 28 syl3anc ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( ( 𝑃 𝑄 ) 𝑆 ) 𝑇 ) ∈ ( Base ‘ 𝐾 ) )
30 5 2 latjcl ( ( 𝐾 ∈ Lat ∧ ( ( ( 𝑃 𝑄 ) 𝑇 ) 𝑆 ) ∈ ( Base ‘ 𝐾 ) ∧ ( ( ( 𝑃 𝑄 ) 𝑆 ) 𝑇 ) ∈ ( Base ‘ 𝐾 ) ) → ( ( ( ( 𝑃 𝑄 ) 𝑇 ) 𝑆 ) ( ( ( 𝑃 𝑄 ) 𝑆 ) 𝑇 ) ) ∈ ( Base ‘ 𝐾 ) )
31 7 25 29 30 syl3anc ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( ( ( 𝑃 𝑄 ) 𝑇 ) 𝑆 ) ( ( ( 𝑃 𝑄 ) 𝑆 ) 𝑇 ) ) ∈ ( Base ‘ 𝐾 ) )
32 simp23 ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → 𝑅𝐴 )
33 5 2 4 hlatjcl ( ( 𝐾 ∈ HL ∧ 𝑄𝐴𝑅𝐴 ) → ( 𝑄 𝑅 ) ∈ ( Base ‘ 𝐾 ) )
34 6 9 32 33 syl3anc ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( 𝑄 𝑅 ) ∈ ( Base ‘ 𝐾 ) )
35 simp33 ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → 𝑈𝐴 )
36 5 2 4 hlatjcl ( ( 𝐾 ∈ HL ∧ 𝑇𝐴𝑈𝐴 ) → ( 𝑇 𝑈 ) ∈ ( Base ‘ 𝐾 ) )
37 6 13 35 36 syl3anc ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( 𝑇 𝑈 ) ∈ ( Base ‘ 𝐾 ) )
38 5 3 latmcl ( ( 𝐾 ∈ Lat ∧ ( 𝑄 𝑅 ) ∈ ( Base ‘ 𝐾 ) ∧ ( 𝑇 𝑈 ) ∈ ( Base ‘ 𝐾 ) ) → ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ∈ ( Base ‘ 𝐾 ) )
39 7 34 37 38 syl3anc ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ∈ ( Base ‘ 𝐾 ) )
40 5 2 4 hlatjcl ( ( 𝐾 ∈ HL ∧ 𝑅𝐴𝑃𝐴 ) → ( 𝑅 𝑃 ) ∈ ( Base ‘ 𝐾 ) )
41 6 32 8 40 syl3anc ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( 𝑅 𝑃 ) ∈ ( Base ‘ 𝐾 ) )
42 5 2 4 hlatjcl ( ( 𝐾 ∈ HL ∧ 𝑈𝐴𝑆𝐴 ) → ( 𝑈 𝑆 ) ∈ ( Base ‘ 𝐾 ) )
43 6 35 12 42 syl3anc ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( 𝑈 𝑆 ) ∈ ( Base ‘ 𝐾 ) )
44 5 3 latmcl ( ( 𝐾 ∈ Lat ∧ ( 𝑅 𝑃 ) ∈ ( Base ‘ 𝐾 ) ∧ ( 𝑈 𝑆 ) ∈ ( Base ‘ 𝐾 ) ) → ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ∈ ( Base ‘ 𝐾 ) )
45 7 41 43 44 syl3anc ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ∈ ( Base ‘ 𝐾 ) )
46 5 2 latjcl ( ( 𝐾 ∈ Lat ∧ ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ∈ ( Base ‘ 𝐾 ) ∧ ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ∈ ( Base ‘ 𝐾 ) ) → ( ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ) ∈ ( Base ‘ 𝐾 ) )
47 7 39 45 46 syl3anc ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ) ∈ ( Base ‘ 𝐾 ) )
48 1 2 3 4 dalawlem2 ( ( 𝐾 ∈ HL ∧ ( 𝑃𝐴𝑄𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴 ) ) → ( ( 𝑃 𝑄 ) ( 𝑆 𝑇 ) ) ( ( ( ( 𝑃 𝑄 ) 𝑇 ) 𝑆 ) ( ( ( 𝑃 𝑄 ) 𝑆 ) 𝑇 ) ) )
49 6 8 9 12 13 48 syl122anc ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( 𝑃 𝑄 ) ( 𝑆 𝑇 ) ) ( ( ( ( 𝑃 𝑄 ) 𝑇 ) 𝑆 ) ( ( ( 𝑃 𝑄 ) 𝑆 ) 𝑇 ) ) )
50 2 4 hlatjcom ( ( 𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴 ) → ( 𝑃 𝑄 ) = ( 𝑄 𝑃 ) )
51 6 8 9 50 syl3anc ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( 𝑃 𝑄 ) = ( 𝑄 𝑃 ) )
52 51 oveq1d ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( 𝑃 𝑄 ) 𝑇 ) = ( ( 𝑄 𝑃 ) 𝑇 ) )
53 2 4 hlatj32 ( ( 𝐾 ∈ HL ∧ ( 𝑄𝐴𝑃𝐴𝑇𝐴 ) ) → ( ( 𝑄 𝑃 ) 𝑇 ) = ( ( 𝑄 𝑇 ) 𝑃 ) )
54 6 9 8 13 53 syl13anc ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( 𝑄 𝑃 ) 𝑇 ) = ( ( 𝑄 𝑇 ) 𝑃 ) )
55 52 54 eqtrd ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( 𝑃 𝑄 ) 𝑇 ) = ( ( 𝑄 𝑇 ) 𝑃 ) )
56 55 oveq1d ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( ( 𝑃 𝑄 ) 𝑇 ) 𝑆 ) = ( ( ( 𝑄 𝑇 ) 𝑃 ) 𝑆 ) )
57 1 2 3 4 dalawlem3 ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( ( 𝑄 𝑇 ) 𝑃 ) 𝑆 ) ( ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ) )
58 56 57 eqbrtrd ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( ( 𝑃 𝑄 ) 𝑇 ) 𝑆 ) ( ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ) )
59 2 4 hlatj32 ( ( 𝐾 ∈ HL ∧ ( 𝑃𝐴𝑄𝐴𝑆𝐴 ) ) → ( ( 𝑃 𝑄 ) 𝑆 ) = ( ( 𝑃 𝑆 ) 𝑄 ) )
60 6 8 9 12 59 syl13anc ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( 𝑃 𝑄 ) 𝑆 ) = ( ( 𝑃 𝑆 ) 𝑄 ) )
61 60 oveq1d ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( ( 𝑃 𝑄 ) 𝑆 ) 𝑇 ) = ( ( ( 𝑃 𝑆 ) 𝑄 ) 𝑇 ) )
62 1 2 3 4 dalawlem4 ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( ( 𝑃 𝑆 ) 𝑄 ) 𝑇 ) ( ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ) )
63 61 62 eqbrtrd ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( ( 𝑃 𝑄 ) 𝑆 ) 𝑇 ) ( ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ) )
64 5 1 2 latjle12 ( ( 𝐾 ∈ Lat ∧ ( ( ( ( 𝑃 𝑄 ) 𝑇 ) 𝑆 ) ∈ ( Base ‘ 𝐾 ) ∧ ( ( ( 𝑃 𝑄 ) 𝑆 ) 𝑇 ) ∈ ( Base ‘ 𝐾 ) ∧ ( ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ) ∈ ( Base ‘ 𝐾 ) ) ) → ( ( ( ( ( 𝑃 𝑄 ) 𝑇 ) 𝑆 ) ( ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ) ∧ ( ( ( 𝑃 𝑄 ) 𝑆 ) 𝑇 ) ( ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ) ) ↔ ( ( ( ( 𝑃 𝑄 ) 𝑇 ) 𝑆 ) ( ( ( 𝑃 𝑄 ) 𝑆 ) 𝑇 ) ) ( ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ) ) )
65 7 25 29 47 64 syl13anc ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( ( ( ( 𝑃 𝑄 ) 𝑇 ) 𝑆 ) ( ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ) ∧ ( ( ( 𝑃 𝑄 ) 𝑆 ) 𝑇 ) ( ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ) ) ↔ ( ( ( ( 𝑃 𝑄 ) 𝑇 ) 𝑆 ) ( ( ( 𝑃 𝑄 ) 𝑆 ) 𝑇 ) ) ( ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ) ) )
66 58 63 65 mpbi2and ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( ( ( 𝑃 𝑄 ) 𝑇 ) 𝑆 ) ( ( ( 𝑃 𝑄 ) 𝑆 ) 𝑇 ) ) ( ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ) )
67 5 1 7 17 31 47 49 66 lattrd ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( 𝑃 𝑄 ) ( 𝑆 𝑇 ) ) ( ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ) )