MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  lsspropd Structured version   Visualization version   GIF version

Theorem lsspropd 21039
Description: If two structures have the same components (properties), they have the same subspace structure. (Contributed by Mario Carneiro, 9-Feb-2015.) (Revised by Mario Carneiro, 14-Jun-2015.)
Hypotheses
Ref Expression
lsspropd.b1 (𝜑𝐵 = (Base‘𝐾))
lsspropd.b2 (𝜑𝐵 = (Base‘𝐿))
lsspropd.w (𝜑𝐵𝑊)
lsspropd.p ((𝜑 ∧ (𝑥𝑊𝑦𝑊)) → (𝑥(+g𝐾)𝑦) = (𝑥(+g𝐿)𝑦))
lsspropd.s1 ((𝜑 ∧ (𝑥𝑃𝑦𝐵)) → (𝑥( ·𝑠𝐾)𝑦) ∈ 𝑊)
lsspropd.s2 ((𝜑 ∧ (𝑥𝑃𝑦𝐵)) → (𝑥( ·𝑠𝐾)𝑦) = (𝑥( ·𝑠𝐿)𝑦))
lsspropd.p1 (𝜑𝑃 = (Base‘(Scalar‘𝐾)))
lsspropd.p2 (𝜑𝑃 = (Base‘(Scalar‘𝐿)))
Assertion
Ref Expression
lsspropd (𝜑 → (LSubSp‘𝐾) = (LSubSp‘𝐿))
Distinct variable groups:   𝑥,𝑦,𝐵   𝑥,𝐾,𝑦   𝜑,𝑥,𝑦   𝑥,𝑊,𝑦   𝑥,𝐿,𝑦   𝑥,𝑃,𝑦

