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

Theorem dihordlem7 37012
Description: Part of proof of Lemma N of [Crawley] p. 122. Reverse ordering property. (Contributed by NM, 3-Mar-2014.)
Hypotheses
Ref Expression
dihordlem8.b 𝐵 = (Base‘𝐾)
dihordlem8.l = (le‘𝐾)
dihordlem8.a 𝐴 = (Atoms‘𝐾)
dihordlem8.h 𝐻 = (LHyp‘𝐾)
dihordlem8.p 𝑃 = ((oc‘𝐾)‘𝑊)
dihordlem8.o 𝑂 = (𝑇 ↦ ( I ↾ 𝐵))
dihordlem8.t 𝑇 = ((LTrn‘𝐾)‘𝑊)
dihordlem8.e 𝐸 = ((TEndo‘𝐾)‘𝑊)
dihordlem8.u 𝑈 = ((DVecH‘𝐾)‘𝑊)
dihordlem8.s + = (+g𝑈)
dihordlem8.g 𝐺 = (𝑇 (𝑃) = 𝑅)
Assertion
Ref Expression
dihordlem7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑠𝐸𝑔𝑇 ∧ ⟨𝑓, 𝑂⟩ = (⟨(𝑠𝐺), 𝑠+𝑔, 𝑂⟩))) → (𝑓 = ((𝑠𝐺) ∘ 𝑔) ∧ 𝑂 = 𝑠))
Distinct variable groups:   ,   𝐴,   𝐵,   ,𝐻   ,𝐾   𝑃,   𝑅,   𝑇,   ,𝑊
Allowed substitution hints:   𝐴(𝑓,𝑔,𝑠)   𝐵(𝑓,𝑔,𝑠)   𝑃(𝑓,𝑔,𝑠)   + (𝑓,𝑔,,𝑠)   𝑄(𝑓,𝑔,,𝑠)   𝑅(𝑓,𝑔,𝑠)   𝑇(𝑓,𝑔,𝑠)   𝑈(𝑓,𝑔,,𝑠)   𝐸(𝑓,𝑔,,𝑠)   𝐺(𝑓,𝑔,,𝑠)   𝐻(𝑓,𝑔,𝑠)   𝐾(𝑓,𝑔,𝑠)   (𝑓,𝑔,𝑠)   𝑂(𝑓,𝑔,,𝑠)   𝑊(𝑓,𝑔,𝑠)

