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

Theorem cdlemg8 39025
Description: TODO: FIX COMMENT. (Contributed by NM, 29-Apr-2013.)
Hypotheses
Ref Expression
cdlemg8.l = (le‘𝐾)
cdlemg8.j = (join‘𝐾)
cdlemg8.m = (meet‘𝐾)
cdlemg8.a 𝐴 = (Atoms‘𝐾)
cdlemg8.h 𝐻 = (LHyp‘𝐾)
cdlemg8.t 𝑇 = ((LTrn‘𝐾)‘𝑊)
Assertion
Ref Expression
cdlemg8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ 𝐹𝑇) ∧ (𝐺𝑇 ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) = (𝑃 𝑄))) → ((𝑃 (𝐹‘(𝐺𝑃))) 𝑊) = ((𝑄 (𝐹‘(𝐺𝑄))) 𝑊))

Proof of Theorem cdlemg8
StepHypRef Expression
1 simpl1 1192 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ 𝐹𝑇) ∧ (𝐺𝑇 ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) = (𝑃 𝑄))) ∧ (𝐹‘(𝐺𝑃)) = 𝑃) → (𝐾 ∈ HL ∧ 𝑊𝐻))
2 simpl21 1252 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ 𝐹𝑇) ∧ (𝐺𝑇 ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) = (𝑃 𝑄))) ∧ (𝐹‘(𝐺𝑃)) = 𝑃) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
3 simpl22 1253 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ 𝐹𝑇) ∧ (𝐺𝑇 ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) = (𝑃 𝑄))) ∧ (𝐹‘(𝐺𝑃)) = 𝑃) → (𝑄𝐴 ∧ ¬ 𝑄 𝑊))
4 simpl23 1254 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ 𝐹𝑇) ∧ (𝐺𝑇 ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) = (𝑃 𝑄))) ∧ (𝐹‘(𝐺𝑃)) = 𝑃) → 𝐹𝑇)
5 simpl3l 1229 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ 𝐹𝑇) ∧ (𝐺𝑇 ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) = (𝑃 𝑄))) ∧ (𝐹‘(𝐺𝑃)) = 𝑃) → 𝐺𝑇)
6 simpr 486 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ 𝐹𝑇) ∧ (𝐺𝑇 ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) = (𝑃 𝑄))) ∧ (𝐹‘(𝐺𝑃)) = 𝑃) → (𝐹‘(𝐺𝑃)) = 𝑃)
7 cdlemg8.l . . . 4 = (le‘𝐾)
8 cdlemg8.j . . . 4 = (join‘𝐾)
9 cdlemg8.m . . . 4 = (meet‘𝐾)
10 cdlemg8.a . . . 4 𝐴 = (Atoms‘𝐾)
11 cdlemg8.h . . . 4 𝐻 = (LHyp‘𝐾)
12 cdlemg8.t . . . 4 𝑇 = ((LTrn‘𝐾)‘𝑊)
137, 8, 9, 10, 11, 12cdlemg8a 39021 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇 ∧ (𝐹‘(𝐺𝑃)) = 𝑃)) → ((𝑃 (𝐹‘(𝐺𝑃))) 𝑊) = ((𝑄 (𝐹‘(𝐺𝑄))) 𝑊))
141, 2, 3, 4, 5, 6, 13syl123anc 1388 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ 𝐹𝑇) ∧ (𝐺𝑇 ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) = (𝑃 𝑄))) ∧ (𝐹‘(𝐺𝑃)) = 𝑃) → ((𝑃 (𝐹‘(𝐺𝑃))) 𝑊) = ((𝑄 (𝐹‘(𝐺𝑄))) 𝑊))
15 simpl1 1192 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ 𝐹𝑇) ∧ (𝐺𝑇 ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) = (𝑃 𝑄))) ∧ (𝐹‘(𝐺𝑃)) ≠ 𝑃) → (𝐾 ∈ HL ∧ 𝑊𝐻))
16 simpl2 1193 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ 𝐹𝑇) ∧ (𝐺𝑇 ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) = (𝑃 𝑄))) ∧ (𝐹‘(𝐺𝑃)) ≠ 𝑃) → ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ 𝐹𝑇))
17 simpl3l 1229 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ 𝐹𝑇) ∧ (𝐺𝑇 ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) = (𝑃 𝑄))) ∧ (𝐹‘(𝐺𝑃)) ≠ 𝑃) → 𝐺𝑇)
18 simpl3r 1230 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ 𝐹𝑇) ∧ (𝐺𝑇 ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) = (𝑃 𝑄))) ∧ (𝐹‘(𝐺𝑃)) ≠ 𝑃) → ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) = (𝑃 𝑄))
19 simpr 486 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ 𝐹𝑇) ∧ (𝐺𝑇 ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) = (𝑃 𝑄))) ∧ (𝐹‘(𝐺𝑃)) ≠ 𝑃) → (𝐹‘(𝐺𝑃)) ≠ 𝑃)
207, 8, 9, 10, 11, 12cdlemg8d 39024 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ 𝐹𝑇) ∧ (𝐺𝑇 ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) = (𝑃 𝑄) ∧ (𝐹‘(𝐺𝑃)) ≠ 𝑃)) → ((𝑃 (𝐹‘(𝐺𝑃))) 𝑊) = ((𝑄 (𝐹‘(𝐺𝑄))) 𝑊))
2115, 16, 17, 18, 19, 20syl113anc 1383 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ 𝐹𝑇) ∧ (𝐺𝑇 ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) = (𝑃 𝑄))) ∧ (𝐹‘(𝐺𝑃)) ≠ 𝑃) → ((𝑃 (𝐹‘(𝐺𝑃))) 𝑊) = ((𝑄 (𝐹‘(𝐺𝑄))) 𝑊))
2214, 21pm2.61dane 3031 1 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ 𝐹𝑇) ∧ (𝐺𝑇 ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) = (𝑃 𝑄))) → ((𝑃 (𝐹‘(𝐺𝑃))) 𝑊) = ((𝑄 (𝐹‘(𝐺𝑄))) 𝑊))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 397  w3a 1088   = wceq 1542  wcel 2107  wne 2942   class class class wbr 5104  cfv 6492  (class class class)co 7350  lecple 17076  joincjn 18136  meetcmee 18137  Atomscatm 37656  HLchlt 37743  LHypclh 38378  LTrncltrn 38495
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2709  ax-rep 5241  ax-sep 5255  ax-nul 5262  ax-pow 5319  ax-pr 5383  ax-un 7663  ax-riotaBAD 37346
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2816  df-nfc 2888  df-ne 2943  df-ral 3064  df-rex 3073  df-rmo 3352  df-reu 3353  df-rab 3407  df-v 3446  df-sbc 3739  df-csb 3855  df-dif 3912  df-un 3914  df-in 3916  df-ss 3926  df-nul 4282  df-if 4486  df-pw 4561  df-sn 4586  df-pr 4588  df-op 4592  df-uni 4865  df-iun 4955  df-iin 4956  df-br 5105  df-opab 5167  df-mpt 5188  df-id 5529  df-xp 5637  df-rel 5638  df-cnv 5639  df-co 5640  df-dm 5641  df-rn 5642  df-res 5643  df-ima 5644  df-iota 6444  df-fun 6494  df-fn 6495  df-f 6496  df-f1 6497  df-fo 6498  df-f1o 6499  df-fv 6500  df-riota 7306  df-ov 7353  df-oprab 7354  df-mpo 7355  df-1st 7912  df-2nd 7913  df-undef 8172  df-map 8701  df-proset 18120  df-poset 18138  df-plt 18155  df-lub 18171  df-glb 18172  df-join 18173  df-meet 18174  df-p0 18250  df-p1 18251  df-lat 18257  df-clat 18324  df-oposet 37569  df-ol 37571  df-oml 37572  df-covers 37659  df-ats 37660  df-atl 37691  df-cvlat 37715  df-hlat 37744  df-llines 37892  df-lplanes 37893  df-lvols 37894  df-lines 37895  df-psubsp 37897  df-pmap 37898  df-padd 38190  df-lhyp 38382  df-laut 38383  df-ldil 38498  df-ltrn 38499  df-trl 38553
This theorem is referenced by:  cdlemg15  39050  cdlemg16z  39053  cdlemg37  39083
  Copyright terms: Public domain W3C validator