Theorem lvolnlelpln 40170

Description: A lattice plane cannot majorize a lattice volume. (Contributed by NM, 14-Jul-2012.)

Hypotheses

Ref	Expression
lvolnlelpln.l	⊢ ≤ = (le‘𝐾)
lvolnlelpln.p	⊢ 𝑃 = (LPlanes‘𝐾)
lvolnlelpln.v	⊢ 𝑉 = (LVols‘𝐾)

Assertion

Ref	Expression
lvolnlelpln	⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑃) → ¬ 𝑋 ≤ 𝑌)

Proof of Theorem lvolnlelpln

Dummy variables 𝑟 𝑞 𝑠 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		simp3 1150	. . 3 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑃) → 𝑌 ∈ 𝑃)
2		eqid 2761	. . . . 5 ⊢ (Base‘𝐾) = (Base‘𝐾)
3		lvolnlelpln.l	. . . . 5 ⊢ ≤ = (le‘𝐾)
4		eqid 2761	. . . . 5 ⊢ (join‘𝐾) = (join‘𝐾)
5		eqid 2761	. . . . 5 ⊢ (Atoms‘𝐾) = (Atoms‘𝐾)
6		lvolnlelpln.p	. . . . 5 ⊢ 𝑃 = (LPlanes‘𝐾)
7	2, 3, 4, 5, 6	islpln2 40121	. . . 4 ⊢ (𝐾 ∈ HL → (𝑌 ∈ 𝑃 ↔ (𝑌 ∈ (Base‘𝐾) ∧ ∃𝑞 ∈ (Atoms‘𝐾)∃𝑟 ∈ (Atoms‘𝐾)∃𝑠 ∈ (Atoms‘𝐾)(𝑞 ≠ 𝑟 ∧ ¬ 𝑠 ≤ (𝑞(join‘𝐾)𝑟) ∧ 𝑌 = ((𝑞(join‘𝐾)𝑟)(join‘𝐾)𝑠)))))
8	7	3ad2ant1 1145	. . 3 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑃) → (𝑌 ∈ 𝑃 ↔ (𝑌 ∈ (Base‘𝐾) ∧ ∃𝑞 ∈ (Atoms‘𝐾)∃𝑟 ∈ (Atoms‘𝐾)∃𝑠 ∈ (Atoms‘𝐾)(𝑞 ≠ 𝑟 ∧ ¬ 𝑠 ≤ (𝑞(join‘𝐾)𝑟) ∧ 𝑌 = ((𝑞(join‘𝐾)𝑟)(join‘𝐾)𝑠)))))
9	1, 8	mpbid 234	. 2 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑃) → (𝑌 ∈ (Base‘𝐾) ∧ ∃𝑞 ∈ (Atoms‘𝐾)∃𝑟 ∈ (Atoms‘𝐾)∃𝑠 ∈ (Atoms‘𝐾)(𝑞 ≠ 𝑟 ∧ ¬ 𝑠 ≤ (𝑞(join‘𝐾)𝑟) ∧ 𝑌 = ((𝑞(join‘𝐾)𝑟)(join‘𝐾)𝑠))))
10		simp1l1 1279	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑃) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (𝑟 ∈ (Atoms‘𝐾) ∧ 𝑠 ∈ (Atoms‘𝐾)) ∧ (𝑞 ≠ 𝑟 ∧ ¬ 𝑠 ≤ (𝑞(join‘𝐾)𝑟) ∧ 𝑌 = ((𝑞(join‘𝐾)𝑟)(join‘𝐾)𝑠))) → 𝐾 ∈ HL)
11		simp1l2 1280	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑃) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (𝑟 ∈ (Atoms‘𝐾) ∧ 𝑠 ∈ (Atoms‘𝐾)) ∧ (𝑞 ≠ 𝑟 ∧ ¬ 𝑠 ≤ (𝑞(join‘𝐾)𝑟) ∧ 𝑌 = ((𝑞(join‘𝐾)𝑟)(join‘𝐾)𝑠))) → 𝑋 ∈ 𝑉)
12		simp1r 1211	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑃) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (𝑟 ∈ (Atoms‘𝐾) ∧ 𝑠 ∈ (Atoms‘𝐾)) ∧ (𝑞 ≠ 𝑟 ∧ ¬ 𝑠 ≤ (𝑞(join‘𝐾)𝑟) ∧ 𝑌 = ((𝑞(join‘𝐾)𝑟)(join‘𝐾)𝑠))) → 𝑞 ∈ (Atoms‘𝐾))
13		simp2l 1212	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑃) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (𝑟 ∈ (Atoms‘𝐾) ∧ 𝑠 ∈ (Atoms‘𝐾)) ∧ (𝑞 ≠ 𝑟 ∧ ¬ 𝑠 ≤ (𝑞(join‘𝐾)𝑟) ∧ 𝑌 = ((𝑞(join‘𝐾)𝑟)(join‘𝐾)𝑠))) → 𝑟 ∈ (Atoms‘𝐾))
14		simp2r 1213	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑃) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (𝑟 ∈ (Atoms‘𝐾) ∧ 𝑠 ∈ (Atoms‘𝐾)) ∧ (𝑞 ≠ 𝑟 ∧ ¬ 𝑠 ≤ (𝑞(join‘𝐾)𝑟) ∧ 𝑌 = ((𝑞(join‘𝐾)𝑟)(join‘𝐾)𝑠))) → 𝑠 ∈ (Atoms‘𝐾))
15		lvolnlelpln.v	. . . . . . . . 9 ⊢ 𝑉 = (LVols‘𝐾)
16	3, 4, 5, 15	lvolnle3at 40167	. . . . . . . 8 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑉) ∧ (𝑞 ∈ (Atoms‘𝐾) ∧ 𝑟 ∈ (Atoms‘𝐾) ∧ 𝑠 ∈ (Atoms‘𝐾))) → ¬ 𝑋 ≤ ((𝑞(join‘𝐾)𝑟)(join‘𝐾)𝑠))
17	10, 11, 12, 13, 14, 16	syl23anc 1395	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑃) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (𝑟 ∈ (Atoms‘𝐾) ∧ 𝑠 ∈ (Atoms‘𝐾)) ∧ (𝑞 ≠ 𝑟 ∧ ¬ 𝑠 ≤ (𝑞(join‘𝐾)𝑟) ∧ 𝑌 = ((𝑞(join‘𝐾)𝑟)(join‘𝐾)𝑠))) → ¬ 𝑋 ≤ ((𝑞(join‘𝐾)𝑟)(join‘𝐾)𝑠))
18		simp33 1224	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑃) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (𝑟 ∈ (Atoms‘𝐾) ∧ 𝑠 ∈ (Atoms‘𝐾)) ∧ (𝑞 ≠ 𝑟 ∧ ¬ 𝑠 ≤ (𝑞(join‘𝐾)𝑟) ∧ 𝑌 = ((𝑞(join‘𝐾)𝑟)(join‘𝐾)𝑠))) → 𝑌 = ((𝑞(join‘𝐾)𝑟)(join‘𝐾)𝑠))
19	18	breq2d 5109	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑃) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (𝑟 ∈ (Atoms‘𝐾) ∧ 𝑠 ∈ (Atoms‘𝐾)) ∧ (𝑞 ≠ 𝑟 ∧ ¬ 𝑠 ≤ (𝑞(join‘𝐾)𝑟) ∧ 𝑌 = ((𝑞(join‘𝐾)𝑟)(join‘𝐾)𝑠))) → (𝑋 ≤ 𝑌 ↔ 𝑋 ≤ ((𝑞(join‘𝐾)𝑟)(join‘𝐾)𝑠)))
20	17, 19	mtbird 327	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑃) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (𝑟 ∈ (Atoms‘𝐾) ∧ 𝑠 ∈ (Atoms‘𝐾)) ∧ (𝑞 ≠ 𝑟 ∧ ¬ 𝑠 ≤ (𝑞(join‘𝐾)𝑟) ∧ 𝑌 = ((𝑞(join‘𝐾)𝑟)(join‘𝐾)𝑠))) → ¬ 𝑋 ≤ 𝑌)
21	20	3exp 1131	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑃) ∧ 𝑞 ∈ (Atoms‘𝐾)) → ((𝑟 ∈ (Atoms‘𝐾) ∧ 𝑠 ∈ (Atoms‘𝐾)) → ((𝑞 ≠ 𝑟 ∧ ¬ 𝑠 ≤ (𝑞(join‘𝐾)𝑟) ∧ 𝑌 = ((𝑞(join‘𝐾)𝑟)(join‘𝐾)𝑠)) → ¬ 𝑋 ≤ 𝑌)))
22	21	rexlimdvv 3217	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑃) ∧ 𝑞 ∈ (Atoms‘𝐾)) → (∃𝑟 ∈ (Atoms‘𝐾)∃𝑠 ∈ (Atoms‘𝐾)(𝑞 ≠ 𝑟 ∧ ¬ 𝑠 ≤ (𝑞(join‘𝐾)𝑟) ∧ 𝑌 = ((𝑞(join‘𝐾)𝑟)(join‘𝐾)𝑠)) → ¬ 𝑋 ≤ 𝑌))
23	22	rexlimdva 3162	. . 3 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑃) → (∃𝑞 ∈ (Atoms‘𝐾)∃𝑟 ∈ (Atoms‘𝐾)∃𝑠 ∈ (Atoms‘𝐾)(𝑞 ≠ 𝑟 ∧ ¬ 𝑠 ≤ (𝑞(join‘𝐾)𝑟) ∧ 𝑌 = ((𝑞(join‘𝐾)𝑟)(join‘𝐾)𝑠)) → ¬ 𝑋 ≤ 𝑌))
24	23	adantld 494	. 2 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑃) → ((𝑌 ∈ (Base‘𝐾) ∧ ∃𝑞 ∈ (Atoms‘𝐾)∃𝑟 ∈ (Atoms‘𝐾)∃𝑠 ∈ (Atoms‘𝐾)(𝑞 ≠ 𝑟 ∧ ¬ 𝑠 ≤ (𝑞(join‘𝐾)𝑟) ∧ 𝑌 = ((𝑞(join‘𝐾)𝑟)(join‘𝐾)𝑠))) → ¬ 𝑋 ≤ 𝑌))
25	9, 24	mpd 15	1 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑃) → ¬ 𝑋 ≤ 𝑌)

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 208   ∧ wa 399   ∧ w3a 1097   = wceq 1559   ∈ wcel 2141   ≠ wne 2956  ∃wrex 3085   class class class wbr 5097  ‘cfv 6516  (class class class)co 7391  Basecbs 17236  lecple 17284  joincjn 18334  Atomscatm 39848  HLchlt 39935  LPlanesclpl 40077  LVolsclvol 40078

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1814  ax-4 1828  ax-5 1929  ax-6 1986  ax-7 2027  ax-8 2143  ax-9 2151  ax-10 2174  ax-11 2190  ax-12 2211  ax-ext 2733  ax-rep 5224  ax-sep 5243  ax-nul 5253  ax-pow 5319  ax-pr 5387  ax-un 7713