Proof of Theorem lsspropd
Dummy variables 𝑎 𝑏 𝑧 𝑠 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 simpll 766 . . . . . . . . . . . . 13 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → 𝜑)
2 simprl 770 . . . . . . . . . . . . . 14 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → 𝑧𝑃)
3 simplr 768 . . . . . . . . . . . . . . 15 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → 𝑠𝐵)
4 simprrl 780 . . . . . . . . . . . . . . 15 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → 𝑎𝑠)
53, 4sseldd 4009 . . . . . . . . . . . . . 14 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → 𝑎𝐵)
6 lsspropd.s1 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑥𝑃𝑦𝐵)) → (𝑥( ·𝑠𝐾)𝑦) ∈ 𝑊)
76ralrimivva 3208 . . . . . . . . . . . . . . 15 (𝜑 → ∀𝑥𝑃𝑦𝐵 (𝑥( ·𝑠𝐾)𝑦) ∈ 𝑊)
87ad2antrr 725 . . . . . . . . . . . . . 14 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → ∀𝑥𝑃𝑦𝐵 (𝑥( ·𝑠𝐾)𝑦) ∈ 𝑊)
9 ovrspc2v 7474 . . . . . . . . . . . . . 14 (((𝑧𝑃𝑎𝐵) ∧ ∀𝑥𝑃𝑦𝐵 (𝑥( ·𝑠𝐾)𝑦) ∈ 𝑊) → (𝑧( ·𝑠𝐾)𝑎) ∈ 𝑊)
102, 5, 8, 9syl21anc 837 . . . . . . . . . . . . 13 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → (𝑧( ·𝑠𝐾)𝑎) ∈ 𝑊)
11 lsspropd.w . . . . . . . . . . . . . . 15 (𝜑𝐵𝑊)
1211ad2antrr 725 . . . . . . . . . . . . . 14 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → 𝐵𝑊)
13 simprrr 781 . . . . . . . . . . . . . . 15 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → 𝑏𝑠)
143, 13sseldd 4009 . . . . . . . . . . . . . 14 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → 𝑏𝐵)
1512, 14sseldd 4009 . . . . . . . . . . . . 13 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → 𝑏𝑊)
16 lsspropd.p . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑥𝑊𝑦𝑊)) → (𝑥(+g𝐾)𝑦) = (𝑥(+g𝐿)𝑦))
1716oveqrspc2v 7475 . . . . . . . . . . . . 13 ((𝜑 ∧ ((𝑧( ·𝑠𝐾)𝑎) ∈ 𝑊𝑏𝑊)) → ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) = ((𝑧( ·𝑠𝐾)𝑎)(+g𝐿)𝑏))
181, 10, 15, 17syl12anc 836 . . . . . . . . . . . 12 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) = ((𝑧( ·𝑠𝐾)𝑎)(+g𝐿)𝑏))
19 lsspropd.s2 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑥𝑃𝑦𝐵)) → (𝑥( ·𝑠𝐾)𝑦) = (𝑥( ·𝑠𝐿)𝑦))
2019oveqrspc2v 7475 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑧𝑃𝑎𝐵)) → (𝑧( ·𝑠𝐾)𝑎) = (𝑧( ·𝑠𝐿)𝑎))
211, 2, 5, 20syl12anc 836 . . . . . . . . . . . . 13 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → (𝑧( ·𝑠𝐾)𝑎) = (𝑧( ·𝑠𝐿)𝑎))
2221oveq1d 7463 . . . . . . . . . . . 12 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → ((𝑧( ·𝑠𝐾)𝑎)(+g𝐿)𝑏) = ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏))
2318, 22eqtrd 2780 . . . . . . . . . . 11 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) = ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏))
2423eleq1d 2829 . . . . . . . . . 10 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → (((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠 ↔ ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠))
2524anassrs 467 . . . . . . . . 9 ((((𝜑𝑠𝐵) ∧ 𝑧𝑃) ∧ (𝑎𝑠𝑏𝑠)) → (((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠 ↔ ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠))
26252ralbidva 3225 . . . . . . . 8 (((𝜑𝑠𝐵) ∧ 𝑧𝑃) → (∀𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠 ↔ ∀𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠))
2726ralbidva 3182 . . . . . . 7 ((𝜑𝑠𝐵) → (∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠 ↔ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠))
2827anbi2d 629 . . . . . 6 ((𝜑𝑠𝐵) → ((𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠) ↔ (𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠)))
2928pm5.32da 578 . . . . 5 (𝜑 → ((𝑠𝐵 ∧ (𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠)) ↔ (𝑠𝐵 ∧ (𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠))))
30 3anass 1095 . . . . 5 ((𝑠𝐵𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠) ↔ (𝑠𝐵 ∧ (𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠)))
31 3anass 1095 . . . . 5 ((𝑠𝐵𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠) ↔ (𝑠𝐵 ∧ (𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠)))
3229, 30, 313bitr4g 314 . . . 4 (𝜑 → ((𝑠𝐵𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠) ↔ (𝑠𝐵𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠)))
33 lsspropd.b1 . . . . . 6 (𝜑𝐵 = (Base‘𝐾))
3433sseq2d 4041 . . . . 5 (𝜑 → (𝑠𝐵𝑠 ⊆ (Base‘𝐾)))
35 lsspropd.p1 . . . . . 6 (𝜑𝑃 = (Base‘(Scalar‘𝐾)))
3635raleqdv 3334 . . . . 5 (𝜑 → (∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠 ↔ ∀𝑧 ∈ (Base‘(Scalar‘𝐾))∀𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠))
3734, 363anbi13d 1438 . . . 4 (𝜑 → ((𝑠𝐵𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠) ↔ (𝑠 ⊆ (Base‘𝐾) ∧ 𝑠 ≠ ∅ ∧ ∀𝑧 ∈ (Base‘(Scalar‘𝐾))∀𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠)))
38 lsspropd.b2 . . . . . 6 (𝜑𝐵 = (Base‘𝐿))
3938sseq2d 4041 . . . . 5 (𝜑 → (𝑠𝐵𝑠 ⊆ (Base‘𝐿)))
40 lsspropd.p2 . . . . . 6 (𝜑𝑃 = (Base‘(Scalar‘𝐿)))
4140raleqdv 3334 . . . . 5 (𝜑 → (∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠 ↔ ∀𝑧 ∈ (Base‘(Scalar‘𝐿))∀𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠))
4239, 413anbi13d 1438 . . . 4 (𝜑 → ((𝑠𝐵𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠) ↔ (𝑠 ⊆ (Base‘𝐿) ∧ 𝑠 ≠ ∅ ∧ ∀𝑧 ∈ (Base‘(Scalar‘𝐿))∀𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠)))
4332, 37, 423bitr3d 309 . . 3 (𝜑 → ((𝑠 ⊆ (Base‘𝐾) ∧ 𝑠 ≠ ∅ ∧ ∀𝑧 ∈ (Base‘(Scalar‘𝐾))∀𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠) ↔ (𝑠 ⊆ (Base‘𝐿) ∧ 𝑠 ≠ ∅ ∧ ∀𝑧 ∈ (Base‘(Scalar‘𝐿))∀𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠)))
44 eqid 2740 . . . 4 (Scalar‘𝐾) = (Scalar‘𝐾)
45 eqid 2740 . . . 4 (Base‘(Scalar‘𝐾)) = (Base‘(Scalar‘𝐾))
46 eqid 2740 . . . 4 (Base‘𝐾) = (Base‘𝐾)
47 eqid 2740 . . . 4 (+g𝐾) = (+g𝐾)
48 eqid 2740 . . . 4 ( ·𝑠𝐾) = ( ·𝑠𝐾)
49 eqid 2740 . . . 4 (LSubSp‘𝐾) = (LSubSp‘𝐾)
5044, 45, 46, 47, 48, 49islss 20955 . . 3 (𝑠 ∈ (LSubSp‘𝐾) ↔ (𝑠 ⊆ (Base‘𝐾) ∧ 𝑠 ≠ ∅ ∧ ∀𝑧 ∈ (Base‘(Scalar‘𝐾))∀𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠))
51 eqid 2740 . . . 4 (Scalar‘𝐿) = (Scalar‘𝐿)
52 eqid 2740 . . . 4 (Base‘(Scalar‘𝐿)) = (Base‘(Scalar‘𝐿))
53 eqid 2740 . . . 4 (Base‘𝐿) = (Base‘𝐿)
54 eqid 2740 . . . 4 (+g𝐿) = (+g𝐿)
55 eqid 2740 . . . 4 ( ·𝑠𝐿) = ( ·𝑠𝐿)
56 eqid 2740 . . . 4 (LSubSp‘𝐿) = (LSubSp‘𝐿)
5751, 52, 53, 54, 55, 56islss 20955 . . 3 (𝑠 ∈ (LSubSp‘𝐿) ↔ (𝑠 ⊆ (Base‘𝐿) ∧ 𝑠 ≠ ∅ ∧ ∀𝑧 ∈ (Base‘(Scalar‘𝐿))∀𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠))
5843, 50, 573bitr4g 314 . 2 (𝜑 → (𝑠 ∈ (LSubSp‘𝐾) ↔ 𝑠 ∈ (LSubSp‘𝐿)))
5958eqrdv 2738 1 (𝜑 → (LSubSp‘𝐾) = (LSubSp‘𝐿))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1087   = wceq 1537  wcel 2108  wne 2946  wral 3067  wss 3976  c0 4352  cfv 6573  (class class class)co 7448  Basecbs 17258  +gcplusg 17311  Scalarcsca 17314   ·𝑠 cvsca 17315  LSubSpclss 20952
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1793  ax-4 1807  ax-5 1909  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2158  ax-12 2178  ax-ext 2711  ax-sep 5317  ax-nul 5324  ax-pow 5383  ax-pr 5447
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 847  df-3an 1089  df-tru 1540  df-fal 1550  df-ex 1778  df-nf 1782  df-sb 2065  df-mo 2543  df-eu 2572  df-clab 2718  df-cleq 2732  df-clel 2819  df-nfc 2895  df-ne 2947  df-ral 3068  df-rex 3077  df-rab 3444  df-v 3490  df-dif 3979  df-un 3981  df-in 3983  df-ss 3993  df-nul 4353  df-if 4549  df-pw 4624  df-sn 4649  df-pr 4651  df-op 4655  df-uni 4932  df-br 5167  df-opab 5229  df-mpt 5250  df-id 5593  df-xp 5706  df-rel 5707  df-cnv 5708  df-co 5709  df-dm 5710  df-iota 6525  df-fun 6575  df-fv 6581  df-ov 7451  df-lss 20953
This theorem is referenced by:  lsppropd  21040  lidlrsppropd  21277  ply1lss  22219
  Copyright terms: Public domain W3C validator