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

Theorem lsspropd 20952
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 3935 . . . . . . . . . . . . . 14 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → 𝑎𝐵)
6 lsspropd.s1 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑥𝑃𝑦𝐵)) → (𝑥( ·𝑠𝐾)𝑦) ∈ 𝑊)
76ralrimivva 3175 . . . . . . . . . . . . . . 15 (𝜑 → ∀𝑥𝑃𝑦𝐵 (𝑥( ·𝑠𝐾)𝑦) ∈ 𝑊)
87ad2antrr 726 . . . . . . . . . . . . . 14 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → ∀𝑥𝑃𝑦𝐵 (𝑥( ·𝑠𝐾)𝑦) ∈ 𝑊)
9 ovrspc2v 7372 . . . . . . . . . . . . . 14 (((𝑧𝑃𝑎𝐵) ∧ ∀𝑥𝑃𝑦𝐵 (𝑥( ·𝑠𝐾)𝑦) ∈ 𝑊) → (𝑧( ·𝑠𝐾)𝑎) ∈ 𝑊)
102, 5, 8, 9syl21anc 837 . . . . . . . . . . . . 13 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → (𝑧( ·𝑠𝐾)𝑎) ∈ 𝑊)
11 lsspropd.w . . . . . . . . . . . . . . 15 (𝜑𝐵𝑊)
1211ad2antrr 726 . . . . . . . . . . . . . 14 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → 𝐵𝑊)
13 simprrr 781 . . . . . . . . . . . . . . 15 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → 𝑏𝑠)
143, 13sseldd 3935 . . . . . . . . . . . . . 14 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → 𝑏𝐵)
1512, 14sseldd 3935 . . . . . . . . . . . . 13 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → 𝑏𝑊)
16 lsspropd.p . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑥𝑊𝑦𝑊)) → (𝑥(+g𝐾)𝑦) = (𝑥(+g𝐿)𝑦))
1716oveqrspc2v 7373 . . . . . . . . . . . . 13 ((𝜑 ∧ ((𝑧( ·𝑠𝐾)𝑎) ∈ 𝑊𝑏𝑊)) → ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) = ((𝑧( ·𝑠𝐾)𝑎)(+g𝐿)𝑏))
181, 10, 15, 17syl12anc 836 . . . . . . . . . . . 12 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) = ((𝑧( ·𝑠𝐾)𝑎)(+g𝐿)𝑏))
19 lsspropd.s2 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑥𝑃𝑦𝐵)) → (𝑥( ·𝑠𝐾)𝑦) = (𝑥( ·𝑠𝐿)𝑦))
2019oveqrspc2v 7373 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑧𝑃𝑎𝐵)) → (𝑧( ·𝑠𝐾)𝑎) = (𝑧( ·𝑠𝐿)𝑎))
211, 2, 5, 20syl12anc 836 . . . . . . . . . . . . 13 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → (𝑧( ·𝑠𝐾)𝑎) = (𝑧( ·𝑠𝐿)𝑎))
2221oveq1d 7361 . . . . . . . . . . . 12 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → ((𝑧( ·𝑠𝐾)𝑎)(+g𝐿)𝑏) = ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏))
2318, 22eqtrd 2766 . . . . . . . . . . 11 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) = ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏))
2423eleq1d 2816 . . . . . . . . . 10 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → (((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠 ↔ ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠))
2524anassrs 467 . . . . . . . . 9 ((((𝜑𝑠𝐵) ∧ 𝑧𝑃) ∧ (𝑎𝑠𝑏𝑠)) → (((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠 ↔ ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠))
26252ralbidva 3194 . . . . . . . 8 (((𝜑𝑠𝐵) ∧ 𝑧𝑃) → (∀𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠 ↔ ∀𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠))
2726ralbidva 3153 . . . . . . 7 ((𝜑𝑠𝐵) → (∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠 ↔ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠))
2827anbi2d 630 . . . . . 6 ((𝜑𝑠𝐵) → ((𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠) ↔ (𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠)))
2928pm5.32da 579 . . . . 5 (𝜑 → ((𝑠𝐵 ∧ (𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠)) ↔ (𝑠𝐵 ∧ (𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠))))
30 3anass 1094 . . . . 5 ((𝑠𝐵𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠) ↔ (𝑠𝐵 ∧ (𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠)))
31 3anass 1094 . . . . 5 ((𝑠𝐵𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠) ↔ (𝑠𝐵 ∧ (𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠)))
3229, 30, 313bitr4g 314 . . . 4 (𝜑 → ((𝑠𝐵𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠) ↔ (𝑠𝐵𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠)))
33 lsspropd.b1 . . . . . 6 (𝜑𝐵 = (Base‘𝐾))
3433sseq2d 3967 . . . . 5 (𝜑 → (𝑠𝐵𝑠 ⊆ (Base‘𝐾)))
35 lsspropd.p1 . . . . . 6 (𝜑𝑃 = (Base‘(Scalar‘𝐾)))
3635raleqdv 3292 . . . . 5 (𝜑 → (∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠 ↔ ∀𝑧 ∈ (Base‘(Scalar‘𝐾))∀𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠))
3734, 363anbi13d 1440 . . . 4 (𝜑 → ((𝑠𝐵𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠) ↔ (𝑠 ⊆ (Base‘𝐾) ∧ 𝑠 ≠ ∅ ∧ ∀𝑧 ∈ (Base‘(Scalar‘𝐾))∀𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠)))
38 lsspropd.b2 . . . . . 6 (𝜑𝐵 = (Base‘𝐿))
3938sseq2d 3967 . . . . 5 (𝜑 → (𝑠𝐵𝑠 ⊆ (Base‘𝐿)))
40 lsspropd.p2 . . . . . 6 (𝜑𝑃 = (Base‘(Scalar‘𝐿)))
4140raleqdv 3292 . . . . 5 (𝜑 → (∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠 ↔ ∀𝑧 ∈ (Base‘(Scalar‘𝐿))∀𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠))
4239, 413anbi13d 1440 . . . 4 (𝜑 → ((𝑠𝐵𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠) ↔ (𝑠 ⊆ (Base‘𝐿) ∧ 𝑠 ≠ ∅ ∧ ∀𝑧 ∈ (Base‘(Scalar‘𝐿))∀𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠)))
4332, 37, 423bitr3d 309 . . 3 (𝜑 → ((𝑠 ⊆ (Base‘𝐾) ∧ 𝑠 ≠ ∅ ∧ ∀𝑧 ∈ (Base‘(Scalar‘𝐾))∀𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠) ↔ (𝑠 ⊆ (Base‘𝐿) ∧ 𝑠 ≠ ∅ ∧ ∀𝑧 ∈ (Base‘(Scalar‘𝐿))∀𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠)))
44 eqid 2731 . . . 4 (Scalar‘𝐾) = (Scalar‘𝐾)
45 eqid 2731 . . . 4 (Base‘(Scalar‘𝐾)) = (Base‘(Scalar‘𝐾))
46 eqid 2731 . . . 4 (Base‘𝐾) = (Base‘𝐾)
47 eqid 2731 . . . 4 (+g𝐾) = (+g𝐾)
48 eqid 2731 . . . 4 ( ·𝑠𝐾) = ( ·𝑠𝐾)
49 eqid 2731 . . . 4 (LSubSp‘𝐾) = (LSubSp‘𝐾)
5044, 45, 46, 47, 48, 49islss 20868 . . 3 (𝑠 ∈ (LSubSp‘𝐾) ↔ (𝑠 ⊆ (Base‘𝐾) ∧ 𝑠 ≠ ∅ ∧ ∀𝑧 ∈ (Base‘(Scalar‘𝐾))∀𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠))
51 eqid 2731 . . . 4 (Scalar‘𝐿) = (Scalar‘𝐿)
52 eqid 2731 . . . 4 (Base‘(Scalar‘𝐿)) = (Base‘(Scalar‘𝐿))
53 eqid 2731 . . . 4 (Base‘𝐿) = (Base‘𝐿)
54 eqid 2731 . . . 4 (+g𝐿) = (+g𝐿)
55 eqid 2731 . . . 4 ( ·𝑠𝐿) = ( ·𝑠𝐿)
56 eqid 2731 . . . 4 (LSubSp‘𝐿) = (LSubSp‘𝐿)
5751, 52, 53, 54, 55, 56islss 20868 . . 3 (𝑠 ∈ (LSubSp‘𝐿) ↔ (𝑠 ⊆ (Base‘𝐿) ∧ 𝑠 ≠ ∅ ∧ ∀𝑧 ∈ (Base‘(Scalar‘𝐿))∀𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠))
5843, 50, 573bitr4g 314 . 2 (𝜑 → (𝑠 ∈ (LSubSp‘𝐾) ↔ 𝑠 ∈ (LSubSp‘𝐿)))
5958eqrdv 2729 1 (𝜑 → (LSubSp‘𝐾) = (LSubSp‘𝐿))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1086   = wceq 1541  wcel 2111  wne 2928  wral 3047  wss 3902  c0 4283  cfv 6481  (class class class)co 7346  Basecbs 17120  +gcplusg 17161  Scalarcsca 17164   ·𝑠 cvsca 17165  LSubSpclss 20865
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2113  ax-9 2121  ax-10 2144  ax-11 2160  ax-12 2180  ax-ext 2703  ax-sep 5234  ax-nul 5244  ax-pow 5303  ax-pr 5370
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2535  df-eu 2564  df-clab 2710  df-cleq 2723  df-clel 2806  df-nfc 2881  df-ne 2929  df-ral 3048  df-rex 3057  df-rab 3396  df-v 3438  df-dif 3905  df-un 3907  df-in 3909  df-ss 3919  df-nul 4284  df-if 4476  df-pw 4552  df-sn 4577  df-pr 4579  df-op 4583  df-uni 4860  df-br 5092  df-opab 5154  df-mpt 5173  df-id 5511  df-xp 5622  df-rel 5623  df-cnv 5624  df-co 5625  df-dm 5626  df-iota 6437  df-fun 6483  df-fv 6489  df-ov 7349  df-lss 20866
This theorem is referenced by:  lsppropd  20953  lidlrsppropd  21182  ply1lss  22110
  Copyright terms: Public domain W3C validator