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

Theorem cdleme37m 40448
Description: Part of proof of Lemma E in [Crawley] p. 113. Show that f(x) is one-to-one on 𝑃 𝑄 line. TODO: FIX COMMENT. (Contributed by NM, 13-Mar-2013.)
Hypotheses
Ref Expression
cdleme37.l = (le‘𝐾)
cdleme37.j = (join‘𝐾)
cdleme37.m = (meet‘𝐾)
cdleme37.a 𝐴 = (Atoms‘𝐾)
cdleme37.h 𝐻 = (LHyp‘𝐾)
cdleme37.u 𝑈 = ((𝑃 𝑄) 𝑊)
cdleme37.e 𝐸 = ((𝑡 𝑈) (𝑄 ((𝑃 𝑡) 𝑊)))
cdleme37.d 𝐷 = ((𝑢 𝑈) (𝑄 ((𝑃 𝑢) 𝑊)))
cdleme37.v 𝑉 = ((𝑡 𝐸) 𝑊)
cdleme37.x 𝑋 = ((𝑢 𝐷) 𝑊)
cdleme37.c 𝐶 = ((𝑆 𝑉) (𝐸 ((𝑡 𝑆) 𝑊)))
cdleme37.g 𝐺 = ((𝑆 𝑋) (𝐷 ((𝑢 𝑆) 𝑊)))
Assertion
Ref Expression
cdleme37m ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → 𝐶 = 𝐺)

