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

Theorem lsspropd 19791
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 765 . . . . . . . . . . . . 13 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → 𝜑)
2 simprl 769 . . . . . . . . . . . . . 14 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → 𝑧𝑃)
3 simplr 767 . . . . . . . . . . . . . . 15 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → 𝑠𝐵)
4 simprrl 779 . . . . . . . . . . . . . . 15 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → 𝑎𝑠)
53, 4sseldd 3970 . . . . . . . . . . . . . 14 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → 𝑎𝐵)
6 lsspropd.s1 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑥𝑃𝑦𝐵)) → (𝑥( ·𝑠𝐾)𝑦) ∈ 𝑊)
76ralrimivva 3193 . . . . . . . . . . . . . . 15 (𝜑 → ∀𝑥𝑃𝑦𝐵 (𝑥( ·𝑠𝐾)𝑦) ∈ 𝑊)
87ad2antrr 724 . . . . . . . . . . . . . 14 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → ∀𝑥𝑃𝑦𝐵 (𝑥( ·𝑠𝐾)𝑦) ∈ 𝑊)
9 ovrspc2v 7184 . . . . . . . . . . . . . 14 (((𝑧𝑃𝑎𝐵) ∧ ∀𝑥𝑃𝑦𝐵 (𝑥( ·𝑠𝐾)𝑦) ∈ 𝑊) → (𝑧( ·𝑠𝐾)𝑎) ∈ 𝑊)
102, 5, 8, 9syl21anc 835 . . . . . . . . . . . . 13 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → (𝑧( ·𝑠𝐾)𝑎) ∈ 𝑊)
11 lsspropd.w . . . . . . . . . . . . . . 15 (𝜑𝐵𝑊)
1211ad2antrr 724 . . . . . . . . . . . . . 14 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → 𝐵𝑊)
13 simprrr 780 . . . . . . . . . . . . . . 15 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → 𝑏𝑠)
143, 13sseldd 3970 . . . . . . . . . . . . . 14 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → 𝑏𝐵)
1512, 14sseldd 3970 . . . . . . . . . . . . 13 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → 𝑏𝑊)
16 lsspropd.p . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑥𝑊𝑦𝑊)) → (𝑥(+g𝐾)𝑦) = (𝑥(+g𝐿)𝑦))
1716oveqrspc2v 7185 . . . . . . . . . . . . 13 ((𝜑 ∧ ((𝑧( ·𝑠𝐾)𝑎) ∈ 𝑊𝑏𝑊)) → ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) = ((𝑧( ·𝑠𝐾)𝑎)(+g𝐿)𝑏))
181, 10, 15, 17syl12anc 834 . . . . . . . . . . . 12 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) = ((𝑧( ·𝑠𝐾)𝑎)(+g𝐿)𝑏))
19 lsspropd.s2 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑥𝑃𝑦𝐵)) → (𝑥( ·𝑠𝐾)𝑦) = (𝑥( ·𝑠𝐿)𝑦))
2019oveqrspc2v 7185 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑧𝑃𝑎𝐵)) → (𝑧( ·𝑠𝐾)𝑎) = (𝑧( ·𝑠𝐿)𝑎))
211, 2, 5, 20syl12anc 834 . . . . . . . . . . . . 13 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → (𝑧( ·𝑠𝐾)𝑎) = (𝑧( ·𝑠𝐿)𝑎))
2221oveq1d 7173 . . . . . . . . . . . 12 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → ((𝑧( ·𝑠𝐾)𝑎)(+g𝐿)𝑏) = ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏))
2318, 22eqtrd 2858 . . . . . . . . . . 11 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) = ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏))
2423eleq1d 2899 . . . . . . . . . 10 (((𝜑𝑠𝐵) ∧ (𝑧𝑃 ∧ (𝑎𝑠𝑏𝑠))) → (((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠 ↔ ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠))
2524anassrs 470 . . . . . . . . 9 ((((𝜑𝑠𝐵) ∧ 𝑧𝑃) ∧ (𝑎𝑠𝑏𝑠)) → (((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠 ↔ ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠))
26252ralbidva 3200 . . . . . . . 8 (((𝜑𝑠𝐵) ∧ 𝑧𝑃) → (∀𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠 ↔ ∀𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠))
2726ralbidva 3198 . . . . . . 7 ((𝜑𝑠𝐵) → (∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠 ↔ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠))
2827anbi2d 630 . . . . . 6 ((𝜑𝑠𝐵) → ((𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠) ↔ (𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠)))
2928pm5.32da 581 . . . . 5 (𝜑 → ((𝑠𝐵 ∧ (𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠)) ↔ (𝑠𝐵 ∧ (𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠))))
30 3anass 1091 . . . . 5 ((𝑠𝐵𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠) ↔ (𝑠𝐵 ∧ (𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠)))
31 3anass 1091 . . . . 5 ((𝑠𝐵𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠) ↔ (𝑠𝐵 ∧ (𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠)))
3229, 30, 313bitr4g 316 . . . 4 (𝜑 → ((𝑠𝐵𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠) ↔ (𝑠𝐵𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠)))
33 lsspropd.b1 . . . . . 6 (𝜑𝐵 = (Base‘𝐾))
3433sseq2d 4001 . . . . 5 (𝜑 → (𝑠𝐵𝑠 ⊆ (Base‘𝐾)))
35 lsspropd.p1 . . . . . 6 (𝜑𝑃 = (Base‘(Scalar‘𝐾)))
3635raleqdv 3417 . . . . 5 (𝜑 → (∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠 ↔ ∀𝑧 ∈ (Base‘(Scalar‘𝐾))∀𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠))
3734, 363anbi13d 1434 . . . 4 (𝜑 → ((𝑠𝐵𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠) ↔ (𝑠 ⊆ (Base‘𝐾) ∧ 𝑠 ≠ ∅ ∧ ∀𝑧 ∈ (Base‘(Scalar‘𝐾))∀𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠)))
38 lsspropd.b2 . . . . . 6 (𝜑𝐵 = (Base‘𝐿))
3938sseq2d 4001 . . . . 5 (𝜑 → (𝑠𝐵𝑠 ⊆ (Base‘𝐿)))
40 lsspropd.p2 . . . . . 6 (𝜑𝑃 = (Base‘(Scalar‘𝐿)))
4140raleqdv 3417 . . . . 5 (𝜑 → (∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠 ↔ ∀𝑧 ∈ (Base‘(Scalar‘𝐿))∀𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠))
4239, 413anbi13d 1434 . . . 4 (𝜑 → ((𝑠𝐵𝑠 ≠ ∅ ∧ ∀𝑧𝑃𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠) ↔ (𝑠 ⊆ (Base‘𝐿) ∧ 𝑠 ≠ ∅ ∧ ∀𝑧 ∈ (Base‘(Scalar‘𝐿))∀𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠)))
4332, 37, 423bitr3d 311 . . 3 (𝜑 → ((𝑠 ⊆ (Base‘𝐾) ∧ 𝑠 ≠ ∅ ∧ ∀𝑧 ∈ (Base‘(Scalar‘𝐾))∀𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠) ↔ (𝑠 ⊆ (Base‘𝐿) ∧ 𝑠 ≠ ∅ ∧ ∀𝑧 ∈ (Base‘(Scalar‘𝐿))∀𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠)))
44 eqid 2823 . . . 4 (Scalar‘𝐾) = (Scalar‘𝐾)
45 eqid 2823 . . . 4 (Base‘(Scalar‘𝐾)) = (Base‘(Scalar‘𝐾))
46 eqid 2823 . . . 4 (Base‘𝐾) = (Base‘𝐾)
47 eqid 2823 . . . 4 (+g𝐾) = (+g𝐾)
48 eqid 2823 . . . 4 ( ·𝑠𝐾) = ( ·𝑠𝐾)
49 eqid 2823 . . . 4 (LSubSp‘𝐾) = (LSubSp‘𝐾)
5044, 45, 46, 47, 48, 49islss 19708 . . 3 (𝑠 ∈ (LSubSp‘𝐾) ↔ (𝑠 ⊆ (Base‘𝐾) ∧ 𝑠 ≠ ∅ ∧ ∀𝑧 ∈ (Base‘(Scalar‘𝐾))∀𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐾)𝑎)(+g𝐾)𝑏) ∈ 𝑠))
51 eqid 2823 . . . 4 (Scalar‘𝐿) = (Scalar‘𝐿)
52 eqid 2823 . . . 4 (Base‘(Scalar‘𝐿)) = (Base‘(Scalar‘𝐿))
53 eqid 2823 . . . 4 (Base‘𝐿) = (Base‘𝐿)
54 eqid 2823 . . . 4 (+g𝐿) = (+g𝐿)
55 eqid 2823 . . . 4 ( ·𝑠𝐿) = ( ·𝑠𝐿)
56 eqid 2823 . . . 4 (LSubSp‘𝐿) = (LSubSp‘𝐿)
5751, 52, 53, 54, 55, 56islss 19708 . . 3 (𝑠 ∈ (LSubSp‘𝐿) ↔ (𝑠 ⊆ (Base‘𝐿) ∧ 𝑠 ≠ ∅ ∧ ∀𝑧 ∈ (Base‘(Scalar‘𝐿))∀𝑎𝑠𝑏𝑠 ((𝑧( ·𝑠𝐿)𝑎)(+g𝐿)𝑏) ∈ 𝑠))
5843, 50, 573bitr4g 316 . 2 (𝜑 → (𝑠 ∈ (LSubSp‘𝐾) ↔ 𝑠 ∈ (LSubSp‘𝐿)))
5958eqrdv 2821 1 (𝜑 → (LSubSp‘𝐾) = (LSubSp‘𝐿))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 208  wa 398  w3a 1083   = wceq 1537  wcel 2114  wne 3018  wral 3140  wss 3938  c0 4293  cfv 6357  (class class class)co 7158  Basecbs 16485  +gcplusg 16567  Scalarcsca 16570   ·𝑠 cvsca 16571  LSubSpclss 19705
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 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2177  ax-ext 2795  ax-sep 5205  ax-nul 5212  ax-pow 5268  ax-pr 5332
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3an 1085  df-tru 1540  df-ex 1781  df-nf 1785  df-sb 2070  df-mo 2622  df-eu 2654  df-clab 2802  df-cleq 2816  df-clel 2895  df-nfc 2965  df-ne 3019  df-ral 3145  df-rex 3146  df-rab 3149  df-v 3498  df-sbc 3775  df-dif 3941  df-un 3943  df-in 3945  df-ss 3954  df-nul 4294  df-if 4470  df-pw 4543  df-sn 4570  df-pr 4572  df-op 4576  df-uni 4841  df-br 5069  df-opab 5131  df-mpt 5149  df-id 5462  df-xp 5563  df-rel 5564  df-cnv 5565  df-co 5566  df-dm 5567  df-iota 6316  df-fun 6359  df-fv 6365  df-ov 7161  df-lss 19706
This theorem is referenced by:  lsppropd  19792  lidlrsppropd  20005  ply1lss  20366
  Copyright terms: Public domain W3C validator