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

Theorem cdlemeg49le 35276
 Description: Part of proof of Lemma D in [Crawley] p. 113. (Contributed by NM, 9-Apr-2013.)
Hypotheses
Ref Expression
cdlemef47.b 𝐵 = (Base‘𝐾)
cdlemef47.l = (le‘𝐾)
cdlemef47.j = (join‘𝐾)
cdlemef47.m = (meet‘𝐾)
cdlemef47.a 𝐴 = (Atoms‘𝐾)
cdlemef47.h 𝐻 = (LHyp‘𝐾)
cdlemef47.v 𝑉 = ((𝑄 𝑃) 𝑊)
cdlemef47.n 𝑁 = ((𝑣 𝑉) (𝑃 ((𝑄 𝑣) 𝑊)))
cdlemefs47.o 𝑂 = ((𝑄 𝑃) (𝑁 ((𝑢 𝑣) 𝑊)))
cdlemef47.g 𝐺 = (𝑎𝐵 ↦ if((𝑄𝑃 ∧ ¬ 𝑎 𝑊), (𝑐𝐵𝑢𝐴 ((¬ 𝑢 𝑊 ∧ (𝑢 (𝑎 𝑊)) = 𝑎) → 𝑐 = (if(𝑢 (𝑄 𝑃), (𝑏𝐵𝑣𝐴 ((¬ 𝑣 𝑊 ∧ ¬ 𝑣 (𝑄 𝑃)) → 𝑏 = 𝑂)), 𝑢 / 𝑣𝑁) (𝑎 𝑊)))), 𝑎))
Assertion
Ref Expression
cdlemeg49le ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑋𝐵𝑌𝐵) ∧ 𝑋 𝑌) → (𝐺𝑋) (𝐺𝑌))
Distinct variable groups:   𝑎,𝑏,𝑐,𝑢,𝑣,𝐴   𝐵,𝑎,𝑏,𝑐,𝑢,𝑣   𝐻,𝑎,𝑏,𝑐,𝑢,𝑣   ,𝑎,𝑏,𝑐,𝑢,𝑣   𝐾,𝑎,𝑏,𝑐,𝑢,𝑣   ,𝑎,𝑏,𝑐,𝑢,𝑣   ,𝑎,𝑏,𝑐,𝑢,𝑣   𝑁,𝑎,𝑏,𝑐,𝑢   𝑂,𝑎,𝑏,𝑐   𝑃,𝑎,𝑏,𝑐,𝑢,𝑣   𝑄,𝑎,𝑏,𝑐,𝑢,𝑣   𝑉,𝑎,𝑏,𝑐,𝑢,𝑣   𝑊,𝑎,𝑏,𝑐,𝑢,𝑣   𝑋,𝑎,𝑐,𝑢,𝑣   𝑌,𝑎,𝑏,𝑐,𝑢,𝑣
Allowed substitution hints:   𝐺(𝑣,𝑢,𝑎,𝑏,𝑐)   𝑁(𝑣)   𝑂(𝑣,𝑢)   𝑋(𝑏)

