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

Theorem cdleme0moN 39552
Description: Part of proof of Lemma E in [Crawley] p. 113. (Contributed by NM, 9-Nov-2012.) (New usage is discouraged.)
Hypotheses
Ref Expression
cdleme0.l = (le‘𝐾)
cdleme0.j = (join‘𝐾)
cdleme0.m = (meet‘𝐾)
cdleme0.a 𝐴 = (Atoms‘𝐾)
cdleme0.h 𝐻 = (LHyp‘𝐾)
cdleme0.u 𝑈 = ((𝑃 𝑄) 𝑊)
Assertion
Ref Expression
cdleme0moN (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → (𝑅 = 𝑃𝑅 = 𝑄))
Distinct variable groups:   𝐴,𝑟   ,𝑟   𝑃,𝑟   𝑄,𝑟   𝑅,𝑟   𝑈,𝑟
Allowed substitution hints:   𝐻(𝑟)   𝐾(𝑟)   (𝑟)   (𝑟)   𝑊(𝑟)

Proof of Theorem cdleme0moN
StepHypRef Expression
1 simp23r 1292 . 2 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ¬ 𝑅 𝑊)
2 neanior 3027 . . 3 ((𝑅𝑃𝑅𝑄) ↔ ¬ (𝑅 = 𝑃𝑅 = 𝑄))
3 simpl33 1253 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ∧ (𝑅𝑃𝑅𝑄)) → ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))
4 simp23l 1291 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝑅𝐴)
54adantr 480 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ∧ (𝑅𝑃𝑅𝑄)) → 𝑅𝐴)
6 simprl 768 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ∧ (𝑅𝑃𝑅𝑄)) → 𝑅𝑃)
7 simprr 770 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ∧ (𝑅𝑃𝑅𝑄)) → 𝑅𝑄)
8 simpl32 1252 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ∧ (𝑅𝑃𝑅𝑄)) → 𝑅 (𝑃 𝑄))
9 simpl1l 1221 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ∧ (𝑅𝑃𝑅𝑄)) → 𝐾 ∈ HL)
10 hlcvl 38685 . . . . . . . . 9 (𝐾 ∈ HL → 𝐾 ∈ CvLat)
119, 10syl 17 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ∧ (𝑅𝑃𝑅𝑄)) → 𝐾 ∈ CvLat)
12 simp21l 1287 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝑃𝐴)
1312adantr 480 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ∧ (𝑅𝑃𝑅𝑄)) → 𝑃𝐴)
14 simp22l 1289 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝑄𝐴)
1514adantr 480 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ∧ (𝑅𝑃𝑅𝑄)) → 𝑄𝐴)
16 simpl31 1251 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ∧ (𝑅𝑃𝑅𝑄)) → 𝑃𝑄)
17 cdleme0.a . . . . . . . . 9 𝐴 = (Atoms‘𝐾)
18 cdleme0.l . . . . . . . . 9 = (le‘𝐾)
19 cdleme0.j . . . . . . . . 9 = (join‘𝐾)
2017, 18, 19cvlsupr2 38669 . . . . . . . 8 ((𝐾 ∈ CvLat ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ 𝑃𝑄) → ((𝑃 𝑅) = (𝑄 𝑅) ↔ (𝑅𝑃𝑅𝑄𝑅 (𝑃 𝑄))))
2111, 13, 15, 5, 16, 20syl131anc 1380 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ∧ (𝑅𝑃𝑅𝑄)) → ((𝑃 𝑅) = (𝑄 𝑅) ↔ (𝑅𝑃𝑅𝑄𝑅 (𝑃 𝑄))))
226, 7, 8, 21mpbir3and 1339 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ∧ (𝑅𝑃𝑅𝑄)) → (𝑃 𝑅) = (𝑄 𝑅))
23 simp1l 1194 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝐾 ∈ HL)
24 simp1r 1195 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝑊𝐻)
25 simp21r 1288 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ¬ 𝑃 𝑊)
26 simp31 1206 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝑃𝑄)
27 cdleme0.m . . . . . . . . 9 = (meet‘𝐾)
28 cdleme0.h . . . . . . . . 9 𝐻 = (LHyp‘𝐾)
29 cdleme0.u . . . . . . . . 9 𝑈 = ((𝑃 𝑄) 𝑊)
3018, 19, 27, 17, 28, 29lhpat2 39372 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴𝑃𝑄)) → 𝑈𝐴)
3123, 24, 12, 25, 14, 26, 30syl222anc 1383 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝑈𝐴)
3231adantr 480 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ∧ (𝑅𝑃𝑅𝑄)) → 𝑈𝐴)
33 simpl1 1188 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ∧ (𝑅𝑃𝑅𝑄)) → (𝐾 ∈ HL ∧ 𝑊𝐻))
34 simpl21 1248 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ∧ (𝑅𝑃𝑅𝑄)) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
35 simpl22 1249 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ∧ (𝑅𝑃𝑅𝑄)) → (𝑄𝐴 ∧ ¬ 𝑄 𝑊))
3618, 19, 27, 17, 28, 29cdleme02N 39549 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝑃𝑄) → ((𝑃 𝑈) = (𝑄 𝑈) ∧ 𝑈 𝑊))
3736simpld 494 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝑃𝑄) → (𝑃 𝑈) = (𝑄 𝑈))
3833, 34, 35, 16, 37syl121anc 1372 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ∧ (𝑅𝑃𝑅𝑄)) → (𝑃 𝑈) = (𝑄 𝑈))
39 df-rmo 3368 . . . . . . 7 (∃*𝑟𝐴 (𝑃 𝑟) = (𝑄 𝑟) ↔ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))
40 oveq2 7409 . . . . . . . . 9 (𝑟 = 𝑅 → (𝑃 𝑟) = (𝑃 𝑅))
41 oveq2 7409 . . . . . . . . 9 (𝑟 = 𝑅 → (𝑄 𝑟) = (𝑄 𝑅))
4240, 41eqeq12d 2740 . . . . . . . 8 (𝑟 = 𝑅 → ((𝑃 𝑟) = (𝑄 𝑟) ↔ (𝑃 𝑅) = (𝑄 𝑅)))
43 oveq2 7409 . . . . . . . . 9 (𝑟 = 𝑈 → (𝑃 𝑟) = (𝑃 𝑈))
44 oveq2 7409 . . . . . . . . 9 (𝑟 = 𝑈 → (𝑄 𝑟) = (𝑄 𝑈))
4543, 44eqeq12d 2740 . . . . . . . 8 (𝑟 = 𝑈 → ((𝑃 𝑟) = (𝑄 𝑟) ↔ (𝑃 𝑈) = (𝑄 𝑈)))
4642, 45rmoi 3877 . . . . . . 7 ((∃*𝑟𝐴 (𝑃 𝑟) = (𝑄 𝑟) ∧ (𝑅𝐴 ∧ (𝑃 𝑅) = (𝑄 𝑅)) ∧ (𝑈𝐴 ∧ (𝑃 𝑈) = (𝑄 𝑈))) → 𝑅 = 𝑈)
4739, 46syl3an1br 1403 . . . . . 6 ((∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)) ∧ (𝑅𝐴 ∧ (𝑃 𝑅) = (𝑄 𝑅)) ∧ (𝑈𝐴 ∧ (𝑃 𝑈) = (𝑄 𝑈))) → 𝑅 = 𝑈)
483, 5, 22, 32, 38, 47syl122anc 1376 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ∧ (𝑅𝑃𝑅𝑄)) → 𝑅 = 𝑈)
4936simprd 495 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝑃𝑄) → 𝑈 𝑊)
5033, 34, 35, 16, 49syl121anc 1372 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ∧ (𝑅𝑃𝑅𝑄)) → 𝑈 𝑊)
5148, 50eqbrtrd 5160 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) ∧ (𝑅𝑃𝑅𝑄)) → 𝑅 𝑊)
5251ex 412 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ((𝑅𝑃𝑅𝑄) → 𝑅 𝑊))
532, 52biimtrrid 242 . 2 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → (¬ (𝑅 = 𝑃𝑅 = 𝑄) → 𝑅 𝑊))
541, 53mt3d 148 1 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑃𝑄𝑅 (𝑃 𝑄) ∧ ∃*𝑟(𝑟𝐴 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → (𝑅 = 𝑃𝑅 = 𝑄))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 205  wa 395  wo 844  w3a 1084   = wceq 1533  wcel 2098  ∃*wmo 2524  wne 2932  ∃*wrmo 3367   class class class wbr 5138  cfv 6533  (class class class)co 7401  lecple 17200  joincjn 18263  meetcmee 18264  Atomscatm 38589  CvLatclc 38591  HLchlt 38676  LHypclh 39311
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2163  ax-ext 2695  ax-rep 5275  ax-sep 5289  ax-nul 5296  ax-pow 5353  ax-pr 5417  ax-un 7718
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2526  df-eu 2555  df-clab 2702  df-cleq 2716  df-clel 2802  df-nfc 2877  df-ne 2933  df-ral 3054  df-rex 3063  df-rmo 3368  df-reu 3369  df-rab 3425  df-v 3468  df-sbc 3770  df-csb 3886  df-dif 3943  df-un 3945  df-in 3947  df-ss 3957  df-nul 4315  df-if 4521  df-pw 4596  df-sn 4621  df-pr 4623  df-op 4627  df-uni 4900  df-iun 4989  df-br 5139  df-opab 5201  df-mpt 5222  df-id 5564  df-xp 5672  df-rel 5673  df-cnv 5674  df-co 5675  df-dm 5676  df-rn 5677  df-res 5678  df-ima 5679  df-iota 6485  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-riota 7357  df-ov 7404  df-oprab 7405  df-proset 18247  df-poset 18265  df-plt 18282  df-lub 18298  df-glb 18299  df-join 18300  df-meet 18301  df-p0 18377  df-p1 18378  df-lat 18384  df-clat 18451  df-oposet 38502  df-ol 38504  df-oml 38505  df-covers 38592  df-ats 38593  df-atl 38624  df-cvlat 38648  df-hlat 38677  df-lhyp 39315
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator