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

Theorem cdlemk19 35175
 Description: Part of proof of Lemma K of [Crawley] p. 118. Line 22 on p. 119. 𝑁, 𝑈, 𝑂, 𝐷 are k, sigma1 (p), k1, f1. (Contributed by NM, 2-Jul-2013.)
Hypotheses
Ref Expression
cdlemk1.b 𝐵 = (Base‘𝐾)
cdlemk1.l = (le‘𝐾)
cdlemk1.j = (join‘𝐾)
cdlemk1.m = (meet‘𝐾)
cdlemk1.a 𝐴 = (Atoms‘𝐾)
cdlemk1.h 𝐻 = (LHyp‘𝐾)
cdlemk1.t 𝑇 = ((LTrn‘𝐾)‘𝑊)
cdlemk1.r 𝑅 = ((trL‘𝐾)‘𝑊)
cdlemk1.s 𝑆 = (𝑓𝑇 ↦ (𝑖𝑇 (𝑖𝑃) = ((𝑃 (𝑅𝑓)) ((𝑁𝑃) (𝑅‘(𝑓𝐹))))))
cdlemk1.o 𝑂 = (𝑆𝐷)
cdlemk1.u 𝑈 = (𝑒𝑇 ↦ (𝑗𝑇 (𝑗𝑃) = ((𝑃 (𝑅𝑒)) ((𝑂𝑃) (𝑅‘(𝑒𝐷))))))
Assertion
Ref Expression
cdlemk19 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ (𝑅𝐷) ≠ (𝑅𝐹))) → (𝑈𝐹) = 𝑁)
Distinct variable groups:   𝑓,𝑖,   ,𝑖   ,𝑓,𝑖   𝐴,𝑖   𝐷,𝑓,𝑖   𝑓,𝐹,𝑖   𝑖,𝐻   𝑖,𝐾   𝑓,𝑁,𝑖   𝑃,𝑓,𝑖   𝑅,𝑓,𝑖   𝑇,𝑓,𝑖   𝑓,𝑊,𝑖   ,𝑒   ,𝑒   𝐷,𝑒,𝑗   𝑒,𝑂   𝑃,𝑒   𝑅,𝑒   𝑇,𝑒   𝑒,𝑊   ,𝑗   ,𝑗   ,𝑗   𝐴,𝑗   𝐷,𝑗   𝑗,𝐹   𝑗,𝐻   𝑗,𝐾   𝑗,𝑁   𝑗,𝑂   𝑃,𝑗   𝑅,𝑗   𝑇,𝑗   𝑗,𝑊   𝑒,𝐹
Allowed substitution hints:   𝐴(𝑒,𝑓)   𝐵(𝑒,𝑓,𝑖,𝑗)   𝑆(𝑒,𝑓,𝑖,𝑗)   𝑈(𝑒,𝑓,𝑖,𝑗)   𝐻(𝑒,𝑓)   𝐾(𝑒,𝑓)   (𝑒,𝑓)   𝑁(𝑒)   𝑂(𝑓,𝑖)