Proof of Theorem cdlemeg49le
StepHypRef Expression
1 simp11 1089 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑋𝐵𝑌𝐵) ∧ 𝑋 𝑌) → (𝐾 ∈ HL ∧ 𝑊𝐻))
2 simp13 1091 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑋𝐵𝑌𝐵) ∧ 𝑋 𝑌) → (𝑄𝐴 ∧ ¬ 𝑄 𝑊))
3 simp12 1090 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑋𝐵𝑌𝐵) ∧ 𝑋 𝑌) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
4 simp2 1060 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑋𝐵𝑌𝐵) ∧ 𝑋 𝑌) → (𝑋𝐵𝑌𝐵))
5 simp3 1061 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑋𝐵𝑌𝐵) ∧ 𝑋 𝑌) → 𝑋 𝑌)
6 cdlemef47.b . . 3 𝐵 = (Base‘𝐾)
7 cdlemef47.l . . 3 = (le‘𝐾)
8 cdlemef47.j . . 3 = (join‘𝐾)
9 cdlemef47.m . . 3 = (meet‘𝐾)
10 cdlemef47.a . . 3 𝐴 = (Atoms‘𝐾)
11 cdlemef47.h . . 3 𝐻 = (LHyp‘𝐾)
12 cdlemef47.v . . 3 𝑉 = ((𝑄 𝑃) 𝑊)
13 vex 3189 . . . 4 𝑢 ∈ V
14 cdlemef47.n . . . . 5 𝑁 = ((𝑣 𝑉) (𝑃 ((𝑄 𝑣) 𝑊)))
15 eqid 2621 . . . . 5 ((𝑢 𝑉) (𝑃 ((𝑄 𝑢) 𝑊))) = ((𝑢 𝑉) (𝑃 ((𝑄 𝑢) 𝑊)))
1614, 15cdleme31sc 35149 . . . 4 (𝑢 ∈ V → 𝑢 / 𝑣𝑁 = ((𝑢 𝑉) (𝑃 ((𝑄 𝑢) 𝑊))))
1713, 16ax-mp 5 . . 3 𝑢 / 𝑣𝑁 = ((𝑢 𝑉) (𝑃 ((𝑄 𝑢) 𝑊)))
18 cdlemefs47.o . . 3 𝑂 = ((𝑄 𝑃) (𝑁 ((𝑢 𝑣) 𝑊)))
19 eqid 2621 . . 3 (𝑏𝐵𝑣𝐴 ((¬ 𝑣 𝑊 ∧ ¬ 𝑣 (𝑄 𝑃)) → 𝑏 = 𝑂)) = (𝑏𝐵𝑣𝐴 ((¬ 𝑣 𝑊 ∧ ¬ 𝑣 (𝑄 𝑃)) → 𝑏 = 𝑂))
20 eqid 2621 . . 3 if(𝑢 (𝑄 𝑃), (𝑏𝐵𝑣𝐴 ((¬ 𝑣 𝑊 ∧ ¬ 𝑣 (𝑄 𝑃)) → 𝑏 = 𝑂)), 𝑢 / 𝑣𝑁) = if(𝑢 (𝑄 𝑃), (𝑏𝐵𝑣𝐴 ((¬ 𝑣 𝑊 ∧ ¬ 𝑣 (𝑄 𝑃)) → 𝑏 = 𝑂)), 𝑢 / 𝑣𝑁)
21 eqid 2621 . . 3 (𝑐𝐵𝑢𝐴 ((¬ 𝑢 𝑊 ∧ (𝑢 (𝑎 𝑊)) = 𝑎) → 𝑐 = (if(𝑢 (𝑄 𝑃), (𝑏𝐵𝑣𝐴 ((¬ 𝑣 𝑊 ∧ ¬ 𝑣 (𝑄 𝑃)) → 𝑏 = 𝑂)), 𝑢 / 𝑣𝑁) (𝑎 𝑊)))) = (𝑐𝐵𝑢𝐴 ((¬ 𝑢 𝑊 ∧ (𝑢 (𝑎 𝑊)) = 𝑎) → 𝑐 = (if(𝑢 (𝑄 𝑃), (𝑏𝐵𝑣𝐴 ((¬ 𝑣 𝑊 ∧ ¬ 𝑣 (𝑄 𝑃)) → 𝑏 = 𝑂)), 𝑢 / 𝑣𝑁) (𝑎 𝑊))))
22 cdlemef47.g . . 3 𝐺 = (𝑎𝐵 ↦ if((𝑄𝑃 ∧ ¬ 𝑎 𝑊), (𝑐𝐵𝑢𝐴 ((¬ 𝑢 𝑊 ∧ (𝑢 (𝑎 𝑊)) = 𝑎) → 𝑐 = (if(𝑢 (𝑄 𝑃), (𝑏𝐵𝑣𝐴 ((¬ 𝑣 𝑊 ∧ ¬ 𝑣 (𝑄 𝑃)) → 𝑏 = 𝑂)), 𝑢 / 𝑣𝑁) (𝑎 𝑊)))), 𝑎))
236, 7, 8, 9, 10, 11, 12, 17, 14, 18, 19, 20, 21, 22cdleme32le 35212 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑋𝐵𝑌𝐵) ∧ 𝑋 𝑌) → (𝐺𝑋) (𝐺𝑌))
241, 2, 3, 4, 5, 23syl311anc 1337 1 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑋𝐵𝑌𝐵) ∧ 𝑋 𝑌) → (𝐺𝑋) (𝐺𝑌))
 Colors of variables: wff setvar class Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 384   ∧ w3a 1036   = wceq 1480   ∈ wcel 1987   ≠ wne 2790  ∀wral 2907  Vcvv 3186  ⦋csb 3514  ifcif 4058   class class class wbr 4613   ↦ cmpt 4673  ‘cfv 5847  ℩crio 6564  (class class class)co 6604  Basecbs 15781  lecple 15869  joincjn 16865  meetcmee 16866  Atomscatm 34027  HLchlt 34114  LHypclh 34747 This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1719  ax-4 1734  ax-5 1836  ax-6 1885  ax-7 1932  ax-8 1989  ax-9 1996  ax-10 2016  ax-11 2031  ax-12 2044  ax-13 2245  ax-ext 2601  ax-rep 4731  ax-sep 4741  ax-nul 4749  ax-pow 4803  ax-pr 4867  ax-un 6902  ax-riotaBAD 33716 This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1037  df-3an 1038  df-tru 1483  df-ex 1702  df-nf 1707  df-sb 1878  df-eu 2473  df-mo 2474  df-clab 2608  df-cleq 2614  df-clel 2617  df-nfc 2750  df-ne 2791  df-nel 2894  df-ral 2912  df-rex 2913  df-reu 2914  df-rmo 2915  df-rab 2916  df-v 3188  df-sbc 3418  df-csb 3515  df-dif 3558  df-un 3560  df-in 3562  df-ss 3569  df-nul 3892  df-if 4059  df-pw 4132  df-sn 4149  df-pr 4151  df-op 4155  df-uni 4403  df-iun 4487  df-iin 4488  df-br 4614  df-opab 4674  df-mpt 4675  df-id 4989  df-xp 5080  df-rel 5081  df-cnv 5082  df-co 5083  df-dm 5084  df-rn 5085  df-res 5086  df-ima 5087  df-iota 5810  df-fun 5849  df-fn 5850  df-f 5851  df-f1 5852  df-fo 5853  df-f1o 5854  df-fv 5855  df-riota 6565  df-ov 6607  df-oprab 6608  df-mpt2 6609  df-1st 7113  df-2nd 7114  df-undef 7344  df-preset 16849  df-poset 16867  df-plt 16879  df-lub 16895  df-glb 16896  df-join 16897  df-meet 16898  df-p0 16960  df-p1 16961  df-lat 16967  df-clat 17029  df-oposet 33940  df-ol 33942  df-oml 33943  df-covers 34030  df-ats 34031  df-atl 34062  df-cvlat 34086  df-hlat 34115  df-llines 34261  df-lplanes 34262  df-lvols 34263  df-lines 34264  df-psubsp 34266  df-pmap 34267  df-padd 34559  df-lhyp 34751 This theorem is referenced by:  cdlemeg49lebilem  35304
 Copyright terms: Public domain W3C validator