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 37178
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 1253 . . . . 5 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑆 = 𝑃) → 𝑃𝐴)
2 simp1 1138 . . . . . . 7 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝐾 ∈ HL)
3 simp21 1208 . . . . . . 7 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝑃𝐴)
4 simp23 1210 . . . . . . 7 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝑅𝐴)
5 ps1.l . . . . . . . 8 = (le‘𝐾)
6 ps1.j . . . . . . . 8 = (join‘𝐾)
7 ps1.a . . . . . . . 8 𝐴 = (Atoms‘𝐾)
85, 6, 7hlatlej1 37075 . . . . . . 7 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑅𝐴) → 𝑃 (𝑃 𝑅))
92, 3, 4, 8syl3anc 1373 . . . . . 6 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝑃 (𝑃 𝑅))
109adantr 484 . . . . 5 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑆 = 𝑃) → 𝑃 (𝑃 𝑅))
11 simp3r 1204 . . . . . . . 8 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝑇𝐴)
125, 6, 7hlatlej1 37075 . . . . . . . 8 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑇𝐴) → 𝑃 (𝑃 𝑇))
132, 3, 11, 12syl3anc 1373 . . . . . . 7 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝑃 (𝑃 𝑇))
14 oveq1 7198 . . . . . . . 8 (𝑆 = 𝑃 → (𝑆 𝑇) = (𝑃 𝑇))
1514breq2d 5051 . . . . . . 7 (𝑆 = 𝑃 → (𝑃 (𝑆 𝑇) ↔ 𝑃 (𝑃 𝑇)))
1613, 15syl5ibrcom 250 . . . . . 6 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (𝑆 = 𝑃𝑃 (𝑆 𝑇)))
1716imp 410 . . . . 5 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑆 = 𝑃) → 𝑃 (𝑆 𝑇))
18 breq1 5042 . . . . . . 7 (𝑢 = 𝑃 → (𝑢 (𝑃 𝑅) ↔ 𝑃 (𝑃 𝑅)))
19 breq1 5042 . . . . . . 7 (𝑢 = 𝑃 → (𝑢 (𝑆 𝑇) ↔ 𝑃 (𝑆 𝑇)))
2018, 19anbi12d 634 . . . . . 6 (𝑢 = 𝑃 → ((𝑢 (𝑃 𝑅) ∧ 𝑢 (𝑆 𝑇)) ↔ (𝑃 (𝑃 𝑅) ∧ 𝑃 (𝑆 𝑇))))
2120rspcev 3527 . . . . 5 ((𝑃𝐴 ∧ (𝑃 (𝑃 𝑅) ∧ 𝑃 (𝑆 𝑇))) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑢 (𝑆 𝑇)))
221, 10, 17, 21syl12anc 837 . . . 4 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑆 = 𝑃) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑢 (𝑆 𝑇)))
2322a1d 25 . . 3 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑆 = 𝑃) → (((¬ 𝑃 (𝑄 𝑅) ∧ 𝑆𝑇) ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅))) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑢 (𝑆 𝑇))))
24 hlop 37062 . . . . . . . . . . . . . . . . . 18 (𝐾 ∈ HL → 𝐾 ∈ OP)
25243ad2ant1 1135 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝐾 ∈ OP)
26 eqid 2736 . . . . . . . . . . . . . . . . . 18 (Base‘𝐾) = (Base‘𝐾)
27 eqid 2736 . . . . . . . . . . . . . . . . . 18 (0.‘𝐾) = (0.‘𝐾)
2826, 27op0cl 36884 . . . . . . . . . . . . . . . . 17 (𝐾 ∈ OP → (0.‘𝐾) ∈ (Base‘𝐾))
2925, 28syl 17 . . . . . . . . . . . . . . . 16 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (0.‘𝐾) ∈ (Base‘𝐾))
3026, 7atbase 36989 . . . . . . . . . . . . . . . . 17 (𝑃𝐴𝑃 ∈ (Base‘𝐾))
313, 30syl 17 . . . . . . . . . . . . . . . 16 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝑃 ∈ (Base‘𝐾))
32 eqid 2736 . . . . . . . . . . . . . . . . . 18 ( ⋖ ‘𝐾) = ( ⋖ ‘𝐾)
3327, 32, 7atcvr0 36988 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ HL ∧ 𝑃𝐴) → (0.‘𝐾)( ⋖ ‘𝐾)𝑃)
342, 3, 33syl2anc 587 . . . . . . . . . . . . . . . 16 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (0.‘𝐾)( ⋖ ‘𝐾)𝑃)
35 eqid 2736 . . . . . . . . . . . . . . . . 17 (lt‘𝐾) = (lt‘𝐾)
3626, 35, 32cvrlt 36970 . . . . . . . . . . . . . . . 16 (((𝐾 ∈ HL ∧ (0.‘𝐾) ∈ (Base‘𝐾) ∧ 𝑃 ∈ (Base‘𝐾)) ∧ (0.‘𝐾)( ⋖ ‘𝐾)𝑃) → (0.‘𝐾)(lt‘𝐾)𝑃)
372, 29, 31, 34, 36syl31anc 1375 . . . . . . . . . . . . . . 15 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (0.‘𝐾)(lt‘𝐾)𝑃)
38 hlpos 37066 . . . . . . . . . . . . . . . . 17 (𝐾 ∈ HL → 𝐾 ∈ Poset)
39383ad2ant1 1135 . . . . . . . . . . . . . . . 16 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝐾 ∈ Poset)
40 hllat 37063 . . . . . . . . . . . . . . . . . 18 (𝐾 ∈ HL → 𝐾 ∈ Lat)
41403ad2ant1 1135 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝐾 ∈ Lat)
4226, 7atbase 36989 . . . . . . . . . . . . . . . . . 18 (𝑅𝐴𝑅 ∈ (Base‘𝐾))
434, 42syl 17 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝑅 ∈ (Base‘𝐾))
4426, 6latjcl 17899 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ Lat ∧ 𝑃 ∈ (Base‘𝐾) ∧ 𝑅 ∈ (Base‘𝐾)) → (𝑃 𝑅) ∈ (Base‘𝐾))
4541, 31, 43, 44syl3anc 1373 . . . . . . . . . . . . . . . 16 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (𝑃 𝑅) ∈ (Base‘𝐾))
4626, 5, 35pltletr 17803 . . . . . . . . . . . . . . . 16 ((𝐾 ∈ Poset ∧ ((0.‘𝐾) ∈ (Base‘𝐾) ∧ 𝑃 ∈ (Base‘𝐾) ∧ (𝑃 𝑅) ∈ (Base‘𝐾))) → (((0.‘𝐾)(lt‘𝐾)𝑃𝑃 (𝑃 𝑅)) → (0.‘𝐾)(lt‘𝐾)(𝑃 𝑅)))
4739, 29, 31, 45, 46syl13anc 1374 . . . . . . . . . . . . . . 15 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (((0.‘𝐾)(lt‘𝐾)𝑃𝑃 (𝑃 𝑅)) → (0.‘𝐾)(lt‘𝐾)(𝑃 𝑅)))
4837, 9, 47mp2and 699 . . . . . . . . . . . . . 14 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (0.‘𝐾)(lt‘𝐾)(𝑃 𝑅))
4935pltne 17794 . . . . . . . . . . . . . . 15 ((𝐾 ∈ HL ∧ (0.‘𝐾) ∈ (Base‘𝐾) ∧ (𝑃 𝑅) ∈ (Base‘𝐾)) → ((0.‘𝐾)(lt‘𝐾)(𝑃 𝑅) → (0.‘𝐾) ≠ (𝑃 𝑅)))
502, 29, 45, 49syl3anc 1373 . . . . . . . . . . . . . 14 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → ((0.‘𝐾)(lt‘𝐾)(𝑃 𝑅) → (0.‘𝐾) ≠ (𝑃 𝑅)))
5148, 50mpd 15 . . . . . . . . . . . . 13 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (0.‘𝐾) ≠ (𝑃 𝑅))
5251necomd 2987 . . . . . . . . . . . 12 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (𝑃 𝑅) ≠ (0.‘𝐾))
5352adantr 484 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (𝑆𝑃 ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅)))) → (𝑃 𝑅) ≠ (0.‘𝐾))
54 hlatl 37060 . . . . . . . . . . . . . . . . . . 19 (𝐾 ∈ HL → 𝐾 ∈ AtLat)
55543ad2ant1 1135 . . . . . . . . . . . . . . . . . 18 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝐾 ∈ AtLat)
56 simp3l 1203 . . . . . . . . . . . . . . . . . 18 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝑆𝐴)
575, 7atncmp 37012 . . . . . . . . . . . . . . . . . 18 ((𝐾 ∈ AtLat ∧ 𝑆𝐴𝑃𝐴) → (¬ 𝑆 𝑃𝑆𝑃))
5855, 56, 3, 57syl3anc 1373 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (¬ 𝑆 𝑃𝑆𝑃))
59 simp22 1209 . . . . . . . . . . . . . . . . . 18 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝑄𝐴)
6026, 5, 6, 7hlexch1 37082 . . . . . . . . . . . . . . . . . . 19 ((𝐾 ∈ HL ∧ (𝑆𝐴𝑄𝐴𝑃 ∈ (Base‘𝐾)) ∧ ¬ 𝑆 𝑃) → (𝑆 (𝑃 𝑄) → 𝑄 (𝑃 𝑆)))
61603expia 1123 . . . . . . . . . . . . . . . . . 18 ((𝐾 ∈ HL ∧ (𝑆𝐴𝑄𝐴𝑃 ∈ (Base‘𝐾))) → (¬ 𝑆 𝑃 → (𝑆 (𝑃 𝑄) → 𝑄 (𝑃 𝑆))))
622, 56, 59, 31, 61syl13anc 1374 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (¬ 𝑆 𝑃 → (𝑆 (𝑃 𝑄) → 𝑄 (𝑃 𝑆))))
6358, 62sylbird 263 . . . . . . . . . . . . . . . 16 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (𝑆𝑃 → (𝑆 (𝑃 𝑄) → 𝑄 (𝑃 𝑆))))
6463imp32 422 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (𝑆𝑃𝑆 (𝑃 𝑄))) → 𝑄 (𝑃 𝑆))
6526, 7atbase 36989 . . . . . . . . . . . . . . . . . 18 (𝑄𝐴𝑄 ∈ (Base‘𝐾))
6659, 65syl 17 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝑄 ∈ (Base‘𝐾))
6726, 7atbase 36989 . . . . . . . . . . . . . . . . . . 19 (𝑆𝐴𝑆 ∈ (Base‘𝐾))
6856, 67syl 17 . . . . . . . . . . . . . . . . . 18 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝑆 ∈ (Base‘𝐾))
6926, 6latjcl 17899 . . . . . . . . . . . . . . . . . 18 ((𝐾 ∈ Lat ∧ 𝑃 ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾)) → (𝑃 𝑆) ∈ (Base‘𝐾))
7041, 31, 68, 69syl3anc 1373 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (𝑃 𝑆) ∈ (Base‘𝐾))
7126, 5, 6latjlej1 17913 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ Lat ∧ (𝑄 ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾) ∧ 𝑅 ∈ (Base‘𝐾))) → (𝑄 (𝑃 𝑆) → (𝑄 𝑅) ((𝑃 𝑆) 𝑅)))
7241, 66, 70, 43, 71syl13anc 1374 . . . . . . . . . . . . . . . 16 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (𝑄 (𝑃 𝑆) → (𝑄 𝑅) ((𝑃 𝑆) 𝑅)))
7372adantr 484 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (𝑆𝑃𝑆 (𝑃 𝑄))) → (𝑄 (𝑃 𝑆) → (𝑄 𝑅) ((𝑃 𝑆) 𝑅)))
7464, 73mpd 15 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (𝑆𝑃𝑆 (𝑃 𝑄))) → (𝑄 𝑅) ((𝑃 𝑆) 𝑅))
7574adantrrr 725 . . . . . . . . . . . . 13 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (𝑆𝑃 ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅)))) → (𝑄 𝑅) ((𝑃 𝑆) 𝑅))
7626, 7atbase 36989 . . . . . . . . . . . . . . . . . 18 (𝑇𝐴𝑇 ∈ (Base‘𝐾))
7711, 76syl 17 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → 𝑇 ∈ (Base‘𝐾))
7826, 6latjcl 17899 . . . . . . . . . . . . . . . . . 18 ((𝐾 ∈ Lat ∧ 𝑄 ∈ (Base‘𝐾) ∧ 𝑅 ∈ (Base‘𝐾)) → (𝑄 𝑅) ∈ (Base‘𝐾))
7941, 66, 43, 78syl3anc 1373 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (𝑄 𝑅) ∈ (Base‘𝐾))
8026, 6latjcl 17899 . . . . . . . . . . . . . . . . . 18 ((𝐾 ∈ Lat ∧ (𝑃 𝑆) ∈ (Base‘𝐾) ∧ 𝑅 ∈ (Base‘𝐾)) → ((𝑃 𝑆) 𝑅) ∈ (Base‘𝐾))
8141, 70, 43, 80syl3anc 1373 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → ((𝑃 𝑆) 𝑅) ∈ (Base‘𝐾))
8226, 5lattr 17904 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ Lat ∧ (𝑇 ∈ (Base‘𝐾) ∧ (𝑄 𝑅) ∈ (Base‘𝐾) ∧ ((𝑃 𝑆) 𝑅) ∈ (Base‘𝐾))) → ((𝑇 (𝑄 𝑅) ∧ (𝑄 𝑅) ((𝑃 𝑆) 𝑅)) → 𝑇 ((𝑃 𝑆) 𝑅)))
8341, 77, 79, 81, 82syl13anc 1374 . . . . . . . . . . . . . . . 16 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → ((𝑇 (𝑄 𝑅) ∧ (𝑄 𝑅) ((𝑃 𝑆) 𝑅)) → 𝑇 ((𝑃 𝑆) 𝑅)))
8483expdimp 456 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑇 (𝑄 𝑅)) → ((𝑄 𝑅) ((𝑃 𝑆) 𝑅) → 𝑇 ((𝑃 𝑆) 𝑅)))
8584adantrl 716 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅))) → ((𝑄 𝑅) ((𝑃 𝑆) 𝑅) → 𝑇 ((𝑃 𝑆) 𝑅)))
8685adantrl 716 . . . . . . . . . . . . 13 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (𝑆𝑃 ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅)))) → ((𝑄 𝑅) ((𝑃 𝑆) 𝑅) → 𝑇 ((𝑃 𝑆) 𝑅)))
8775, 86mpd 15 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (𝑆𝑃 ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅)))) → 𝑇 ((𝑃 𝑆) 𝑅))
886, 7hlatj32 37072 . . . . . . . . . . . . . . 15 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑆𝐴𝑅𝐴)) → ((𝑃 𝑆) 𝑅) = ((𝑃 𝑅) 𝑆))
892, 3, 56, 4, 88syl13anc 1374 . . . . . . . . . . . . . 14 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → ((𝑃 𝑆) 𝑅) = ((𝑃 𝑅) 𝑆))
9089breq2d 5051 . . . . . . . . . . . . 13 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (𝑇 ((𝑃 𝑆) 𝑅) ↔ 𝑇 ((𝑃 𝑅) 𝑆)))
9190adantr 484 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (𝑆𝑃 ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅)))) → (𝑇 ((𝑃 𝑆) 𝑅) ↔ 𝑇 ((𝑃 𝑅) 𝑆)))
9287, 91mpbid 235 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (𝑆𝑃 ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅)))) → 𝑇 ((𝑃 𝑅) 𝑆))
9353, 92jca 515 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (𝑆𝑃 ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅)))) → ((𝑃 𝑅) ≠ (0.‘𝐾) ∧ 𝑇 ((𝑃 𝑅) 𝑆)))
9493adantrrl 724 . . . . . . . . 9 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (𝑆𝑃 ∧ (¬ 𝑃 (𝑄 𝑅) ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅))))) → ((𝑃 𝑅) ≠ (0.‘𝐾) ∧ 𝑇 ((𝑃 𝑅) 𝑆)))
9594ex 416 . . . . . . . 8 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → ((𝑆𝑃 ∧ (¬ 𝑃 (𝑄 𝑅) ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅)))) → ((𝑃 𝑅) ≠ (0.‘𝐾) ∧ 𝑇 ((𝑃 𝑅) 𝑆))))
9626, 5, 6, 27, 7cvrat4 37143 . . . . . . . . 9 ((𝐾 ∈ HL ∧ ((𝑃 𝑅) ∈ (Base‘𝐾) ∧ 𝑇𝐴𝑆𝐴)) → (((𝑃 𝑅) ≠ (0.‘𝐾) ∧ 𝑇 ((𝑃 𝑅) 𝑆)) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑇 (𝑆 𝑢))))
972, 45, 11, 56, 96syl13anc 1374 . . . . . . . 8 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (((𝑃 𝑅) ≠ (0.‘𝐾) ∧ 𝑇 ((𝑃 𝑅) 𝑆)) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑇 (𝑆 𝑢))))
9895, 97syld 47 . . . . . . 7 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → ((𝑆𝑃 ∧ (¬ 𝑃 (𝑄 𝑅) ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅)))) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑇 (𝑆 𝑢))))
9998impl 459 . . . . . 6 ((((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑆𝑃) ∧ (¬ 𝑃 (𝑄 𝑅) ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅)))) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑇 (𝑆 𝑢)))
10099adantrlr 723 . . . . 5 ((((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑆𝑃) ∧ ((¬ 𝑃 (𝑄 𝑅) ∧ 𝑆𝑇) ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅)))) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑇 (𝑆 𝑢)))
1015, 7atncmp 37012 . . . . . . . . . . . . . . 15 ((𝐾 ∈ AtLat ∧ 𝑇𝐴𝑆𝐴) → (¬ 𝑇 𝑆𝑇𝑆))
10255, 11, 56, 101syl3anc 1373 . . . . . . . . . . . . . 14 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (¬ 𝑇 𝑆𝑇𝑆))
103 necom 2985 . . . . . . . . . . . . . 14 (𝑇𝑆𝑆𝑇)
104102, 103bitrdi 290 . . . . . . . . . . . . 13 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (¬ 𝑇 𝑆𝑆𝑇))
105104adantr 484 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑢𝐴) → (¬ 𝑇 𝑆𝑆𝑇))
106 simpl1 1193 . . . . . . . . . . . . 13 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑢𝐴) → 𝐾 ∈ HL)
107 simpl3r 1231 . . . . . . . . . . . . 13 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑢𝐴) → 𝑇𝐴)
108 simpr 488 . . . . . . . . . . . . 13 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑢𝐴) → 𝑢𝐴)
10968adantr 484 . . . . . . . . . . . . 13 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑢𝐴) → 𝑆 ∈ (Base‘𝐾))
11026, 5, 6, 7hlexch1 37082 . . . . . . . . . . . . . 14 ((𝐾 ∈ HL ∧ (𝑇𝐴𝑢𝐴𝑆 ∈ (Base‘𝐾)) ∧ ¬ 𝑇 𝑆) → (𝑇 (𝑆 𝑢) → 𝑢 (𝑆 𝑇)))
1111103expia 1123 . . . . . . . . . . . . 13 ((𝐾 ∈ HL ∧ (𝑇𝐴𝑢𝐴𝑆 ∈ (Base‘𝐾))) → (¬ 𝑇 𝑆 → (𝑇 (𝑆 𝑢) → 𝑢 (𝑆 𝑇))))
112106, 107, 108, 109, 111syl13anc 1374 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑢𝐴) → (¬ 𝑇 𝑆 → (𝑇 (𝑆 𝑢) → 𝑢 (𝑆 𝑇))))
113105, 112sylbird 263 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑢𝐴) → (𝑆𝑇 → (𝑇 (𝑆 𝑢) → 𝑢 (𝑆 𝑇))))
114113imp 410 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑢𝐴) ∧ 𝑆𝑇) → (𝑇 (𝑆 𝑢) → 𝑢 (𝑆 𝑇)))
115114an32s 652 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑆𝑇) ∧ 𝑢𝐴) → (𝑇 (𝑆 𝑢) → 𝑢 (𝑆 𝑇)))
116115anim2d 615 . . . . . . . 8 ((((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑆𝑇) ∧ 𝑢𝐴) → ((𝑢 (𝑃 𝑅) ∧ 𝑇 (𝑆 𝑢)) → (𝑢 (𝑃 𝑅) ∧ 𝑢 (𝑆 𝑇))))
117116reximdva 3183 . . . . . . 7 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑆𝑇) → (∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑇 (𝑆 𝑢)) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑢 (𝑆 𝑇))))
118117ad2ant2rl 749 . . . . . 6 ((((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑆𝑃) ∧ (¬ 𝑃 (𝑄 𝑅) ∧ 𝑆𝑇)) → (∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑇 (𝑆 𝑢)) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑢 (𝑆 𝑇))))
119118adantrr 717 . . . . 5 ((((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑆𝑃) ∧ ((¬ 𝑃 (𝑄 𝑅) ∧ 𝑆𝑇) ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅)))) → (∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑇 (𝑆 𝑢)) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑢 (𝑆 𝑇))))
120100, 119mpd 15 . . . 4 ((((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑆𝑃) ∧ ((¬ 𝑃 (𝑄 𝑅) ∧ 𝑆𝑇) ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅)))) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑢 (𝑆 𝑇)))
121120ex 416 . . 3 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ 𝑆𝑃) → (((¬ 𝑃 (𝑄 𝑅) ∧ 𝑆𝑇) ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅))) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑢 (𝑆 𝑇))))
12223, 121pm2.61dane 3019 . 2 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) → (((¬ 𝑃 (𝑄 𝑅) ∧ 𝑆𝑇) ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅))) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑢 (𝑆 𝑇))))
123122imp 410 1 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ ((¬ 𝑃 (𝑄 𝑅) ∧ 𝑆𝑇) ∧ (𝑆 (𝑃 𝑄) ∧ 𝑇 (𝑄 𝑅)))) → ∃𝑢𝐴 (𝑢 (𝑃 𝑅) ∧ 𝑢 (𝑆 𝑇)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 209  wa 399  w3a 1089   = wceq 1543  wcel 2112  wne 2932  wrex 3052   class class class wbr 5039  cfv 6358  (class class class)co 7191  Basecbs 16666  lecple 16756  Posetcpo 17768  ltcplt 17769  joincjn 17772  0.cp0 17883  Latclat 17891  OPcops 36872  ccvr 36962  Atomscatm 36963  AtLatcal 36964  HLchlt 37050
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 2018  ax-8 2114  ax-9 2122  ax-10 2143  ax-11 2160  ax-12 2177  ax-ext 2708  ax-rep 5164  ax-sep 5177  ax-nul 5184  ax-pow 5243  ax-pr 5307  ax-un 7501
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 2073  df-mo 2539  df-eu 2568  df-clab 2715  df-cleq 2728  df-clel 2809  df-nfc 2879  df-ne 2933  df-ral 3056  df-rex 3057  df-reu 3058  df-rab 3060  df-v 3400  df-sbc 3684  df-csb 3799  df-dif 3856  df-un 3858  df-in 3860  df-ss 3870  df-nul 4224  df-if 4426  df-pw 4501  df-sn 4528  df-pr 4530  df-op 4534  df-uni 4806  df-iun 4892  df-br 5040  df-opab 5102  df-mpt 5121  df-id 5440  df-xp 5542  df-rel 5543  df-cnv 5544  df-co 5545  df-dm 5546  df-rn 5547  df-res 5548  df-ima 5549  df-iota 6316  df-fun 6360  df-fn 6361  df-f 6362  df-f1 6363  df-fo 6364  df-f1o 6365  df-fv 6366  df-riota 7148  df-ov 7194  df-oprab 7195  df-proset 17756  df-poset 17774  df-plt 17790  df-lub 17806  df-glb 17807  df-join 17808  df-meet 17809  df-p0 17885  df-lat 17892  df-clat 17959  df-oposet 36876  df-ol 36878  df-oml 36879  df-covers 36966  df-ats 36967  df-atl 36998  df-cvlat 37022  df-hlat 37051
This theorem is referenced by:  ps-2b  37182  paddasslem3  37522
  Copyright terms: Public domain W3C validator