Proof of Theorem cdleme37m
StepHypRef Expression
1 simp1 1136 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → ((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)))
2 simp23 1209 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → (𝑆𝐴 ∧ ¬ 𝑆 𝑊))
3 simp32l 1299 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → (𝑡𝐴 ∧ ¬ 𝑡 𝑊))
4 simp33l 1301 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → (𝑢𝐴 ∧ ¬ 𝑢 𝑊))
5 simp21 1207 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → 𝑃𝑄)
6 simp32r 1300 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → ¬ 𝑡 (𝑃 𝑄))
7 simp33r 1302 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → ¬ 𝑢 (𝑃 𝑄))
8 simp31r 1298 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → 𝑆 (𝑃 𝑄))
96, 7, 83jca 1128 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → (¬ 𝑡 (𝑃 𝑄) ∧ ¬ 𝑢 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)))
10 cdleme37.l . . . 4 = (le‘𝐾)
11 cdleme37.j . . . 4 = (join‘𝐾)
12 cdleme37.m . . . 4 = (meet‘𝐾)
13 cdleme37.a . . . 4 𝐴 = (Atoms‘𝐾)
14 cdleme37.h . . . 4 𝐻 = (LHyp‘𝐾)
15 cdleme37.u . . . 4 𝑈 = ((𝑃 𝑄) 𝑊)
16 cdleme37.e . . . 4 𝐸 = ((𝑡 𝑈) (𝑄 ((𝑃 𝑡) 𝑊)))
17 cdleme37.d . . . 4 𝐷 = ((𝑢 𝑈) (𝑄 ((𝑃 𝑢) 𝑊)))
18 eqid 2730 . . . 4 ((𝑆 𝑡) 𝑊) = ((𝑆 𝑡) 𝑊)
19 eqid 2730 . . . 4 ((𝑆 𝑢) 𝑊) = ((𝑆 𝑢) 𝑊)
20 eqid 2730 . . . 4 ((𝑃 𝑄) (𝐸 ((𝑆 𝑡) 𝑊))) = ((𝑃 𝑄) (𝐸 ((𝑆 𝑡) 𝑊)))
21 eqid 2730 . . . 4 ((𝑃 𝑄) (𝐷 ((𝑆 𝑢) 𝑊))) = ((𝑃 𝑄) (𝐷 ((𝑆 𝑢) 𝑊)))
2210, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21cdleme21k 40324 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ (𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ (𝑢𝐴 ∧ ¬ 𝑢 𝑊)) ∧ (𝑃𝑄 ∧ (¬ 𝑡 (𝑃 𝑄) ∧ ¬ 𝑢 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)))) → ((𝑃 𝑄) (𝐸 ((𝑆 𝑡) 𝑊))) = ((𝑃 𝑄) (𝐷 ((𝑆 𝑢) 𝑊))))
231, 2, 3, 4, 5, 9, 22syl132anc 1390 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → ((𝑃 𝑄) (𝐸 ((𝑆 𝑡) 𝑊))) = ((𝑃 𝑄) (𝐷 ((𝑆 𝑢) 𝑊))))
24 cdleme37.c . . 3 𝐶 = ((𝑆 𝑉) (𝐸 ((𝑡 𝑆) 𝑊)))
25 simp11 1204 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → (𝐾 ∈ HL ∧ 𝑊𝐻))
26 simp12l 1287 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → 𝑃𝐴)
27 simp13l 1289 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → 𝑄𝐴)
2810, 11, 12, 13, 14, 15cdleme4 40224 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴𝑄𝐴 ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ 𝑆 (𝑃 𝑄)) → (𝑃 𝑄) = (𝑆 𝑈))
2925, 26, 27, 2, 8, 28syl131anc 1385 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → (𝑃 𝑄) = (𝑆 𝑈))
30 cdleme37.v . . . . . . 7 𝑉 = ((𝑡 𝐸) 𝑊)
3110, 11, 12, 13, 14, 15, 16cdleme2 40214 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴𝑄𝐴 ∧ (𝑡𝐴 ∧ ¬ 𝑡 𝑊))) → ((𝑡 𝐸) 𝑊) = 𝑈)
3225, 26, 27, 3, 31syl13anc 1374 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → ((𝑡 𝐸) 𝑊) = 𝑈)
3330, 32eqtrid 2777 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → 𝑉 = 𝑈)
3433oveq2d 7410 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → (𝑆 𝑉) = (𝑆 𝑈))
3529, 34eqtr4d 2768 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → (𝑃 𝑄) = (𝑆 𝑉))
36 simp11l 1285 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → 𝐾 ∈ HL)
37 simp23l 1295 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → 𝑆𝐴)
383simpld 494 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → 𝑡𝐴)
3911, 13hlatjcom 39353 . . . . . . 7 ((𝐾 ∈ HL ∧ 𝑆𝐴𝑡𝐴) → (𝑆 𝑡) = (𝑡 𝑆))
4036, 37, 38, 39syl3anc 1373 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → (𝑆 𝑡) = (𝑡 𝑆))
4140oveq1d 7409 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → ((𝑆 𝑡) 𝑊) = ((𝑡 𝑆) 𝑊))
4241oveq2d 7410 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → (𝐸 ((𝑆 𝑡) 𝑊)) = (𝐸 ((𝑡 𝑆) 𝑊)))
4335, 42oveq12d 7412 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → ((𝑃 𝑄) (𝐸 ((𝑆 𝑡) 𝑊))) = ((𝑆 𝑉) (𝐸 ((𝑡 𝑆) 𝑊))))
4424, 43eqtr4id 2784 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → 𝐶 = ((𝑃 𝑄) (𝐸 ((𝑆 𝑡) 𝑊))))
45 cdleme37.g . . 3 𝐺 = ((𝑆 𝑋) (𝐷 ((𝑢 𝑆) 𝑊)))
46 cdleme37.x . . . . . . 7 𝑋 = ((𝑢 𝐷) 𝑊)
4710, 11, 12, 13, 14, 15, 17cdleme2 40214 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴𝑄𝐴 ∧ (𝑢𝐴 ∧ ¬ 𝑢 𝑊))) → ((𝑢 𝐷) 𝑊) = 𝑈)
4825, 26, 27, 4, 47syl13anc 1374 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → ((𝑢 𝐷) 𝑊) = 𝑈)
4946, 48eqtrid 2777 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → 𝑋 = 𝑈)
5049oveq2d 7410 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → (𝑆 𝑋) = (𝑆 𝑈))
5129, 50eqtr4d 2768 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → (𝑃 𝑄) = (𝑆 𝑋))
524simpld 494 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → 𝑢𝐴)
5311, 13hlatjcom 39353 . . . . . . 7 ((𝐾 ∈ HL ∧ 𝑆𝐴𝑢𝐴) → (𝑆 𝑢) = (𝑢 𝑆))
5436, 37, 52, 53syl3anc 1373 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → (𝑆 𝑢) = (𝑢 𝑆))
5554oveq1d 7409 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → ((𝑆 𝑢) 𝑊) = ((𝑢 𝑆) 𝑊))
5655oveq2d 7410 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → (𝐷 ((𝑆 𝑢) 𝑊)) = (𝐷 ((𝑢 𝑆) 𝑊)))
5751, 56oveq12d 7412 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → ((𝑃 𝑄) (𝐷 ((𝑆 𝑢) 𝑊))) = ((𝑆 𝑋) (𝐷 ((𝑢 𝑆) 𝑊))))
5845, 57eqtr4id 2784 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → 𝐺 = ((𝑃 𝑄) (𝐷 ((𝑆 𝑢) 𝑊))))
5923, 44, 583eqtr4d 2775 1 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑃𝑄 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊) ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ ((𝑅 (𝑃 𝑄) ∧ 𝑆 (𝑃 𝑄)) ∧ ((𝑡𝐴 ∧ ¬ 𝑡 𝑊) ∧ ¬ 𝑡 (𝑃 𝑄)) ∧ ((𝑢𝐴 ∧ ¬ 𝑢 𝑊) ∧ ¬ 𝑢 (𝑃 𝑄)))) → 𝐶 = 𝐺)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 395  w3a 1086   = wceq 1540  wcel 2109  wne 2927   class class class wbr 5115  cfv 6519  (class class class)co 7394  lecple 17233  joincjn 18278  meetcmee 18279  Atomscatm 39248  HLchlt 39335  LHypclh 39970
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2702  ax-rep 5242  ax-sep 5259  ax-nul 5269  ax-pow 5328  ax-pr 5395  ax-un 7718
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2534  df-eu 2563  df-clab 2709  df-cleq 2722  df-clel 2804  df-nfc 2880  df-ne 2928  df-ral 3047  df-rex 3056  df-rmo 3357  df-reu 3358  df-rab 3412  df-v 3457  df-sbc 3762  df-csb 3871  df-dif 3925  df-un 3927  df-in 3929  df-ss 3939  df-nul 4305  df-if 4497  df-pw 4573  df-sn 4598  df-pr 4600  df-op 4604  df-uni 4880  df-iun 4965  df-iin 4966  df-br 5116  df-opab 5178  df-mpt 5197  df-id 5541  df-xp 5652  df-rel 5653  df-cnv 5654  df-co 5655  df-dm 5656  df-rn 5657  df-res 5658  df-ima 5659  df-iota 6472  df-fun 6521  df-fn 6522  df-f 6523  df-f1 6524  df-fo 6525  df-f1o 6526  df-fv 6527  df-riota 7351  df-ov 7397  df-oprab 7398  df-mpo 7399  df-1st 7977  df-2nd 7978  df-proset 18261  df-poset 18280  df-plt 18295  df-lub 18311  df-glb 18312  df-join 18313  df-meet 18314  df-p0 18390  df-p1 18391  df-lat 18397  df-clat 18464  df-oposet 39161  df-ol 39163  df-oml 39164  df-covers 39251  df-ats 39252  df-atl 39283  df-cvlat 39307  df-hlat 39336  df-llines 39484  df-lplanes 39485  df-lvols 39486  df-lines 39487  df-psubsp 39489  df-pmap 39490  df-padd 39782  df-lhyp 39974
This theorem is referenced by:  cdleme38m  40449
  Copyright terms: Public domain W3C validator