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

Theorem ps-2 36158
Description: Lattice analogue for the projective geometry axiom, "if a line intersects two sides of a triangle at different points then it also intersects the third side." Projective space condition PS2 in [MaedaMaeda] p. 68 and part of Theorem 16.4 in [MaedaMaeda] p. 69. (Contributed by NM, 1-Dec-2011.)
Hypotheses
Ref Expression
ps1.l = (le‘𝐾)
ps1.j = (join‘𝐾)
ps1.a 𝐴 = (Atoms‘𝐾)
Assertion
Ref Expression
ps-2 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ ((¬ 𝑃 (𝑄 𝑅) ∧ 𝑆𝑇) ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅)))) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑢 (𝑆 𝑇)))
Distinct variable groups:   𝑢,𝐴   𝑢,   𝑢,𝐾   𝑢,   𝑢,𝑃   𝑢,𝑄   𝑢,𝑅   𝑢,𝑆   𝑢,𝑇

Proof of Theorem ps-2
StepHypRef Expression
1 simpl21 1244 . . . . 5 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑆 = 𝑃) → 𝑃𝐴)
2 simp1 1129 . . . . . . 7 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝐾 ∈ HL)
3 simp21 1199 . . . . . . 7 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝑃𝐴)
4 simp23 1201 . . . . . . 7 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝑅𝐴)
5 ps1.l . . . . . . . 8 = (le‘𝐾)
6 ps1.j . . . . . . . 8 = (join‘𝐾)
7 ps1.a . . . . . . . 8 𝐴 = (Atoms‘𝐾)
85, 6, 7hlatlej1 36055 . . . . . . 7 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑅𝐴) → 𝑃 (𝑃 𝑅))
92, 3, 4, 8syl3anc 1364 . . . . . 6 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝑃 (𝑃 𝑅))
109adantr 481 . . . . 5 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑆 = 𝑃) → 𝑃 (𝑃 𝑅))
11 simp3r 1195 . . . . . . . 8 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝑇𝐴)
125, 6, 7hlatlej1 36055 . . . . . . . 8 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑇𝐴) → 𝑃 (𝑃 𝑇))
132, 3, 11, 12syl3anc 1364 . . . . . . 7 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝑃 (𝑃 𝑇))
14 oveq1 7026 . . . . . . . 8 (𝑆 = 𝑃 → (𝑆 𝑇) = (𝑃 𝑇))
1514breq2d 4976 . . . . . . 7 (𝑆 = 𝑃 → (𝑃 (𝑆 𝑇) ↔ 𝑃 (𝑃 𝑇)))
1613, 15syl5ibrcom 248 . . . . . 6 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (𝑆 = 𝑃𝑃 (𝑆 𝑇)))
1716imp 407 . . . . 5 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑆 = 𝑃) → 𝑃 (𝑆 𝑇))
18 breq1 4967 . . . . . . 7 (𝑢 = 𝑃 → (𝑢 (𝑃 𝑅) ↔ 𝑃 (𝑃 𝑅)))
19 breq1 4967 . . . . . . 7 (𝑢 = 𝑃 → (𝑢 (𝑆 𝑇) ↔ 𝑃 (𝑆 𝑇)))
2018, 19anbi12d 630 . . . . . 6 (𝑢 = 𝑃 → ((𝑢 (𝑃 𝑅) ∧ 𝑢 (𝑆 𝑇)) ↔ (𝑃 (𝑃 𝑅) ∧ 𝑃 (𝑆 𝑇))))
2120rspcev 3557 . . . . 5 ((𝑃𝐴 ∧ (𝑃 (𝑃 𝑅) ∧ 𝑃 (𝑆 𝑇))) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑢 (𝑆 𝑇)))
221, 10, 17, 21syl12anc 833 . . . 4 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑆 = 𝑃) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑢 (𝑆 𝑇)))
2322a1d 25 . . 3 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑆 = 𝑃) → (((¬ 𝑃 (𝑄 𝑅) ∧ 𝑆𝑇) ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅))) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑢 (𝑆 𝑇))))
24 hlop 36042 . . . . . . . . . . . . . . . . . 18 (𝐾 ∈ HL → 𝐾 ∈ OP)
25243ad2ant1 1126 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝐾 ∈ OP)
26 eqid 2794 . . . . . . . . . . . . . . . . . 18 (Base‘𝐾) = (Base‘𝐾)
27 eqid 2794 . . . . . . . . . . . . . . . . . 18 (0.‘𝐾) = (0.‘𝐾)
2826, 27op0cl 35864 . . . . . . . . . . . . . . . . 17 (𝐾 ∈ OP → (0.‘𝐾) ∈ (Base‘𝐾))
2925, 28syl 17 . . . . . . . . . . . . . . . 16 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (0.‘𝐾) ∈ (Base‘𝐾))
3026, 7atbase 35969 . . . . . . . . . . . . . . . . 17 (𝑃𝐴𝑃 ∈ (Base‘𝐾))
313, 30syl 17 . . . . . . . . . . . . . . . 16 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝑃 ∈ (Base‘𝐾))
32 eqid 2794 . . . . . . . . . . . . . . . . . 18 ( ⋖ ‘𝐾) = ( ⋖ ‘𝐾)
3327, 32, 7atcvr0 35968 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ HL ∧ 𝑃𝐴) → (0.‘𝐾)( ⋖ ‘𝐾)𝑃)
342, 3, 33syl2anc 584 . . . . . . . . . . . . . . . 16 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (0.‘𝐾)( ⋖ ‘𝐾)𝑃)
35 eqid 2794 . . . . . . . . . . . . . . . . 17 (lt‘𝐾) = (lt‘𝐾)
3626, 35, 32cvrlt 35950 . . . . . . . . . . . . . . . 16 (((𝐾 ∈ HL ∧ (0.‘𝐾) ∈ (Base‘𝐾) ∧ 𝑃 ∈ (Base‘𝐾)) ∧ (0.‘𝐾)( ⋖ ‘𝐾)𝑃) → (0.‘𝐾)(lt‘𝐾)𝑃)
372, 29, 31, 34, 36syl31anc 1366 . . . . . . . . . . . . . . 15 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (0.‘𝐾)(lt‘𝐾)𝑃)
38 hlpos 36046 . . . . . . . . . . . . . . . . 17 (𝐾 ∈ HL → 𝐾 ∈ Poset)
39383ad2ant1 1126 . . . . . . . . . . . . . . . 16 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝐾 ∈ Poset)
40 hllat 36043 . . . . . . . . . . . . . . . . . 18 (𝐾 ∈ HL → 𝐾 ∈ Lat)
41403ad2ant1 1126 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝐾 ∈ Lat)
4226, 7atbase 35969 . . . . . . . . . . . . . . . . . 18 (𝑅𝐴𝑅 ∈ (Base‘𝐾))
434, 42syl 17 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝑅 ∈ (Base‘𝐾))
4426, 6latjcl 17490 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ Lat ∧ 𝑃 ∈ (Base‘𝐾) ∧ 𝑅 ∈ (Base‘𝐾)) → (𝑃 𝑅) ∈ (Base‘𝐾))
4541, 31, 43, 44syl3anc 1364 . . . . . . . . . . . . . . . 16 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (𝑃 𝑅) ∈ (Base‘𝐾))
4626, 5, 35pltletr 17410 . . . . . . . . . . . . . . . 16 ((𝐾 ∈ Poset ∧ ((0.‘𝐾) ∈ (Base‘𝐾) ∧ 𝑃 ∈ (Base‘𝐾) ∧ (𝑃 𝑅) ∈ (Base‘𝐾))) → (((0.‘𝐾)(lt‘𝐾)𝑃𝑃 (𝑃 𝑅)) → (0.‘𝐾)(lt‘𝐾)(𝑃 𝑅)))
4739, 29, 31, 45, 46syl13anc 1365 . . . . . . . . . . . . . . 15 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (((0.‘𝐾)(lt‘𝐾)𝑃𝑃 (𝑃 𝑅)) → (0.‘𝐾)(lt‘𝐾)(𝑃 𝑅)))
4837, 9, 47mp2and 695 . . . . . . . . . . . . . 14 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (0.‘𝐾)(lt‘𝐾)(𝑃 𝑅))
4935pltne 17401 . . . . . . . . . . . . . . 15 ((𝐾 ∈ HL ∧ (0.‘𝐾) ∈ (Base‘𝐾) ∧ (𝑃 𝑅) ∈ (Base‘𝐾)) → ((0.‘𝐾)(lt‘𝐾)(𝑃 𝑅) → (0.‘𝐾) ≠ (𝑃 𝑅)))
502, 29, 45, 49syl3anc 1364 . . . . . . . . . . . . . 14 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → ((0.‘𝐾)(lt‘𝐾)(𝑃 𝑅) → (0.‘𝐾) ≠ (𝑃 𝑅)))
5148, 50mpd 15 . . . . . . . . . . . . 13 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (0.‘𝐾) ≠ (𝑃 𝑅))
5251necomd 3038 . . . . . . . . . . . 12 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (𝑃 𝑅) ≠ (0.‘𝐾))
5352adantr 481 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (𝑆𝑃 ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅)))) → (𝑃 𝑅) ≠ (0.‘𝐾))
54 hlatl 36040 . . . . . . . . . . . . . . . . . . 19 (𝐾 ∈ HL → 𝐾 ∈ AtLat)
55543ad2ant1 1126 . . . . . . . . . . . . . . . . . 18 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝐾 ∈ AtLat)
56 simp3l 1194 . . . . . . . . . . . . . . . . . 18 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝑆𝐴)
575, 7atncmp 35992 . . . . . . . . . . . . . . . . . 18 ((𝐾 ∈ AtLat ∧ 𝑆𝐴𝑃𝐴) → (¬ 𝑆 𝑃𝑆𝑃))
5855, 56, 3, 57syl3anc 1364 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (¬ 𝑆 𝑃𝑆𝑃))
59 simp22 1200 . . . . . . . . . . . . . . . . . 18 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝑄𝐴)
6026, 5, 6, 7hlexch1 36062 . . . . . . . . . . . . . . . . . . 19 ((𝐾 ∈ HL ∧ (𝑆𝐴𝑄𝐴𝑃 ∈ (Base‘𝐾)) ∧ ¬ 𝑆 𝑃) → (𝑆 (𝑃 𝑄) → 𝑄 (𝑃 𝑆)))
61603expia 1114 . . . . . . . . . . . . . . . . . 18 ((𝐾 ∈ HL ∧ (𝑆𝐴𝑄𝐴𝑃 ∈ (Base‘𝐾))) → (¬ 𝑆 𝑃 → (𝑆 (𝑃 𝑄) → 𝑄 (𝑃 𝑆))))
622, 56, 59, 31, 61syl13anc 1365 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (¬ 𝑆 𝑃 → (𝑆 (𝑃 𝑄) → 𝑄 (𝑃 𝑆))))
6358, 62sylbird 261 . . . . . . . . . . . . . . . 16 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (𝑆𝑃 → (𝑆 (𝑃 𝑄) → 𝑄 (𝑃 𝑆))))
6463imp32 419 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (𝑆𝑃𝑆 (𝑃 𝑄))) → 𝑄 (𝑃 𝑆))
6526, 7atbase 35969 . . . . . . . . . . . . . . . . . 18 (𝑄𝐴𝑄 ∈ (Base‘𝐾))
6659, 65syl 17 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝑄 ∈ (Base‘𝐾))
6726, 7atbase 35969 . . . . . . . . . . . . . . . . . . 19 (𝑆𝐴𝑆 ∈ (Base‘𝐾))
6856, 67syl 17 . . . . . . . . . . . . . . . . . 18 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝑆 ∈ (Base‘𝐾))
6926, 6latjcl 17490 . . . . . . . . . . . . . . . . . 18 ((𝐾 ∈ Lat ∧ 𝑃 ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾)) → (𝑃 𝑆) ∈ (Base‘𝐾))
7041, 31, 68, 69syl3anc 1364 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (𝑃 𝑆) ∈ (Base‘𝐾))
7126, 5, 6latjlej1 17504 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ Lat ∧ (𝑄 ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾) ∧ 𝑅 ∈ (Base‘𝐾))) → (𝑄 (𝑃 𝑆) → (𝑄 𝑅) ((𝑃 𝑆) 𝑅)))
7241, 66, 70, 43, 71syl13anc 1365 . . . . . . . . . . . . . . . 16 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (𝑄 (𝑃 𝑆) → (𝑄 𝑅) ((𝑃 𝑆) 𝑅)))
7372adantr 481 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (𝑆𝑃𝑆 (𝑃 𝑄))) → (𝑄 (𝑃 𝑆) → (𝑄 𝑅) ((𝑃 𝑆) 𝑅)))
7464, 73mpd 15 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (𝑆𝑃𝑆 (𝑃 𝑄))) → (𝑄 𝑅) ((𝑃 𝑆) 𝑅))
7574adantrrr 721 . . . . . . . . . . . . 13 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (𝑆𝑃 ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅)))) → (𝑄 𝑅) ((𝑃 𝑆) 𝑅))
7626, 7atbase 35969 . . . . . . . . . . . . . . . . . 18 (𝑇𝐴𝑇 ∈ (Base‘𝐾))
7711, 76syl 17 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝑇 ∈ (Base‘𝐾))
7826, 6latjcl 17490 . . . . . . . . . . . . . . . . . 18 ((𝐾 ∈ Lat ∧ 𝑄 ∈ (Base‘𝐾) ∧ 𝑅 ∈ (Base‘𝐾)) → (𝑄 𝑅) ∈ (Base‘𝐾))
7941, 66, 43, 78syl3anc 1364 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (𝑄 𝑅) ∈ (Base‘𝐾))
8026, 6latjcl 17490 . . . . . . . . . . . . . . . . . 18 ((𝐾 ∈ Lat ∧ (𝑃 𝑆) ∈ (Base‘𝐾) ∧ 𝑅 ∈ (Base‘𝐾)) → ((𝑃 𝑆) 𝑅) ∈ (Base‘𝐾))
8141, 70, 43, 80syl3anc 1364 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → ((𝑃 𝑆) 𝑅) ∈ (Base‘𝐾))
8226, 5lattr 17495 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ Lat ∧ (𝑇 ∈ (Base‘𝐾) ∧ (𝑄 𝑅) ∈ (Base‘𝐾) ∧ ((𝑃 𝑆) 𝑅) ∈ (Base‘𝐾))) → ((𝑇 (𝑄 𝑅) ∧ (𝑄 𝑅) ((𝑃 𝑆) 𝑅)) → 𝑇 ((𝑃 𝑆) 𝑅)))
8341, 77, 79, 81, 82syl13anc 1365 . . . . . . . . . . . . . . . 16 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → ((𝑇 (𝑄 𝑅) ∧ (𝑄 𝑅) ((𝑃 𝑆) 𝑅)) → 𝑇 ((𝑃 𝑆) 𝑅)))
8483expdimp 453 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑇 (𝑄 𝑅)) → ((𝑄 𝑅) ((𝑃 𝑆) 𝑅) → 𝑇 ((𝑃 𝑆) 𝑅)))
8584adantrl 712 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅))) → ((𝑄 𝑅) ((𝑃 𝑆) 𝑅) → 𝑇 ((𝑃 𝑆) 𝑅)))
8685adantrl 712 . . . . . . . . . . . . 13 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (𝑆𝑃 ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅)))) → ((𝑄 𝑅) ((𝑃 𝑆) 𝑅) → 𝑇 ((𝑃 𝑆) 𝑅)))
8775, 86mpd 15 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (𝑆𝑃 ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅)))) → 𝑇 ((𝑃 𝑆) 𝑅))
886, 7hlatj32 36052 . . . . . . . . . . . . . . 15 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑆𝐴𝑅𝐴)) → ((𝑃 𝑆) 𝑅) = ((𝑃 𝑅) 𝑆))
892, 3, 56, 4, 88syl13anc 1365 . . . . . . . . . . . . . 14 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → ((𝑃 𝑆) 𝑅) = ((𝑃 𝑅) 𝑆))
9089breq2d 4976 . . . . . . . . . . . . 13 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (𝑇 ((𝑃 𝑆) 𝑅) ↔ 𝑇 ((𝑃 𝑅) 𝑆)))
9190adantr 481 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (𝑆𝑃 ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅)))) → (𝑇 ((𝑃 𝑆) 𝑅) ↔ 𝑇 ((𝑃 𝑅) 𝑆)))
9287, 91mpbid 233 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (𝑆𝑃 ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅)))) → 𝑇 ((𝑃 𝑅) 𝑆))
9353, 92jca 512 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (𝑆𝑃 ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅)))) → ((𝑃 𝑅) ≠ (0.‘𝐾) ∧ 𝑇 ((𝑃 𝑅) 𝑆)))
9493adantrrl 720 . . . . . . . . 9 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (𝑆𝑃 ∧ (¬ 𝑃 (𝑄 𝑅) ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅))))) → ((𝑃 𝑅) ≠ (0.‘𝐾) ∧ 𝑇 ((𝑃 𝑅) 𝑆)))
9594ex 413 . . . . . . . 8 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → ((𝑆𝑃 ∧ (¬ 𝑃 (𝑄 𝑅) ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅)))) → ((𝑃 𝑅) ≠ (0.‘𝐾) ∧ 𝑇 ((𝑃 𝑅) 𝑆))))
9626, 5, 6, 27, 7cvrat4 36123 . . . . . . . . 9 ((𝐾 ∈ HL ∧ ((𝑃 𝑅) ∈ (Base‘𝐾) ∧ 𝑇𝐴𝑆𝐴)) → (((𝑃 𝑅) ≠ (0.‘𝐾) ∧ 𝑇 ((𝑃 𝑅) 𝑆)) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑇 (𝑆 𝑢))))
972, 45, 11, 56, 96syl13anc 1365 . . . . . . . 8 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (((𝑃 𝑅) ≠ (0.‘𝐾) ∧ 𝑇 ((𝑃 𝑅) 𝑆)) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑇 (𝑆 𝑢))))
9895, 97syld 47 . . . . . . 7 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → ((𝑆𝑃 ∧ (¬ 𝑃 (𝑄 𝑅) ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅)))) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑇 (𝑆 𝑢))))
9998impl 456 . . . . . 6 ((((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑆𝑃) ∧ (¬ 𝑃 (𝑄 𝑅) ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅)))) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑇 (𝑆 𝑢)))
10099adantrlr 719 . . . . 5 ((((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑆𝑃) ∧ ((¬ 𝑃 (𝑄 𝑅) ∧ 𝑆𝑇) ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅)))) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑇 (𝑆 𝑢)))
1015, 7atncmp 35992 . . . . . . . . . . . . . . 15 ((𝐾 ∈ AtLat ∧ 𝑇𝐴𝑆𝐴) → (¬ 𝑇 𝑆𝑇𝑆))
10255, 11, 56, 101syl3anc 1364 . . . . . . . . . . . . . 14 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (¬ 𝑇 𝑆𝑇𝑆))
103 necom 3036 . . . . . . . . . . . . . 14 (𝑇𝑆𝑆𝑇)
104102, 103syl6bb 288 . . . . . . . . . . . . 13 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (¬ 𝑇 𝑆𝑆𝑇))
105104adantr 481 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑢𝐴) → (¬ 𝑇 𝑆𝑆𝑇))
106 simpl1 1184 . . . . . . . . . . . . 13 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑢𝐴) → 𝐾 ∈ HL)
107 simpl3r 1222 . . . . . . . . . . . . 13 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑢𝐴) → 𝑇𝐴)
108 simpr 485 . . . . . . . . . . . . 13 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑢𝐴) → 𝑢𝐴)
10968adantr 481 . . . . . . . . . . . . 13 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑢𝐴) → 𝑆 ∈ (Base‘𝐾))
11026, 5, 6, 7hlexch1 36062 . . . . . . . . . . . . . 14 ((𝐾 ∈ HL ∧ (𝑇𝐴𝑢𝐴𝑆 ∈ (Base‘𝐾)) ∧ ¬ 𝑇 𝑆) → (𝑇 (𝑆 𝑢) → 𝑢 (𝑆 𝑇)))
1111103expia 1114 . . . . . . . . . . . . 13 ((𝐾 ∈ HL ∧ (𝑇𝐴𝑢𝐴𝑆 ∈ (Base‘𝐾))) → (¬ 𝑇 𝑆 → (𝑇 (𝑆 𝑢) → 𝑢 (𝑆 𝑇))))
112106, 107, 108, 109, 111syl13anc 1365 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑢𝐴) → (¬ 𝑇 𝑆 → (𝑇 (𝑆 𝑢) → 𝑢 (𝑆 𝑇))))
113105, 112sylbird 261 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑢𝐴) → (𝑆𝑇 → (𝑇 (𝑆 𝑢) → 𝑢 (𝑆 𝑇))))
114113imp 407 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑢𝐴) ∧ 𝑆𝑇) → (𝑇 (𝑆 𝑢) → 𝑢 (𝑆 𝑇)))
115114an32s 648 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑆𝑇) ∧ 𝑢𝐴) → (𝑇 (𝑆 𝑢) → 𝑢 (𝑆 𝑇)))
116115anim2d 611 . . . . . . . 8 ((((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑆𝑇) ∧ 𝑢𝐴) → ((𝑢 (𝑃 𝑅) ∧ 𝑇 (𝑆 𝑢)) → (𝑢 (𝑃 𝑅) ∧ 𝑢 (𝑆 𝑇))))
117116reximdva 3236 . . . . . . 7 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑆𝑇) → (∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑇 (𝑆 𝑢)) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑢 (𝑆 𝑇))))
118117ad2ant2rl 745 . . . . . 6 ((((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑆𝑃) ∧ (¬ 𝑃 (𝑄 𝑅) ∧ 𝑆𝑇)) → (∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑇 (𝑆 𝑢)) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑢 (𝑆 𝑇))))
119118adantrr 713 . . . . 5 ((((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑆𝑃) ∧ ((¬ 𝑃 (𝑄 𝑅) ∧ 𝑆𝑇) ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅)))) → (∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑇 (𝑆 𝑢)) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑢 (𝑆 𝑇))))
120100, 119mpd 15 . . . 4 ((((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑆𝑃) ∧ ((¬ 𝑃 (𝑄 𝑅) ∧ 𝑆𝑇) ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅)))) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑢 (𝑆 𝑇)))
121120ex 413 . . 3 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑆𝑃) → (((¬ 𝑃 (𝑄 𝑅) ∧ 𝑆𝑇) ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅))) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑢 (𝑆 𝑇))))
12223, 121pm2.61dane 3071 . 2 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (((¬ 𝑃 (𝑄 𝑅) ∧ 𝑆𝑇) ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅))) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑢 (𝑆 𝑇))))
123122imp 407 1 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ ((¬ 𝑃 (𝑄 𝑅) ∧ 𝑆𝑇) ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅)))) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑢 (𝑆 𝑇)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 207  wa 396  w3a 1080   = wceq 1522  wcel 2080  wne 2983  wrex 3105   class class class wbr 4964  cfv 6228  (class class class)co 7019  Basecbs 16312  lecple 16401  Posetcpo 17379  ltcplt 17380  joincjn 17383  0.cp0 17476  Latclat 17484  OPcops 35852  ccvr 35942  Atomscatm 35943  AtLatcal 35944  HLchlt 36030
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1778  ax-4 1792  ax-5 1889  ax-6 1948  ax-7 1993  ax-8 2082  ax-9 2090  ax-10 2111  ax-11 2125  ax-12 2140  ax-13 2343  ax-ext 2768  ax-rep 5084  ax-sep 5097  ax-nul 5104  ax-pow 5160  ax-pr 5224  ax-un 7322
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 843  df-3an 1082  df-tru 1525  df-ex 1763  df-nf 1767  df-sb 2042  df-mo 2575  df-eu 2611  df-clab 2775  df-cleq 2787  df-clel 2862  df-nfc 2934  df-ne 2984  df-ral 3109  df-rex 3110  df-reu 3111  df-rab 3113  df-v 3438  df-sbc 3708  df-csb 3814  df-dif 3864  df-un 3866  df-in 3868  df-ss 3876  df-nul 4214  df-if 4384  df-pw 4457  df-sn 4475  df-pr 4477  df-op 4481  df-uni 4748  df-iun 4829  df-br 4965  df-opab 5027  df-mpt 5044  df-id 5351  df-xp 5452  df-rel 5453  df-cnv 5454  df-co 5455  df-dm 5456  df-rn 5457  df-res 5458  df-ima 5459  df-iota 6192  df-fun 6230  df-fn 6231  df-f 6232  df-f1 6233  df-fo 6234  df-f1o 6235  df-fv 6236  df-riota 6980  df-ov 7022  df-oprab 7023  df-proset 17367  df-poset 17385  df-plt 17397  df-lub 17413  df-glb 17414  df-join 17415  df-meet 17416  df-p0 17478  df-lat 17485  df-clat 17547  df-oposet 35856  df-ol 35858  df-oml 35859  df-covers 35946  df-ats 35947  df-atl 35978  df-cvlat 36002  df-hlat 36031
This theorem is referenced by:  ps-2b  36162  paddasslem3  36502
  Copyright terms: Public domain W3C validator