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

Theorem cdlemg28a 36475
Description: Part of proof of Lemma G of [Crawley] p. 116. First equality of the equation of line 14 on p. 117. (Contributed by NM, 29-May-2013.)
Hypotheses
Ref Expression
cdlemg12.l = (le‘𝐾)
cdlemg12.j = (join‘𝐾)
cdlemg12.m = (meet‘𝐾)
cdlemg12.a 𝐴 = (Atoms‘𝐾)
cdlemg12.h 𝐻 = (LHyp‘𝐾)
cdlemg12.t 𝑇 = ((LTrn‘𝐾)‘𝑊)
cdlemg12b.r 𝑅 = ((trL‘𝐾)‘𝑊)
Assertion
Ref Expression
cdlemg28a ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑣𝐴𝑣 𝑊)) ∧ ((𝑧𝐴 ∧ ¬ 𝑧 𝑊) ∧ 𝐹𝑇𝐺𝑇) ∧ ((𝑣 ≠ (𝑅𝐹) ∧ 𝑣 ≠ (𝑅𝐺)) ∧ 𝑧 (𝑃 𝑣) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝐺𝑃) ≠ 𝑃))) → ((𝑃 (𝐹‘(𝐺𝑃))) 𝑊) = ((𝑧 (𝐹‘(𝐺𝑧))) 𝑊))