Proof of Theorem dihordlem7
StepHypRef Expression
1 simp33 1261 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑠𝐸𝑔𝑇 ∧ ⟨𝑓, 𝑂⟩ = (⟨(𝑠𝐺), 𝑠+𝑔, 𝑂⟩))) → ⟨𝑓, 𝑂⟩ = (⟨(𝑠𝐺), 𝑠+𝑔, 𝑂⟩))
2 simp1 1159 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑠𝐸𝑔𝑇 ∧ ⟨𝑓, 𝑂⟩ = (⟨(𝑠𝐺), 𝑠+𝑔, 𝑂⟩))) → (𝐾 ∈ HL ∧ 𝑊𝐻))
3 simp2l 1249 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑠𝐸𝑔𝑇 ∧ ⟨𝑓, 𝑂⟩ = (⟨(𝑠𝐺), 𝑠+𝑔, 𝑂⟩))) → (𝑄𝐴 ∧ ¬ 𝑄 𝑊))
4 simp2r 1250 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑠𝐸𝑔𝑇 ∧ ⟨𝑓, 𝑂⟩ = (⟨(𝑠𝐺), 𝑠+𝑔, 𝑂⟩))) → (𝑅𝐴 ∧ ¬ 𝑅 𝑊))
5 simp31 1259 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑠𝐸𝑔𝑇 ∧ ⟨𝑓, 𝑂⟩ = (⟨(𝑠𝐺), 𝑠+𝑔, 𝑂⟩))) → 𝑠𝐸)
6 simp32 1260 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑠𝐸𝑔𝑇 ∧ ⟨𝑓, 𝑂⟩ = (⟨(𝑠𝐺), 𝑠+𝑔, 𝑂⟩))) → 𝑔𝑇)
7 dihordlem8.b . . . . 5 𝐵 = (Base‘𝐾)
8 dihordlem8.l . . . . 5 = (le‘𝐾)
9 dihordlem8.a . . . . 5 𝐴 = (Atoms‘𝐾)
10 dihordlem8.h . . . . 5 𝐻 = (LHyp‘𝐾)
11 dihordlem8.p . . . . 5 𝑃 = ((oc‘𝐾)‘𝑊)
12 dihordlem8.o . . . . 5 𝑂 = (𝑇 ↦ ( I ↾ 𝐵))
13 dihordlem8.t . . . . 5 𝑇 = ((LTrn‘𝐾)‘𝑊)
14 dihordlem8.e . . . . 5 𝐸 = ((TEndo‘𝐾)‘𝑊)
15 dihordlem8.u . . . . 5 𝑈 = ((DVecH‘𝐾)‘𝑊)
16 dihordlem8.s . . . . 5 + = (+g𝑈)
17 dihordlem8.g . . . . 5 𝐺 = (𝑇 (𝑃) = 𝑅)
187, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17dihordlem6 37011 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑠𝐸𝑔𝑇)) → (⟨(𝑠𝐺), 𝑠+𝑔, 𝑂⟩) = ⟨((𝑠𝐺) ∘ 𝑔), 𝑠⟩)
192, 3, 4, 5, 6, 18syl122anc 1491 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑠𝐸𝑔𝑇 ∧ ⟨𝑓, 𝑂⟩ = (⟨(𝑠𝐺), 𝑠+𝑔, 𝑂⟩))) → (⟨(𝑠𝐺), 𝑠+𝑔, 𝑂⟩) = ⟨((𝑠𝐺) ∘ 𝑔), 𝑠⟩)
201, 19eqtrd 2851 . 2 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑠𝐸𝑔𝑇 ∧ ⟨𝑓, 𝑂⟩ = (⟨(𝑠𝐺), 𝑠+𝑔, 𝑂⟩))) → ⟨𝑓, 𝑂⟩ = ⟨((𝑠𝐺) ∘ 𝑔), 𝑠⟩)
21 fvex 6430 . . . 4 (𝑠𝐺) ∈ V
22 vex 3405 . . . 4 𝑔 ∈ V
2321, 22coex 7357 . . 3 ((𝑠𝐺) ∘ 𝑔) ∈ V
24 vex 3405 . . 3 𝑠 ∈ V
2523, 24opth2 5151 . 2 (⟨𝑓, 𝑂⟩ = ⟨((𝑠𝐺) ∘ 𝑔), 𝑠⟩ ↔ (𝑓 = ((𝑠𝐺) ∘ 𝑔) ∧ 𝑂 = 𝑠))
2620, 25sylib 209 1 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑄𝐴 ∧ ¬ 𝑄 𝑊) ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊)) ∧ (𝑠𝐸𝑔𝑇 ∧ ⟨𝑓, 𝑂⟩ = (⟨(𝑠𝐺), 𝑠+𝑔, 𝑂⟩))) → (𝑓 = ((𝑠𝐺) ∘ 𝑔) ∧ 𝑂 = 𝑠))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 384  w3a 1100   = wceq 1637  wcel 2157  cop 4387   class class class wbr 4855  cmpt 4934   I cid 5231  cres 5326  ccom 5328  cfv 6110  crio 6843  (class class class)co 6883  Basecbs 16087  +gcplusg 16172  lecple 16179  occoc 16180  Atomscatm 35061  HLchlt 35148  LHypclh 35782  LTrncltrn 35899  TEndoctendo 36550  DVecHcdvh 36876
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 2795  ax-rep 4977  ax-sep 4988  ax-nul 4996  ax-pow 5048  ax-pr 5109  ax-un 7188  ax-cnex 10286  ax-resscn 10287  ax-1cn 10288  ax-icn 10289  ax-addcl 10290  ax-addrcl 10291  ax-mulcl 10292  ax-mulrcl 10293  ax-mulcom 10294  ax-addass 10295  ax-mulass 10296  ax-distr 10297  ax-i2m1 10298  ax-1ne0 10299  ax-1rid 10300  ax-rnegex 10301  ax-rrecex 10302  ax-cnre 10303  ax-pre-lttri 10304  ax-pre-lttrn 10305  ax-pre-ltadd 10306  ax-pre-mulgt0 10307  ax-riotaBAD 34750
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 2642  df-clab 2804  df-cleq 2810  df-clel 2813  df-nfc 2948  df-ne 2990  df-nel 3093  df-ral 3112  df-rex 3113  df-reu 3114  df-rmo 3115  df-rab 3116  df-v 3404  df-sbc 3645  df-csb 3740  df-dif 3783  df-un 3785  df-in 3787  df-ss 3794  df-pss 3796  df-nul 4128  df-if 4291  df-pw 4364  df-sn 4382  df-pr 4384  df-tp 4386  df-op 4388  df-uni 4642  df-int 4681  df-iun 4725  df-iin 4726  df-br 4856  df-opab 4918  df-mpt 4935  df-tr 4958  df-id 5232  df-eprel 5237  df-po 5245  df-so 5246  df-fr 5283  df-we 5285  df-xp 5330  df-rel 5331  df-cnv 5332  df-co 5333  df-dm 5334  df-rn 5335  df-res 5336  df-ima 5337  df-pred 5906  df-ord 5952  df-on 5953  df-lim 5954  df-suc 5955  df-iota 6073  df-fun 6112  df-fn 6113  df-f 6114  df-f1 6115  df-fo 6116  df-f1o 6117  df-fv 6118  df-riota 6844  df-ov 6886  df-oprab 6887  df-mpt2 6888  df-om 7305  df-1st 7407  df-2nd 7408  df-undef 7643  df-wrecs 7651  df-recs 7713  df-rdg 7751  df-1o 7805  df-oadd 7809  df-er 7988  df-map 8103  df-en 8202  df-dom 8203  df-sdom 8204  df-fin 8205  df-pnf 10370  df-mnf 10371  df-xr 10372  df-ltxr 10373  df-le 10374  df-sub 10562  df-neg 10563  df-nn 11315  df-2 11375  df-3 11376  df-4 11377  df-5 11378  df-6 11379  df-n0 11579  df-z 11663  df-uz 11924  df-fz 12569  df-struct 16089  df-ndx 16090  df-slot 16091  df-base 16093  df-plusg 16185  df-mulr 16186  df-sca 16188  df-vsca 16189  df-proset 17152  df-poset 17170  df-plt 17182  df-lub 17198  df-glb 17199  df-join 17200  df-meet 17201  df-p0 17263  df-p1 17264  df-lat 17270  df-clat 17332  df-oposet 34974  df-ol 34976  df-oml 34977  df-covers 35064  df-ats 35065  df-atl 35096  df-cvlat 35120  df-hlat 35149  df-llines 35296  df-lplanes 35297  df-lvols 35298  df-lines 35299  df-psubsp 35301  df-pmap 35302  df-padd 35594  df-lhyp 35786  df-laut 35787  df-ldil 35902  df-ltrn 35903  df-trl 35957  df-tendo 36553  df-edring 36555  df-dvech 36877
This theorem is referenced by:  dihordlem7b  37013
  Copyright terms: Public domain W3C validator