This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3an 1099  df-tru 1562  df-fal 1572  df-ex 1799  df-nf 1803  df-sb 2090  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-ral 3076  df-rex 3086  df-rmo 3366  df-reu 3367  df-rab 3414  df-v 3455  df-sbc 3743  df-csb 3851  df-dif 3905  df-un 3907  df-in 3909  df-ss 3919  df-nul 4284  df-if 4478  df-pw 4554  df-sn 4580  df-pr 4582  df-op 4586  df-uni 4863  df-iun 4948  df-br 5098  df-opab 5160  df-mpt 5179  df-id 5538  df-xp 5649  df-rel 5650  df-cnv 5651  df-co 5652  df-dm 5653  df-rn 5654  df-res 5655  df-ima 5656  df-iota 6472  df-fun 6518  df-fn 6519  df-f 6520  df-f1 6521  df-fo 6522  df-f1o 6523  df-fv 6524  df-riota 7348  df-ov 7394  df-oprab 7395  df-proset 18317  df-poset 18336  df-plt 18351  df-lub 18367  df-glb 18368  df-join 18369  df-meet 18370  df-p0 18446  df-lat 18455  df-clat 18522  df-oposet 39761  df-ol 39763  df-oml 39764  df-covers 39851  df-ats 39852  df-atl 39883  df-cvlat 39907  df-hlat 39936  df-llines 40083  df-lplanes 40084  df-lvols 40085

This theorem is referenced by:  lvolnelpln  40175