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

Theorem paddcom 37108
Description: Projective subspace sum commutes. (Contributed by NM, 3-Jan-2012.)
Hypotheses
Ref Expression
padd0.a 𝐴 = (Atoms‘𝐾)
padd0.p + = (+𝑃𝐾)
Assertion
Ref Expression
paddcom ((𝐾 ∈ Lat ∧ 𝑋𝐴𝑌𝐴) → (𝑋 + 𝑌) = (𝑌 + 𝑋))

Proof of Theorem paddcom
Dummy variables 𝑞 𝑝 𝑟 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 uncom 4083 . . . 4 (𝑋𝑌) = (𝑌𝑋)
21a1i 11 . . 3 ((𝐾 ∈ Lat ∧ 𝑋𝐴𝑌𝐴) → (𝑋𝑌) = (𝑌𝑋))
3 simpl1 1188 . . . . . . . 8 (((𝐾 ∈ Lat ∧ 𝑋𝐴𝑌𝐴) ∧ (𝑞𝑋𝑟𝑌)) → 𝐾 ∈ Lat)
4 simpl2 1189 . . . . . . . . . 10 (((𝐾 ∈ Lat ∧ 𝑋𝐴𝑌𝐴) ∧ (𝑞𝑋𝑟𝑌)) → 𝑋𝐴)
5 simprl 770 . . . . . . . . . 10 (((𝐾 ∈ Lat ∧ 𝑋𝐴𝑌𝐴) ∧ (𝑞𝑋𝑟𝑌)) → 𝑞𝑋)
64, 5sseldd 3919 . . . . . . . . 9 (((𝐾 ∈ Lat ∧ 𝑋𝐴𝑌𝐴) ∧ (𝑞𝑋𝑟𝑌)) → 𝑞𝐴)
7 eqid 2801 . . . . . . . . . 10 (Base‘𝐾) = (Base‘𝐾)
8 padd0.a . . . . . . . . . 10 𝐴 = (Atoms‘𝐾)
97, 8atbase 36584 . . . . . . . . 9 (𝑞𝐴𝑞 ∈ (Base‘𝐾))
106, 9syl 17 . . . . . . . 8 (((𝐾 ∈ Lat ∧ 𝑋𝐴𝑌𝐴) ∧ (𝑞𝑋𝑟𝑌)) → 𝑞 ∈ (Base‘𝐾))
11 simpl3 1190 . . . . . . . . . 10 (((𝐾 ∈ Lat ∧ 𝑋𝐴𝑌𝐴) ∧ (𝑞𝑋𝑟𝑌)) → 𝑌𝐴)
12 simprr 772 . . . . . . . . . 10 (((𝐾 ∈ Lat ∧ 𝑋𝐴𝑌𝐴) ∧ (𝑞𝑋𝑟𝑌)) → 𝑟𝑌)
1311, 12sseldd 3919 . . . . . . . . 9 (((𝐾 ∈ Lat ∧ 𝑋𝐴𝑌𝐴) ∧ (𝑞𝑋𝑟𝑌)) → 𝑟𝐴)
147, 8atbase 36584 . . . . . . . . 9 (𝑟𝐴𝑟 ∈ (Base‘𝐾))
1513, 14syl 17 . . . . . . . 8 (((𝐾 ∈ Lat ∧ 𝑋𝐴𝑌𝐴) ∧ (𝑞𝑋𝑟𝑌)) → 𝑟 ∈ (Base‘𝐾))
16 eqid 2801 . . . . . . . . 9 (join‘𝐾) = (join‘𝐾)
177, 16latjcom 17665 . . . . . . . 8 ((𝐾 ∈ Lat ∧ 𝑞 ∈ (Base‘𝐾) ∧ 𝑟 ∈ (Base‘𝐾)) → (𝑞(join‘𝐾)𝑟) = (𝑟(join‘𝐾)𝑞))
183, 10, 15, 17syl3anc 1368 . . . . . . 7 (((𝐾 ∈ Lat ∧ 𝑋𝐴𝑌𝐴) ∧ (𝑞𝑋𝑟𝑌)) → (𝑞(join‘𝐾)𝑟) = (𝑟(join‘𝐾)𝑞))
1918breq2d 5045 . . . . . 6 (((𝐾 ∈ Lat ∧ 𝑋𝐴𝑌𝐴) ∧ (𝑞𝑋𝑟𝑌)) → (𝑝(le‘𝐾)(𝑞(join‘𝐾)𝑟) ↔ 𝑝(le‘𝐾)(𝑟(join‘𝐾)𝑞)))
20192rexbidva 3261 . . . . 5 ((𝐾 ∈ Lat ∧ 𝑋𝐴𝑌𝐴) → (∃𝑞𝑋𝑟𝑌 𝑝(le‘𝐾)(𝑞(join‘𝐾)𝑟) ↔ ∃𝑞𝑋𝑟𝑌 𝑝(le‘𝐾)(𝑟(join‘𝐾)𝑞)))
21 rexcom 3311 . . . . 5 (∃𝑞𝑋𝑟𝑌 𝑝(le‘𝐾)(𝑟(join‘𝐾)𝑞) ↔ ∃𝑟𝑌𝑞𝑋 𝑝(le‘𝐾)(𝑟(join‘𝐾)𝑞))
2220, 21syl6bb 290 . . . 4 ((𝐾 ∈ Lat ∧ 𝑋𝐴𝑌𝐴) → (∃𝑞𝑋𝑟𝑌 𝑝(le‘𝐾)(𝑞(join‘𝐾)𝑟) ↔ ∃𝑟𝑌𝑞𝑋 𝑝(le‘𝐾)(𝑟(join‘𝐾)𝑞)))
2322rabbidv 3430 . . 3 ((𝐾 ∈ Lat ∧ 𝑋𝐴𝑌𝐴) → {𝑝𝐴 ∣ ∃𝑞𝑋𝑟𝑌 𝑝(le‘𝐾)(𝑞(join‘𝐾)𝑟)} = {𝑝𝐴 ∣ ∃𝑟𝑌𝑞𝑋 𝑝(le‘𝐾)(𝑟(join‘𝐾)𝑞)})
242, 23uneq12d 4094 . 2 ((𝐾 ∈ Lat ∧ 𝑋𝐴𝑌𝐴) → ((𝑋𝑌) ∪ {𝑝𝐴 ∣ ∃𝑞𝑋𝑟𝑌 𝑝(le‘𝐾)(𝑞(join‘𝐾)𝑟)}) = ((𝑌𝑋) ∪ {𝑝𝐴 ∣ ∃𝑟𝑌𝑞𝑋 𝑝(le‘𝐾)(𝑟(join‘𝐾)𝑞)}))
25 eqid 2801 . . 3 (le‘𝐾) = (le‘𝐾)
26 padd0.p . . 3 + = (+𝑃𝐾)
2725, 16, 8, 26paddval 37093 . 2 ((𝐾 ∈ Lat ∧ 𝑋𝐴𝑌𝐴) → (𝑋 + 𝑌) = ((𝑋𝑌) ∪ {𝑝𝐴 ∣ ∃𝑞𝑋𝑟𝑌 𝑝(le‘𝐾)(𝑞(join‘𝐾)𝑟)}))
2825, 16, 8, 26paddval 37093 . . 3 ((𝐾 ∈ Lat ∧ 𝑌𝐴𝑋𝐴) → (𝑌 + 𝑋) = ((𝑌𝑋) ∪ {𝑝𝐴 ∣ ∃𝑟𝑌𝑞𝑋 𝑝(le‘𝐾)(𝑟(join‘𝐾)𝑞)}))
29283com23 1123 . 2 ((𝐾 ∈ Lat ∧ 𝑋𝐴𝑌𝐴) → (𝑌 + 𝑋) = ((𝑌𝑋) ∪ {𝑝𝐴 ∣ ∃𝑟𝑌𝑞𝑋 𝑝(le‘𝐾)(𝑟(join‘𝐾)𝑞)}))
3024, 27, 293eqtr4d 2846 1 ((𝐾 ∈ Lat ∧ 𝑋𝐴𝑌𝐴) → (𝑋 + 𝑌) = (𝑌 + 𝑋))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 399  w3a 1084   = wceq 1538  wcel 2112  wrex 3110  {crab 3113  cun 3882  wss 3884   class class class wbr 5033  cfv 6328  (class class class)co 7139  Basecbs 16479  lecple 16568  joincjn 17550  Latclat 17651  Atomscatm 36558  +𝑃cpadd 37090
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2114  ax-9 2122  ax-10 2143  ax-11 2159  ax-12 2176  ax-ext 2773  ax-rep 5157  ax-sep 5170  ax-nul 5177  ax-pow 5234  ax-pr 5298  ax-un 7445
This theorem depends on definitions:  df-bi 210  df-an 400  df-or 845  df-3an 1086  df-tru 1541  df-ex 1782  df-nf 1786  df-sb 2070  df-mo 2601  df-eu 2632  df-clab 2780  df-cleq 2794  df-clel 2873  df-nfc 2941  df-ne 2991  df-ral 3114  df-rex 3115  df-reu 3116  df-rab 3118  df-v 3446  df-sbc 3724  df-csb 3832  df-dif 3887  df-un 3889  df-in 3891  df-ss 3901  df-nul 4247  df-if 4429  df-pw 4502  df-sn 4529  df-pr 4531  df-op 4535  df-uni 4804  df-iun 4886  df-br 5034  df-opab 5096  df-mpt 5114  df-id 5428  df-xp 5529  df-rel 5530  df-cnv 5531  df-co 5532  df-dm 5533  df-rn 5534  df-res 5535  df-ima 5536  df-iota 6287  df-fun 6330  df-fn 6331  df-f 6332  df-f1 6333  df-fo 6334  df-f1o 6335  df-fv 6336  df-riota 7097  df-ov 7142  df-oprab 7143  df-mpo 7144  df-1st 7675  df-2nd 7676  df-lub 17580  df-join 17582  df-lat 17652  df-ats 36562  df-padd 37091
This theorem is referenced by:  paddass  37133  padd12N  37134  pmod2iN  37144  pmodN  37145  pmapjat2  37149
  Copyright terms: Public domain W3C validator