Metamath Proof Explorer


Theorem dalawlem10

Description: Lemma for dalaw . Combine dalawlem5 , dalawlem8 , and dalawlem9 . (Contributed by NM, 6-Oct-2012)

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

Proof

Step Hyp Ref Expression
1 dalawlem.l = ( le ‘ 𝐾 )
2 dalawlem.j = ( join ‘ 𝐾 )
3 dalawlem.m = ( meet ‘ 𝐾 )
4 dalawlem.a 𝐴 = ( Atoms ‘ 𝐾 )
5 simp11 ( ( ( 𝐾 ∈ HL ∧ ¬ ( ¬ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ¬ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑄 𝑅 ) ∧ ¬ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑃 ) ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → 𝐾 ∈ HL )
6 simp12 ( ( ( 𝐾 ∈ HL ∧ ¬ ( ¬ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ¬ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑄 𝑅 ) ∧ ¬ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑃 ) ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ¬ ( ¬ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ¬ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑄 𝑅 ) ∧ ¬ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑃 ) ) )
7 3oran ( ( ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∨ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑄 𝑅 ) ∨ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑃 ) ) ↔ ¬ ( ¬ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ¬ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑄 𝑅 ) ∧ ¬ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑃 ) ) )
8 6 7 sylibr ( ( ( 𝐾 ∈ HL ∧ ¬ ( ¬ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ¬ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑄 𝑅 ) ∧ ¬ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑃 ) ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∨ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑄 𝑅 ) ∨ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑃 ) ) )
9 simp13 ( ( ( 𝐾 ∈ HL ∧ ¬ ( ¬ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ¬ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑄 𝑅 ) ∧ ¬ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑃 ) ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) )
10 simp2 ( ( ( 𝐾 ∈ HL ∧ ¬ ( ¬ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ¬ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑄 𝑅 ) ∧ ¬ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑃 ) ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) )
11 simp3 ( ( ( 𝐾 ∈ HL ∧ ¬ ( ¬ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ¬ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑄 𝑅 ) ∧ ¬ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑃 ) ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) )
12 1 2 3 4 dalawlem5 ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( 𝑃 𝑄 ) ( 𝑆 𝑇 ) ) ( ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ) )
13 12 3expib ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) → ( ( ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( 𝑃 𝑄 ) ( 𝑆 𝑇 ) ) ( ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ) ) )
14 13 3exp ( 𝐾 ∈ HL → ( ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) → ( ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) → ( ( ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( 𝑃 𝑄 ) ( 𝑆 𝑇 ) ) ( ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ) ) ) ) )
15 1 2 3 4 dalawlem8 ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑄 𝑅 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( 𝑃 𝑄 ) ( 𝑆 𝑇 ) ) ( ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ) )
16 15 3expib ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑄 𝑅 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) → ( ( ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( 𝑃 𝑄 ) ( 𝑆 𝑇 ) ) ( ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ) ) )
17 16 3exp ( 𝐾 ∈ HL → ( ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑄 𝑅 ) → ( ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) → ( ( ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( 𝑃 𝑄 ) ( 𝑆 𝑇 ) ) ( ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ) ) ) ) )
18 1 2 3 4 dalawlem9 ( ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑃 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( 𝑃 𝑄 ) ( 𝑆 𝑇 ) ) ( ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ) )
19 18 3expib ( ( 𝐾 ∈ HL ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑃 ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) → ( ( ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( 𝑃 𝑄 ) ( 𝑆 𝑇 ) ) ( ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ) ) )
20 19 3exp ( 𝐾 ∈ HL → ( ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑃 ) → ( ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) → ( ( ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( 𝑃 𝑄 ) ( 𝑆 𝑇 ) ) ( ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ) ) ) ) )
21 14 17 20 3jaod ( 𝐾 ∈ HL → ( ( ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∨ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑄 𝑅 ) ∨ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑃 ) ) → ( ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) → ( ( ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( 𝑃 𝑄 ) ( 𝑆 𝑇 ) ) ( ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ) ) ) ) )
22 21 3imp ( ( 𝐾 ∈ HL ∧ ( ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∨ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑄 𝑅 ) ∨ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑃 ) ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) → ( ( ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( 𝑃 𝑄 ) ( 𝑆 𝑇 ) ) ( ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ) ) )
23 22 3impib ( ( ( 𝐾 ∈ HL ∧ ( ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∨ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑄 𝑅 ) ∨ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑃 ) ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( 𝑃 𝑄 ) ( 𝑆 𝑇 ) ) ( ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ) )
24 5 8 9 10 11 23 syl311anc ( ( ( 𝐾 ∈ HL ∧ ¬ ( ¬ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑃 𝑄 ) ∧ ¬ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑄 𝑅 ) ∧ ¬ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑃 ) ) ∧ ( ( 𝑃 𝑆 ) ( 𝑄 𝑇 ) ) ( 𝑅 𝑈 ) ) ∧ ( 𝑃𝐴𝑄𝐴𝑅𝐴 ) ∧ ( 𝑆𝐴𝑇𝐴𝑈𝐴 ) ) → ( ( 𝑃 𝑄 ) ( 𝑆 𝑇 ) ) ( ( ( 𝑄 𝑅 ) ( 𝑇 𝑈 ) ) ( ( 𝑅 𝑃 ) ( 𝑈 𝑆 ) ) ) )