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

Theorem 3dim1 36618
Description: Construct a 3-dimensional volume (height-4 element) on top of a given atom 𝑃. (Contributed by NM, 25-Jul-2012.)
Hypotheses
Ref Expression
3dim0.j = (join‘𝐾)
3dim0.l = (le‘𝐾)
3dim0.a 𝐴 = (Atoms‘𝐾)
Assertion
Ref Expression
3dim1 ((𝐾 ∈ HL ∧ 𝑃𝐴) → ∃𝑞𝐴𝑟𝐴𝑠𝐴 (𝑃𝑞 ∧ ¬ 𝑟 (𝑃 𝑞) ∧ ¬ 𝑠 ((𝑃 𝑞) 𝑟)))
Distinct variable groups:   𝑟,𝑞,𝑠,𝐴   ,𝑟,𝑠,𝑞   ,𝑞,𝑟,𝑠   𝑃,𝑞,𝑟,𝑠
Allowed substitution hints:   𝐾(𝑠,𝑟,𝑞)

Proof of Theorem 3dim1
Dummy variables 𝑢 𝑡 𝑣 𝑤 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 3dim0.j . . . 4 = (join‘𝐾)
2 3dim0.l . . . 4 = (le‘𝐾)
3 3dim0.a . . . 4 𝐴 = (Atoms‘𝐾)
41, 2, 33dim0 36608 . . 3 (𝐾 ∈ HL → ∃𝑡𝐴𝑢𝐴𝑣𝐴𝑤𝐴 (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣)))
54adantr 483 . 2 ((𝐾 ∈ HL ∧ 𝑃𝐴) → ∃𝑡𝐴𝑢𝐴𝑣𝐴𝑤𝐴 (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣)))
6 simpl2 1188 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ 𝑃 = 𝑡) → (𝑢𝐴𝑣𝐴𝑤𝐴))
71, 2, 33dimlem1 36609 . . . . . . . . . . . 12 (((𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣)) ∧ 𝑃 = 𝑡) → (𝑃𝑢 ∧ ¬ 𝑣 (𝑃 𝑢) ∧ ¬ 𝑤 ((𝑃 𝑢) 𝑣)))
873ad2antl3 1183 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ 𝑃 = 𝑡) → (𝑃𝑢 ∧ ¬ 𝑣 (𝑃 𝑢) ∧ ¬ 𝑤 ((𝑃 𝑢) 𝑣)))
91, 2, 33dim1lem5 36617 . . . . . . . . . . 11 (((𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑃𝑢 ∧ ¬ 𝑣 (𝑃 𝑢) ∧ ¬ 𝑤 ((𝑃 𝑢) 𝑣))) → ∃𝑞𝐴𝑟𝐴𝑠𝐴 (𝑃𝑞 ∧ ¬ 𝑟 (𝑃 𝑞) ∧ ¬ 𝑠 ((𝑃 𝑞) 𝑟)))
106, 8, 9syl2anc 586 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ 𝑃 = 𝑡) → ∃𝑞𝐴𝑟𝐴𝑠𝐴 (𝑃𝑞 ∧ ¬ 𝑟 (𝑃 𝑞) ∧ ¬ 𝑠 ((𝑃 𝑞) 𝑟)))
11 simp13 1201 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) → 𝑡𝐴)
12 simp22 1203 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) → 𝑣𝐴)
13 simp23 1204 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) → 𝑤𝐴)
1411, 12, 133jca 1124 . . . . . . . . . . . . 13 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) → (𝑡𝐴𝑣𝐴𝑤𝐴))
1514ad2antrr 724 . . . . . . . . . . . 12 (((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ 𝑃𝑡) ∧ 𝑃 (𝑡 𝑢)) → (𝑡𝐴𝑣𝐴𝑤𝐴))
16 simpll1 1208 . . . . . . . . . . . . 13 (((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ 𝑃𝑡) ∧ 𝑃 (𝑡 𝑢)) → (𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴))
17 simp21 1202 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) → 𝑢𝐴)
18 simp32 1206 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) → ¬ 𝑣 (𝑡 𝑢))
19 simp33 1207 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) → ¬ 𝑤 ((𝑡 𝑢) 𝑣))
2017, 18, 193jca 1124 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) → (𝑢𝐴 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣)))
2120ad2antrr 724 . . . . . . . . . . . . 13 (((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ 𝑃𝑡) ∧ 𝑃 (𝑡 𝑢)) → (𝑢𝐴 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣)))
22 simplr 767 . . . . . . . . . . . . 13 (((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ 𝑃𝑡) ∧ 𝑃 (𝑡 𝑢)) → 𝑃𝑡)
23 simpr 487 . . . . . . . . . . . . 13 (((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ 𝑃𝑡) ∧ 𝑃 (𝑡 𝑢)) → 𝑃 (𝑡 𝑢))
241, 2, 33dimlem2 36610 . . . . . . . . . . . . 13 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣)) ∧ (𝑃𝑡𝑃 (𝑡 𝑢))) → (𝑃𝑡 ∧ ¬ 𝑣 (𝑃 𝑡) ∧ ¬ 𝑤 ((𝑃 𝑡) 𝑣)))
2516, 21, 22, 23, 24syl112anc 1370 . . . . . . . . . . . 12 (((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ 𝑃𝑡) ∧ 𝑃 (𝑡 𝑢)) → (𝑃𝑡 ∧ ¬ 𝑣 (𝑃 𝑡) ∧ ¬ 𝑤 ((𝑃 𝑡) 𝑣)))
261, 2, 33dim1lem5 36617 . . . . . . . . . . . 12 (((𝑡𝐴𝑣𝐴𝑤𝐴) ∧ (𝑃𝑡 ∧ ¬ 𝑣 (𝑃 𝑡) ∧ ¬ 𝑤 ((𝑃 𝑡) 𝑣))) → ∃𝑞𝐴𝑟𝐴𝑠𝐴 (𝑃𝑞 ∧ ¬ 𝑟 (𝑃 𝑞) ∧ ¬ 𝑠 ((𝑃 𝑞) 𝑟)))
2715, 25, 26syl2anc 586 . . . . . . . . . . 11 (((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ 𝑃𝑡) ∧ 𝑃 (𝑡 𝑢)) → ∃𝑞𝐴𝑟𝐴𝑠𝐴 (𝑃𝑞 ∧ ¬ 𝑟 (𝑃 𝑞) ∧ ¬ 𝑠 ((𝑃 𝑞) 𝑟)))
2811, 17, 133jca 1124 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) → (𝑡𝐴𝑢𝐴𝑤𝐴))
2928ad2antrr 724 . . . . . . . . . . . . . 14 (((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ (𝑃𝑡 ∧ ¬ 𝑃 (𝑡 𝑢))) ∧ 𝑃 ((𝑡 𝑢) 𝑣)) → (𝑡𝐴𝑢𝐴𝑤𝐴))
30 simp1 1132 . . . . . . . . . . . . . . . . 17 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) → (𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴))
3117, 12jca 514 . . . . . . . . . . . . . . . . 17 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) → (𝑢𝐴𝑣𝐴))
32 simp31 1205 . . . . . . . . . . . . . . . . . 18 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) → 𝑡𝑢)
3332, 19jca 514 . . . . . . . . . . . . . . . . 17 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) → (𝑡𝑢 ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣)))
3430, 31, 333jca 1124 . . . . . . . . . . . . . . . 16 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) → ((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))))
3534ad2antrr 724 . . . . . . . . . . . . . . 15 (((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ (𝑃𝑡 ∧ ¬ 𝑃 (𝑡 𝑢))) ∧ 𝑃 ((𝑡 𝑢) 𝑣)) → ((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))))
36 simplrl 775 . . . . . . . . . . . . . . 15 (((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ (𝑃𝑡 ∧ ¬ 𝑃 (𝑡 𝑢))) ∧ 𝑃 ((𝑡 𝑢) 𝑣)) → 𝑃𝑡)
37 simplrr 776 . . . . . . . . . . . . . . 15 (((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ (𝑃𝑡 ∧ ¬ 𝑃 (𝑡 𝑢))) ∧ 𝑃 ((𝑡 𝑢) 𝑣)) → ¬ 𝑃 (𝑡 𝑢))
38 simpr 487 . . . . . . . . . . . . . . 15 (((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ (𝑃𝑡 ∧ ¬ 𝑃 (𝑡 𝑢))) ∧ 𝑃 ((𝑡 𝑢) 𝑣)) → 𝑃 ((𝑡 𝑢) 𝑣))
391, 2, 33dimlem3 36612 . . . . . . . . . . . . . . 15 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ (𝑃𝑡 ∧ ¬ 𝑃 (𝑡 𝑢) ∧ 𝑃 ((𝑡 𝑢) 𝑣))) → (𝑃𝑡 ∧ ¬ 𝑢 (𝑃 𝑡) ∧ ¬ 𝑤 ((𝑃 𝑡) 𝑢)))
4035, 36, 37, 38, 39syl13anc 1368 . . . . . . . . . . . . . 14 (((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ (𝑃𝑡 ∧ ¬ 𝑃 (𝑡 𝑢))) ∧ 𝑃 ((𝑡 𝑢) 𝑣)) → (𝑃𝑡 ∧ ¬ 𝑢 (𝑃 𝑡) ∧ ¬ 𝑤 ((𝑃 𝑡) 𝑢)))
411, 2, 33dim1lem5 36617 . . . . . . . . . . . . . 14 (((𝑡𝐴𝑢𝐴𝑤𝐴) ∧ (𝑃𝑡 ∧ ¬ 𝑢 (𝑃 𝑡) ∧ ¬ 𝑤 ((𝑃 𝑡) 𝑢))) → ∃𝑞𝐴𝑟𝐴𝑠𝐴 (𝑃𝑞 ∧ ¬ 𝑟 (𝑃 𝑞) ∧ ¬ 𝑠 ((𝑃 𝑞) 𝑟)))
4229, 40, 41syl2anc 586 . . . . . . . . . . . . 13 (((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ (𝑃𝑡 ∧ ¬ 𝑃 (𝑡 𝑢))) ∧ 𝑃 ((𝑡 𝑢) 𝑣)) → ∃𝑞𝐴𝑟𝐴𝑠𝐴 (𝑃𝑞 ∧ ¬ 𝑟 (𝑃 𝑞) ∧ ¬ 𝑠 ((𝑃 𝑞) 𝑟)))
4311, 17, 123jca 1124 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) → (𝑡𝐴𝑢𝐴𝑣𝐴))
4443ad2antrr 724 . . . . . . . . . . . . . 14 (((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ (𝑃𝑡 ∧ ¬ 𝑃 (𝑡 𝑢))) ∧ ¬ 𝑃 ((𝑡 𝑢) 𝑣)) → (𝑡𝐴𝑢𝐴𝑣𝐴))
45 simpl1 1187 . . . . . . . . . . . . . . . . 17 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ (𝑃𝑡 ∧ ¬ 𝑃 (𝑡 𝑢))) → (𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴))
46 simpl21 1247 . . . . . . . . . . . . . . . . . 18 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ (𝑃𝑡 ∧ ¬ 𝑃 (𝑡 𝑢))) → 𝑢𝐴)
47 simpl22 1248 . . . . . . . . . . . . . . . . . 18 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ (𝑃𝑡 ∧ ¬ 𝑃 (𝑡 𝑢))) → 𝑣𝐴)
4846, 47jca 514 . . . . . . . . . . . . . . . . 17 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ (𝑃𝑡 ∧ ¬ 𝑃 (𝑡 𝑢))) → (𝑢𝐴𝑣𝐴))
49 simpl31 1250 . . . . . . . . . . . . . . . . . 18 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ (𝑃𝑡 ∧ ¬ 𝑃 (𝑡 𝑢))) → 𝑡𝑢)
50 simpl32 1251 . . . . . . . . . . . . . . . . . 18 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ (𝑃𝑡 ∧ ¬ 𝑃 (𝑡 𝑢))) → ¬ 𝑣 (𝑡 𝑢))
5149, 50jca 514 . . . . . . . . . . . . . . . . 17 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ (𝑃𝑡 ∧ ¬ 𝑃 (𝑡 𝑢))) → (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢)))
5245, 48, 513jca 1124 . . . . . . . . . . . . . . . 16 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ (𝑃𝑡 ∧ ¬ 𝑃 (𝑡 𝑢))) → ((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢))))
5352adantr 483 . . . . . . . . . . . . . . 15 (((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ (𝑃𝑡 ∧ ¬ 𝑃 (𝑡 𝑢))) ∧ ¬ 𝑃 ((𝑡 𝑢) 𝑣)) → ((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢))))
54 simplr 767 . . . . . . . . . . . . . . 15 (((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ (𝑃𝑡 ∧ ¬ 𝑃 (𝑡 𝑢))) ∧ ¬ 𝑃 ((𝑡 𝑢) 𝑣)) → (𝑃𝑡 ∧ ¬ 𝑃 (𝑡 𝑢)))
55 simpr 487 . . . . . . . . . . . . . . 15 (((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ (𝑃𝑡 ∧ ¬ 𝑃 (𝑡 𝑢))) ∧ ¬ 𝑃 ((𝑡 𝑢) 𝑣)) → ¬ 𝑃 ((𝑡 𝑢) 𝑣))
561, 2, 33dimlem4 36615 . . . . . . . . . . . . . . 15 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢))) ∧ (𝑃𝑡 ∧ ¬ 𝑃 (𝑡 𝑢)) ∧ ¬ 𝑃 ((𝑡 𝑢) 𝑣)) → (𝑃𝑡 ∧ ¬ 𝑢 (𝑃 𝑡) ∧ ¬ 𝑣 ((𝑃 𝑡) 𝑢)))
5753, 54, 55, 56syl3anc 1367 . . . . . . . . . . . . . 14 (((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ (𝑃𝑡 ∧ ¬ 𝑃 (𝑡 𝑢))) ∧ ¬ 𝑃 ((𝑡 𝑢) 𝑣)) → (𝑃𝑡 ∧ ¬ 𝑢 (𝑃 𝑡) ∧ ¬ 𝑣 ((𝑃 𝑡) 𝑢)))
581, 2, 33dim1lem5 36617 . . . . . . . . . . . . . 14 (((𝑡𝐴𝑢𝐴𝑣𝐴) ∧ (𝑃𝑡 ∧ ¬ 𝑢 (𝑃 𝑡) ∧ ¬ 𝑣 ((𝑃 𝑡) 𝑢))) → ∃𝑞𝐴𝑟𝐴𝑠𝐴 (𝑃𝑞 ∧ ¬ 𝑟 (𝑃 𝑞) ∧ ¬ 𝑠 ((𝑃 𝑞) 𝑟)))
5944, 57, 58syl2anc 586 . . . . . . . . . . . . 13 (((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ (𝑃𝑡 ∧ ¬ 𝑃 (𝑡 𝑢))) ∧ ¬ 𝑃 ((𝑡 𝑢) 𝑣)) → ∃𝑞𝐴𝑟𝐴𝑠𝐴 (𝑃𝑞 ∧ ¬ 𝑟 (𝑃 𝑞) ∧ ¬ 𝑠 ((𝑃 𝑞) 𝑟)))
6042, 59pm2.61dan 811 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ (𝑃𝑡 ∧ ¬ 𝑃 (𝑡 𝑢))) → ∃𝑞𝐴𝑟𝐴𝑠𝐴 (𝑃𝑞 ∧ ¬ 𝑟 (𝑃 𝑞) ∧ ¬ 𝑠 ((𝑃 𝑞) 𝑟)))
6160anassrs 470 . . . . . . . . . . 11 (((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ 𝑃𝑡) ∧ ¬ 𝑃 (𝑡 𝑢)) → ∃𝑞𝐴𝑟𝐴𝑠𝐴 (𝑃𝑞 ∧ ¬ 𝑟 (𝑃 𝑞) ∧ ¬ 𝑠 ((𝑃 𝑞) 𝑟)))
6227, 61pm2.61dan 811 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) ∧ 𝑃𝑡) → ∃𝑞𝐴𝑟𝐴𝑠𝐴 (𝑃𝑞 ∧ ¬ 𝑟 (𝑃 𝑞) ∧ ¬ 𝑠 ((𝑃 𝑞) 𝑟)))
6310, 62pm2.61dane 3104 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) ∧ (𝑢𝐴𝑣𝐴𝑤𝐴) ∧ (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣))) → ∃𝑞𝐴𝑟𝐴𝑠𝐴 (𝑃𝑞 ∧ ¬ 𝑟 (𝑃 𝑞) ∧ ¬ 𝑠 ((𝑃 𝑞) 𝑟)))
64633exp 1115 . . . . . . . 8 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) → ((𝑢𝐴𝑣𝐴𝑤𝐴) → ((𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣)) → ∃𝑞𝐴𝑟𝐴𝑠𝐴 (𝑃𝑞 ∧ ¬ 𝑟 (𝑃 𝑞) ∧ ¬ 𝑠 ((𝑃 𝑞) 𝑟)))))
65643expd 1349 . . . . . . 7 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑡𝐴) → (𝑢𝐴 → (𝑣𝐴 → (𝑤𝐴 → ((𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣)) → ∃𝑞𝐴𝑟𝐴𝑠𝐴 (𝑃𝑞 ∧ ¬ 𝑟 (𝑃 𝑞) ∧ ¬ 𝑠 ((𝑃 𝑞) 𝑟)))))))
66653exp 1115 . . . . . 6 (𝐾 ∈ HL → (𝑃𝐴 → (𝑡𝐴 → (𝑢𝐴 → (𝑣𝐴 → (𝑤𝐴 → ((𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣)) → ∃𝑞𝐴𝑟𝐴𝑠𝐴 (𝑃𝑞 ∧ ¬ 𝑟 (𝑃 𝑞) ∧ ¬ 𝑠 ((𝑃 𝑞) 𝑟)))))))))
6766imp43 430 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃𝐴) ∧ (𝑡𝐴𝑢𝐴)) → (𝑣𝐴 → (𝑤𝐴 → ((𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣)) → ∃𝑞𝐴𝑟𝐴𝑠𝐴 (𝑃𝑞 ∧ ¬ 𝑟 (𝑃 𝑞) ∧ ¬ 𝑠 ((𝑃 𝑞) 𝑟))))))
6867impd 413 . . . 4 (((𝐾 ∈ HL ∧ 𝑃𝐴) ∧ (𝑡𝐴𝑢𝐴)) → ((𝑣𝐴𝑤𝐴) → ((𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣)) → ∃𝑞𝐴𝑟𝐴𝑠𝐴 (𝑃𝑞 ∧ ¬ 𝑟 (𝑃 𝑞) ∧ ¬ 𝑠 ((𝑃 𝑞) 𝑟)))))
6968rexlimdvv 3293 . . 3 (((𝐾 ∈ HL ∧ 𝑃𝐴) ∧ (𝑡𝐴𝑢𝐴)) → (∃𝑣𝐴𝑤𝐴 (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣)) → ∃𝑞𝐴𝑟𝐴𝑠𝐴 (𝑃𝑞 ∧ ¬ 𝑟 (𝑃 𝑞) ∧ ¬ 𝑠 ((𝑃 𝑞) 𝑟))))
7069rexlimdvva 3294 . 2 ((𝐾 ∈ HL ∧ 𝑃𝐴) → (∃𝑡𝐴𝑢𝐴𝑣𝐴𝑤𝐴 (𝑡𝑢 ∧ ¬ 𝑣 (𝑡 𝑢) ∧ ¬ 𝑤 ((𝑡 𝑢) 𝑣)) → ∃𝑞𝐴𝑟𝐴𝑠𝐴 (𝑃𝑞 ∧ ¬ 𝑟 (𝑃 𝑞) ∧ ¬ 𝑠 ((𝑃 𝑞) 𝑟))))
715, 70mpd 15 1 ((𝐾 ∈ HL ∧ 𝑃𝐴) → ∃𝑞𝐴𝑟𝐴𝑠𝐴 (𝑃𝑞 ∧ ¬ 𝑟 (𝑃 𝑞) ∧ ¬ 𝑠 ((𝑃 𝑞) 𝑟)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 398  w3a 1083   = wceq 1537  wcel 2114  wne 3016  wrex 3139   class class class wbr 5066  cfv 6355  (class class class)co 7156  lecple 16572  joincjn 17554  Atomscatm 36414  HLchlt 36501
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2177  ax-ext 2793  ax-rep 5190  ax-sep 5203  ax-nul 5210  ax-pow 5266  ax-pr 5330  ax-un 7461
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3an 1085  df-tru 1540  df-ex 1781  df-nf 1785  df-sb 2070  df-mo 2622  df-eu 2654  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ne 3017  df-ral 3143  df-rex 3144  df-reu 3145  df-rab 3147  df-v 3496  df-sbc 3773  df-csb 3884  df-dif 3939  df-un 3941  df-in 3943  df-ss 3952  df-nul 4292  df-if 4468  df-pw 4541  df-sn 4568  df-pr 4570  df-op 4574  df-uni 4839  df-iun 4921  df-br 5067  df-opab 5129  df-mpt 5147  df-id 5460  df-xp 5561  df-rel 5562  df-cnv 5563  df-co 5564  df-dm 5565  df-rn 5566  df-res 5567  df-ima 5568  df-iota 6314  df-fun 6357  df-fn 6358  df-f 6359  df-f1 6360  df-fo 6361  df-f1o 6362  df-fv 6363  df-riota 7114  df-ov 7159  df-oprab 7160  df-proset 17538  df-poset 17556  df-plt 17568  df-lub 17584  df-glb 17585  df-join 17586  df-meet 17587  df-p0 17649  df-p1 17650  df-lat 17656  df-clat 17718  df-oposet 36327  df-ol 36329  df-oml 36330  df-covers 36417  df-ats 36418  df-atl 36449  df-cvlat 36473  df-hlat 36502
This theorem is referenced by:  3dim2  36619  2dim  36621
  Copyright terms: Public domain W3C validator