Proof of Theorem cdlemg28a
StepHypRef Expression
1 simp11 1253 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑣𝐴𝑣 𝑊)) ∧ ((𝑧𝐴 ∧ ¬ 𝑧 𝑊) ∧ 𝐹𝑇𝐺𝑇) ∧ ((𝑣 ≠ (𝑅𝐹) ∧ 𝑣 ≠ (𝑅𝐺)) ∧ 𝑧 (𝑃 𝑣) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝐺𝑃) ≠ 𝑃))) → (𝐾 ∈ HL ∧ 𝑊𝐻))
2 simp12 1254 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑣𝐴𝑣 𝑊)) ∧ ((𝑧𝐴 ∧ ¬ 𝑧 𝑊) ∧ 𝐹𝑇𝐺𝑇) ∧ ((𝑣 ≠ (𝑅𝐹) ∧ 𝑣 ≠ (𝑅𝐺)) ∧ 𝑧 (𝑃 𝑣) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝐺𝑃) ≠ 𝑃))) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
3 simp21 1256 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑣𝐴𝑣 𝑊)) ∧ ((𝑧𝐴 ∧ ¬ 𝑧 𝑊) ∧ 𝐹𝑇𝐺𝑇) ∧ ((𝑣 ≠ (𝑅𝐹) ∧ 𝑣 ≠ (𝑅𝐺)) ∧ 𝑧 (𝑃 𝑣) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝐺𝑃) ≠ 𝑃))) → (𝑧𝐴 ∧ ¬ 𝑧 𝑊))
4 simp22 1257 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑣𝐴𝑣 𝑊)) ∧ ((𝑧𝐴 ∧ ¬ 𝑧 𝑊) ∧ 𝐹𝑇𝐺𝑇) ∧ ((𝑣 ≠ (𝑅𝐹) ∧ 𝑣 ≠ (𝑅𝐺)) ∧ 𝑧 (𝑃 𝑣) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝐺𝑃) ≠ 𝑃))) → 𝐹𝑇)
5 simp23 1258 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑣𝐴𝑣 𝑊)) ∧ ((𝑧𝐴 ∧ ¬ 𝑧 𝑊) ∧ 𝐹𝑇𝐺𝑇) ∧ ((𝑣 ≠ (𝑅𝐹) ∧ 𝑣 ≠ (𝑅𝐺)) ∧ 𝑧 (𝑃 𝑣) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝐺𝑃) ≠ 𝑃))) → 𝐺𝑇)
6 simp1 1159 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑣𝐴𝑣 𝑊)) ∧ ((𝑧𝐴 ∧ ¬ 𝑧 𝑊) ∧ 𝐹𝑇𝐺𝑇) ∧ ((𝑣 ≠ (𝑅𝐹) ∧ 𝑣 ≠ (𝑅𝐺)) ∧ 𝑧 (𝑃 𝑣) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝐺𝑃) ≠ 𝑃))) → ((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑣𝐴𝑣 𝑊)))
7 simp21l 1382 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑣𝐴𝑣 𝑊)) ∧ ((𝑧𝐴 ∧ ¬ 𝑧 𝑊) ∧ 𝐹𝑇𝐺𝑇) ∧ ((𝑣 ≠ (𝑅𝐹) ∧ 𝑣 ≠ (𝑅𝐺)) ∧ 𝑧 (𝑃 𝑣) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝐺𝑃) ≠ 𝑃))) → 𝑧𝐴)
8 simp31l 1388 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑣𝐴𝑣 𝑊)) ∧ ((𝑧𝐴 ∧ ¬ 𝑧 𝑊) ∧ 𝐹𝑇𝐺𝑇) ∧ ((𝑣 ≠ (𝑅𝐹) ∧ 𝑣 ≠ (𝑅𝐺)) ∧ 𝑧 (𝑃 𝑣) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝐺𝑃) ≠ 𝑃))) → 𝑣 ≠ (𝑅𝐹))
9 simp32 1260 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑣𝐴𝑣 𝑊)) ∧ ((𝑧𝐴 ∧ ¬ 𝑧 𝑊) ∧ 𝐹𝑇𝐺𝑇) ∧ ((𝑣 ≠ (𝑅𝐹) ∧ 𝑣 ≠ (𝑅𝐺)) ∧ 𝑧 (𝑃 𝑣) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝐺𝑃) ≠ 𝑃))) → 𝑧 (𝑃 𝑣))
10 simp33l 1392 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑣𝐴𝑣 𝑊)) ∧ ((𝑧𝐴 ∧ ¬ 𝑧 𝑊) ∧ 𝐹𝑇𝐺𝑇) ∧ ((𝑣 ≠ (𝑅𝐹) ∧ 𝑣 ≠ (𝑅𝐺)) ∧ 𝑧 (𝑃 𝑣) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝐺𝑃) ≠ 𝑃))) → (𝐹𝑃) ≠ 𝑃)
11 cdlemg12.l . . . 4 = (le‘𝐾)
12 cdlemg12.j . . . 4 = (join‘𝐾)
13 cdlemg12.m . . . 4 = (meet‘𝐾)
14 cdlemg12.a . . . 4 𝐴 = (Atoms‘𝐾)
15 cdlemg12.h . . . 4 𝐻 = (LHyp‘𝐾)
16 cdlemg12.t . . . 4 𝑇 = ((LTrn‘𝐾)‘𝑊)
17 cdlemg12b.r . . . 4 𝑅 = ((trL‘𝐾)‘𝑊)
1811, 12, 13, 14, 15, 16, 17cdlemg27a 36474 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑣𝐴𝑣 𝑊)) ∧ (𝑧𝐴𝐹𝑇) ∧ (𝑣 ≠ (𝑅𝐹) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐹𝑃) ≠ 𝑃)) → ¬ (𝑅𝐹) (𝑃 𝑧))
196, 7, 4, 8, 9, 10, 18syl123anc 1499 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑣𝐴𝑣 𝑊)) ∧ ((𝑧𝐴 ∧ ¬ 𝑧 𝑊) ∧ 𝐹𝑇𝐺𝑇) ∧ ((𝑣 ≠ (𝑅𝐹) ∧ 𝑣 ≠ (𝑅𝐺)) ∧ 𝑧 (𝑃 𝑣) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝐺𝑃) ≠ 𝑃))) → ¬ (𝑅𝐹) (𝑃 𝑧))
20 simp31r 1389 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑣𝐴𝑣 𝑊)) ∧ ((𝑧𝐴 ∧ ¬ 𝑧 𝑊) ∧ 𝐹𝑇𝐺𝑇) ∧ ((𝑣 ≠ (𝑅𝐹) ∧ 𝑣 ≠ (𝑅𝐺)) ∧ 𝑧 (𝑃 𝑣) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝐺𝑃) ≠ 𝑃))) → 𝑣 ≠ (𝑅𝐺))
21 simp33r 1393 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑣𝐴𝑣 𝑊)) ∧ ((𝑧𝐴 ∧ ¬ 𝑧 𝑊) ∧ 𝐹𝑇𝐺𝑇) ∧ ((𝑣 ≠ (𝑅𝐹) ∧ 𝑣 ≠ (𝑅𝐺)) ∧ 𝑧 (𝑃 𝑣) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝐺𝑃) ≠ 𝑃))) → (𝐺𝑃) ≠ 𝑃)
2211, 12, 13, 14, 15, 16, 17cdlemg27a 36474 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑣𝐴𝑣 𝑊)) ∧ (𝑧𝐴𝐺𝑇) ∧ (𝑣 ≠ (𝑅𝐺) ∧ 𝑧 (𝑃 𝑣) ∧ (𝐺𝑃) ≠ 𝑃)) → ¬ (𝑅𝐺) (𝑃 𝑧))
236, 7, 5, 20, 9, 21, 22syl123anc 1499 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑣𝐴𝑣 𝑊)) ∧ ((𝑧𝐴 ∧ ¬ 𝑧 𝑊) ∧ 𝐹𝑇𝐺𝑇) ∧ ((𝑣 ≠ (𝑅𝐹) ∧ 𝑣 ≠ (𝑅𝐺)) ∧ 𝑧 (𝑃 𝑣) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝐺𝑃) ≠ 𝑃))) → ¬ (𝑅𝐺) (𝑃 𝑧))
2411, 12, 13, 14, 15, 16, 17cdlemg25zz 36472 . 2 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑧𝐴 ∧ ¬ 𝑧 𝑊) ∧ 𝐹𝑇) ∧ (𝐺𝑇 ∧ ¬ (𝑅𝐹) (𝑃 𝑧) ∧ ¬ (𝑅𝐺) (𝑃 𝑧))) → ((𝑃 (𝐹‘(𝐺𝑃))) 𝑊) = ((𝑧 (𝐹‘(𝐺𝑧))) 𝑊))
251, 2, 3, 4, 5, 19, 23, 24syl133anc 1505 1 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑣𝐴𝑣 𝑊)) ∧ ((𝑧𝐴 ∧ ¬ 𝑧 𝑊) ∧ 𝐹𝑇𝐺𝑇) ∧ ((𝑣 ≠ (𝑅𝐹) ∧ 𝑣 ≠ (𝑅𝐺)) ∧ 𝑧 (𝑃 𝑣) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝐺𝑃) ≠ 𝑃))) → ((𝑃 (𝐹‘(𝐺𝑃))) 𝑊) = ((𝑧 (𝐹‘(𝐺𝑧))) 𝑊))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 384  w3a 1100   = wceq 1637  wcel 2157  wne 2985   class class class wbr 4851  cfv 6104  (class class class)co 6877  lecple 16163  joincjn 17152  meetcmee 17153  Atomscatm 35045  HLchlt 35132  LHypclh 35766  LTrncltrn 35883  trLctrl 35940
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1877  ax-4 1894  ax-5 2001  ax-6 2069  ax-7 2105  ax-8 2159  ax-9 2166  ax-10 2186  ax-11 2202  ax-12 2215  ax-13 2422  ax-ext 2791  ax-rep 4971  ax-sep 4982  ax-nul 4990  ax-pow 5042  ax-pr 5103  ax-un 7182  ax-riotaBAD 34734
This theorem depends on definitions:  df-bi 198  df-an 385  df-or 866  df-3or 1101  df-3an 1102  df-tru 1641  df-ex 1860  df-nf 1864  df-sb 2062  df-mo 2635  df-eu 2638  df-clab 2800  df-cleq 2806  df-clel 2809  df-nfc 2944  df-ne 2986  df-nel 3089  df-ral 3108  df-rex 3109  df-reu 3110  df-rmo 3111  df-rab 3112  df-v 3400  df-sbc 3641  df-csb 3736  df-dif 3779  df-un 3781  df-in 3783  df-ss 3790  df-nul 4124  df-if 4287  df-pw 4360  df-sn 4378  df-pr 4380  df-op 4384  df-uni 4638  df-iun 4721  df-iin 4722  df-br 4852  df-opab 4914  df-mpt 4931  df-id 5226  df-xp 5324  df-rel 5325  df-cnv 5326  df-co 5327  df-dm 5328  df-rn 5329  df-res 5330  df-ima 5331  df-iota 6067  df-fun 6106  df-fn 6107  df-f 6108  df-f1 6109  df-fo 6110  df-f1o 6111  df-fv 6112  df-riota 6838  df-ov 6880  df-oprab 6881  df-mpt2 6882  df-1st 7401  df-2nd 7402  df-undef 7637  df-map 8097  df-proset 17136  df-poset 17154  df-plt 17166  df-lub 17182  df-glb 17183  df-join 17184  df-meet 17185  df-p0 17247  df-p1 17248  df-lat 17254  df-clat 17316  df-oposet 34958  df-ol 34960  df-oml 34961  df-covers 35048  df-ats 35049  df-atl 35080  df-cvlat 35104  df-hlat 35133  df-llines 35280  df-lplanes 35281  df-lvols 35282  df-lines 35283  df-psubsp 35285  df-pmap 35286  df-padd 35578  df-lhyp 35770  df-laut 35771  df-ldil 35886  df-ltrn 35887  df-trl 35941
This theorem is referenced by:  cdlemg28  36486
  Copyright terms: Public domain W3C validator