Proof of Theorem cdlemk19
StepHypRef Expression
1 simp11 1084 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ (𝑅𝐷) ≠ (𝑅𝐹))) → (𝐾 ∈ HL ∧ 𝑊𝐻))
2 simp21 1087 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ (𝑅𝐷) ≠ (𝑅𝐹))) → 𝑁𝑇)
3 simp23 1089 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ (𝑅𝐷) ≠ (𝑅𝐹))) → (𝑅𝐹) = (𝑅𝑁))
4 simp12 1085 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ (𝑅𝐷) ≠ (𝑅𝐹))) → 𝐹𝑇)
5 simp13 1086 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ (𝑅𝐷) ≠ (𝑅𝐹))) → 𝐷𝑇)
6 simp33 1092 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ (𝑅𝐷) ≠ (𝑅𝐹))) → (𝑅𝐷) ≠ (𝑅𝐹))
76, 6jca 553 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ (𝑅𝐷) ≠ (𝑅𝐹))) → ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐷) ≠ (𝑅𝐹)))
8 simp31 1090 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ (𝑅𝐷) ≠ (𝑅𝐹))) → 𝐹 ≠ ( I ↾ 𝐵))
9 simp32 1091 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ (𝑅𝐷) ≠ (𝑅𝐹))) → 𝐷 ≠ ( I ↾ 𝐵))
108, 8, 93jca 1235 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ (𝑅𝐷) ≠ (𝑅𝐹))) → (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵)))
11 simp22 1088 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ (𝑅𝐷) ≠ (𝑅𝐹))) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
12 cdlemk1.b . . . . 5 𝐵 = (Base‘𝐾)
13 cdlemk1.l . . . . 5 = (le‘𝐾)
14 cdlemk1.j . . . . 5 = (join‘𝐾)
15 cdlemk1.m . . . . 5 = (meet‘𝐾)
16 cdlemk1.a . . . . 5 𝐴 = (Atoms‘𝐾)
17 cdlemk1.h . . . . 5 𝐻 = (LHyp‘𝐾)
18 cdlemk1.t . . . . 5 𝑇 = ((LTrn‘𝐾)‘𝑊)
19 cdlemk1.r . . . . 5 𝑅 = ((trL‘𝐾)‘𝑊)
20 cdlemk1.s . . . . 5 𝑆 = (𝑓𝑇 ↦ (𝑖𝑇 (𝑖𝑃) = ((𝑃 (𝑅𝑓)) ((𝑁𝑃) (𝑅‘(𝑓𝐹))))))
21 cdlemk1.o . . . . 5 𝑂 = (𝑆𝐷)
22 cdlemk1.u . . . . 5 𝑈 = (𝑒𝑇 ↦ (𝑗𝑇 (𝑗𝑃) = ((𝑃 (𝑅𝑒)) ((𝑂𝑃) (𝑅‘(𝑒𝐷))))))
2312, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22cdlemkuel 35171 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁) ∧ 𝐹𝑇) ∧ (𝐹𝑇𝐷𝑇𝑁𝑇) ∧ (((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐷) ≠ (𝑅𝐹)) ∧ (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊))) → (𝑈𝐹) ∈ 𝑇)
241, 3, 4, 4, 5, 2, 7, 10, 11, 23syl333anc 1350 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ (𝑅𝐷) ≠ (𝑅𝐹))) → (𝑈𝐹) ∈ 𝑇)
2512, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22cdlemk18 35174 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ (𝑅𝐷) ≠ (𝑅𝐹))) → (𝑁𝑃) = ((𝑈𝐹)‘𝑃))
2613, 16, 17, 18cdlemd 34512 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑁𝑇 ∧ (𝑈𝐹) ∈ 𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑁𝑃) = ((𝑈𝐹)‘𝑃)) → 𝑁 = (𝑈𝐹))
271, 2, 24, 11, 25, 26syl311anc 1332 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ (𝑅𝐷) ≠ (𝑅𝐹))) → 𝑁 = (𝑈𝐹))
2827eqcomd 2616 1 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ (𝑅𝐷) ≠ (𝑅𝐹))) → (𝑈𝐹) = 𝑁)
 Colors of variables: wff setvar class Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 383   ∧ w3a 1031   = wceq 1475   ∈ wcel 1977   ≠ wne 2780   class class class wbr 4583   ↦ cmpt 4643   I cid 4948  ◡ccnv 5037   ↾ cres 5040   ∘ ccom 5042  ‘cfv 5804  ℩crio 6510  (class class class)co 6549  Basecbs 15695  lecple 15775  joincjn 16767  meetcmee 16768  Atomscatm 33568  HLchlt 33655  LHypclh 34288  LTrncltrn 34405  trLctrl 34463 This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1713  ax-4 1728  ax-5 1827  ax-6 1875  ax-7 1922  ax-8 1979  ax-9 1986  ax-10 2006  ax-11 2021  ax-12 2034  ax-13 2234  ax-ext 2590  ax-rep 4699  ax-sep 4709  ax-nul 4717  ax-pow 4769  ax-pr 4833  ax-un 6847  ax-riotaBAD 33257 This theorem depends on definitions:  df-bi 196  df-or 384  df-an 385  df-3or 1032  df-3an 1033  df-tru 1478  df-ex 1696  df-nf 1701  df-sb 1868  df-eu 2462  df-mo 2463  df-clab 2597  df-cleq 2603  df-clel 2606  df-nfc 2740  df-ne 2782  df-nel 2783  df-ral 2901  df-rex 2902  df-reu 2903  df-rmo 2904  df-rab 2905  df-v 3175  df-sbc 3403  df-csb 3500  df-dif 3543  df-un 3545  df-in 3547  df-ss 3554  df-nul 3875  df-if 4037  df-pw 4110  df-sn 4126  df-pr 4128  df-op 4132  df-uni 4373  df-iun 4457  df-iin 4458  df-br 4584  df-opab 4644  df-mpt 4645  df-id 4953  df-xp 5044  df-rel 5045  df-cnv 5046  df-co 5047  df-dm 5048  df-rn 5049  df-res 5050  df-ima 5051  df-iota 5768  df-fun 5806  df-fn 5807  df-f 5808  df-f1 5809  df-fo 5810  df-f1o 5811  df-fv 5812  df-riota 6511  df-ov 6552  df-oprab 6553  df-mpt2 6554  df-1st 7059  df-2nd 7060  df-undef 7286  df-map 7746  df-preset 16751  df-poset 16769  df-plt 16781  df-lub 16797  df-glb 16798  df-join 16799  df-meet 16800  df-p0 16862  df-p1 16863  df-lat 16869  df-clat 16931  df-oposet 33481  df-ol 33483  df-oml 33484  df-covers 33571  df-ats 33572  df-atl 33603  df-cvlat 33627  df-hlat 33656  df-llines 33802  df-lplanes 33803  df-lvols 33804  df-lines 33805  df-psubsp 33807  df-pmap 33808  df-padd 34100  df-lhyp 34292  df-laut 34293  df-ldil 34408  df-ltrn 34409  df-trl 34464 This theorem is referenced by:  cdlemk19-2N  35193  cdlemk19ylem  35236
 Copyright terms: Public domain W3C validator