Users' Mathboxes Mathbox for Norm Megill < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  cdleme7c Structured version   Visualization version   GIF version

Theorem cdleme7c 37996
Description: Part of proof of Lemma E in [Crawley] p. 113. Lemma leading to cdleme7ga 37999 and cdleme7 38000. (Contributed by NM, 7-Jun-2012.)
Hypotheses
Ref Expression
cdleme4.l = (le‘𝐾)
cdleme4.j = (join‘𝐾)
cdleme4.m = (meet‘𝐾)
cdleme4.a 𝐴 = (Atoms‘𝐾)
cdleme4.h 𝐻 = (LHyp‘𝐾)
cdleme4.u 𝑈 = ((𝑃 𝑄) 𝑊)
cdleme4.f 𝐹 = ((𝑆 𝑈) (𝑄 ((𝑃 𝑆) 𝑊)))
cdleme4.g 𝐺 = ((𝑃 𝑄) (𝐹 ((𝑅 𝑆) 𝑊)))
cdleme7.v 𝑉 = ((𝑅 𝑆) 𝑊)
Assertion
Ref Expression
cdleme7c ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → 𝑈𝑉)

Proof of Theorem cdleme7c
StepHypRef Expression
1 cdleme4.u . . . 4 𝑈 = ((𝑃 𝑄) 𝑊)
2 cdleme7.v . . . 4 𝑉 = ((𝑅 𝑆) 𝑊)
31, 2oveq12i 7225 . . 3 (𝑈 𝑉) = (((𝑃 𝑄) 𝑊) ((𝑅 𝑆) 𝑊))
4 simp11 1205 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → (𝐾 ∈ HL ∧ 𝑊𝐻))
5 simp12l 1288 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → 𝑃𝐴)
6 simp13 1207 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → 𝑄𝐴)
7 simp2l 1201 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → (𝑅𝐴 ∧ ¬ 𝑅 𝑊))
8 simp32 1212 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → 𝑅 (𝑃 𝑄))
9 cdleme4.l . . . . . . . . 9 = (le‘𝐾)
10 cdleme4.j . . . . . . . . 9 = (join‘𝐾)
11 cdleme4.m . . . . . . . . 9 = (meet‘𝐾)
12 cdleme4.a . . . . . . . . 9 𝐴 = (Atoms‘𝐾)
13 cdleme4.h . . . . . . . . 9 𝐻 = (LHyp‘𝐾)
149, 10, 11, 12, 13, 1cdleme4 37989 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴𝑄𝐴 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ 𝑅 (𝑃 𝑄)) → (𝑃 𝑄) = (𝑅 𝑈))
154, 5, 6, 7, 8, 14syl131anc 1385 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → (𝑃 𝑄) = (𝑅 𝑈))
1615oveq1d 7228 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → ((𝑃 𝑄) (𝑅 𝑆)) = ((𝑅 𝑈) (𝑅 𝑆)))
17 simp11l 1286 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → 𝐾 ∈ HL)
18 simp12 1206 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
19 simp31 1211 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → 𝑃𝑄)
209, 10, 11, 12, 13, 1lhpat2 37796 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴𝑃𝑄)) → 𝑈𝐴)
214, 18, 6, 19, 20syl112anc 1376 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → 𝑈𝐴)
22 simp2rl 1244 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → 𝑆𝐴)
23 simp2ll 1242 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → 𝑅𝐴)
2417hllatd 37115 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → 𝐾 ∈ Lat)
25 eqid 2737 . . . . . . . . . . . 12 (Base‘𝐾) = (Base‘𝐾)
2625, 10, 12hlatjcl 37118 . . . . . . . . . . 11 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) → (𝑃 𝑄) ∈ (Base‘𝐾))
2717, 5, 6, 26syl3anc 1373 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → (𝑃 𝑄) ∈ (Base‘𝐾))
28 simp11r 1287 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → 𝑊𝐻)
2925, 13lhpbase 37749 . . . . . . . . . . 11 (𝑊𝐻𝑊 ∈ (Base‘𝐾))
3028, 29syl 17 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → 𝑊 ∈ (Base‘𝐾))
3125, 9, 11latmle2 17971 . . . . . . . . . 10 ((𝐾 ∈ Lat ∧ (𝑃 𝑄) ∈ (Base‘𝐾) ∧ 𝑊 ∈ (Base‘𝐾)) → ((𝑃 𝑄) 𝑊) 𝑊)
3224, 27, 30, 31syl3anc 1373 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → ((𝑃 𝑄) 𝑊) 𝑊)
331, 32eqbrtrid 5088 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → 𝑈 𝑊)
34 simp2rr 1245 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → ¬ 𝑆 𝑊)
35 nbrne2 5073 . . . . . . . 8 ((𝑈 𝑊 ∧ ¬ 𝑆 𝑊) → 𝑈𝑆)
3633, 34, 35syl2anc 587 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → 𝑈𝑆)
37 cdleme4.f . . . . . . . 8 𝐹 = ((𝑆 𝑈) (𝑄 ((𝑃 𝑆) 𝑊)))
38 cdleme4.g . . . . . . . 8 𝐺 = ((𝑃 𝑄) (𝐹 ((𝑅 𝑆) 𝑊)))
399, 10, 11, 12, 13, 1, 37, 38cdleme7aa 37993 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → ¬ 𝑅 (𝑈 𝑆))
409, 10, 11, 122llnma2 37540 . . . . . . 7 ((𝐾 ∈ HL ∧ (𝑈𝐴𝑆𝐴𝑅𝐴) ∧ (𝑈𝑆 ∧ ¬ 𝑅 (𝑈 𝑆))) → ((𝑅 𝑈) (𝑅 𝑆)) = 𝑅)
4117, 21, 22, 23, 36, 39, 40syl132anc 1390 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → ((𝑅 𝑈) (𝑅 𝑆)) = 𝑅)
4216, 41eqtrd 2777 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → ((𝑃 𝑄) (𝑅 𝑆)) = 𝑅)
4342oveq1d 7228 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → (((𝑃 𝑄) (𝑅 𝑆)) 𝑊) = (𝑅 𝑊))
44 hlol 37112 . . . . . 6 (𝐾 ∈ HL → 𝐾 ∈ OL)
4517, 44syl 17 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → 𝐾 ∈ OL)
4625, 10, 12hlatjcl 37118 . . . . . 6 ((𝐾 ∈ HL ∧ 𝑅𝐴𝑆𝐴) → (𝑅 𝑆) ∈ (Base‘𝐾))
4717, 23, 22, 46syl3anc 1373 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → (𝑅 𝑆) ∈ (Base‘𝐾))
4825, 11latmmdir 36986 . . . . 5 ((𝐾 ∈ OL ∧ ((𝑃 𝑄) ∈ (Base‘𝐾) ∧ (𝑅 𝑆) ∈ (Base‘𝐾) ∧ 𝑊 ∈ (Base‘𝐾))) → (((𝑃 𝑄) (𝑅 𝑆)) 𝑊) = (((𝑃 𝑄) 𝑊) ((𝑅 𝑆) 𝑊)))
4945, 27, 47, 30, 48syl13anc 1374 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → (((𝑃 𝑄) (𝑅 𝑆)) 𝑊) = (((𝑃 𝑄) 𝑊) ((𝑅 𝑆) 𝑊)))
50 eqid 2737 . . . . . 6 (0.‘𝐾) = (0.‘𝐾)
519, 11, 50, 12, 13lhpmat 37781 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) → (𝑅 𝑊) = (0.‘𝐾))
524, 7, 51syl2anc 587 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → (𝑅 𝑊) = (0.‘𝐾))
5343, 49, 523eqtr3d 2785 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → (((𝑃 𝑄) 𝑊) ((𝑅 𝑆) 𝑊)) = (0.‘𝐾))
543, 53syl5eq 2790 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → (𝑈 𝑉) = (0.‘𝐾))
55 hlatl 37111 . . . 4 (𝐾 ∈ HL → 𝐾 ∈ AtLat)
5617, 55syl 17 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → 𝐾 ∈ AtLat)
57 simp33 1213 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → ¬ 𝑆 (𝑃 𝑄))
589, 10, 11, 12, 13, 1, 37, 38, 2cdleme7b 37995 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 (𝑃 𝑄) ∧ 𝑅 (𝑃 𝑄))) → 𝑉𝐴)
594, 7, 22, 57, 8, 58syl113anc 1384 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → 𝑉𝐴)
6011, 50, 12atnem0 37069 . . 3 ((𝐾 ∈ AtLat ∧ 𝑈𝐴𝑉𝐴) → (𝑈𝑉 ↔ (𝑈 𝑉) = (0.‘𝐾)))
6156, 21, 59, 60syl3anc 1373 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → (𝑈𝑉 ↔ (𝑈 𝑉) = (0.‘𝐾)))
6254, 61mpbird 260 1 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 (𝑃 𝑄))) → 𝑈𝑉)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 209  wa 399  w3a 1089   = wceq 1543  wcel 2110  wne 2940   class class class wbr 5053  cfv 6380  (class class class)co 7213  Basecbs 16760  lecple 16809  joincjn 17818  meetcmee 17819  0.cp0 17929  Latclat 17937  OLcol 36925  Atomscatm 37014  AtLatcal 37015  HLchlt 37101  LHypclh 37735
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1803  ax-4 1817  ax-5 1918  ax-6 1976  ax-7 2016  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2158  ax-12 2175  ax-ext 2708  ax-rep 5179  ax-sep 5192  ax-nul 5199  ax-pow 5258  ax-pr 5322  ax-un 7523
This theorem depends on definitions:  df-bi 210  df-an 400  df-or 848  df-3an 1091  df-tru 1546  df-fal 1556  df-ex 1788  df-nf 1792  df-sb 2071  df-mo 2539  df-eu 2568  df-clab 2715  df-cleq 2729  df-clel 2816  df-nfc 2886  df-ne 2941  df-ral 3066  df-rex 3067  df-reu 3068  df-rab 3070  df-v 3410  df-sbc 3695  df-csb 3812  df-dif 3869  df-un 3871  df-in 3873  df-ss 3883  df-nul 4238  df-if 4440  df-pw 4515  df-sn 4542  df-pr 4544  df-op 4548  df-uni 4820  df-iun 4906  df-iin 4907  df-br 5054  df-opab 5116  df-mpt 5136  df-id 5455  df-xp 5557  df-rel 5558  df-cnv 5559  df-co 5560  df-dm 5561  df-rn 5562  df-res 5563  df-ima 5564  df-iota 6338  df-fun 6382  df-fn 6383  df-f 6384  df-f1 6385  df-fo 6386  df-f1o 6387  df-fv 6388  df-riota 7170  df-ov 7216  df-oprab 7217  df-mpo 7218  df-1st 7761  df-2nd 7762  df-proset 17802  df-poset 17820  df-plt 17836  df-lub 17852  df-glb 17853  df-join 17854  df-meet 17855  df-p0 17931  df-p1 17932  df-lat 17938  df-clat 18005  df-oposet 36927  df-ol 36929  df-oml 36930  df-covers 37017  df-ats 37018  df-atl 37049  df-cvlat 37073  df-hlat 37102  df-psubsp 37254  df-pmap 37255  df-padd 37547  df-lhyp 37739
This theorem is referenced by:  cdleme7d  37997  cdleme7ga  37999
  Copyright terms: Public domain W3C validator