HSE Home Hilbert Space Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  HSE Home  >  Th. List  >  hhssabloilem Structured version   Visualization version   GIF version

Theorem hhssabloilem 31350
Description: Lemma for hhssabloi 31351. Formerly part of proof for hhssabloi 31351 which was based on the deprecated definition "SubGrpOp" for subgroups. (Contributed by NM, 9-Apr-2008.) (Revised by Mario Carneiro, 23-Dec-2013.) (Revised by AV, 27-Aug-2021.) (New usage is discouraged.)
Hypothesis
Ref Expression
hhssabl.1 𝐻S
Assertion
Ref Expression
hhssabloilem ( + ∈ GrpOp ∧ ( + ↾ (𝐻 × 𝐻)) ∈ GrpOp ∧ ( + ↾ (𝐻 × 𝐻)) ⊆ + )

Proof of Theorem hhssabloilem
Dummy variables 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 hilablo 31249 . . 3 + ∈ AbelOp
2 ablogrpo 30636 . . 3 ( + ∈ AbelOp → + ∈ GrpOp)
31, 2ax-mp 5 . 2 + ∈ GrpOp
4 hhssabl.1 . . . 4 𝐻S
54elexi 3453 . . 3 𝐻 ∈ V
6 eqid 2739 . . . . . . . 8 ran + = ran +
76grpofo 30588 . . . . . . 7 ( + ∈ GrpOp → + :(ran + × ran + )–onto→ran + )
8 fof 6739 . . . . . . 7 ( + :(ran + × ran + )–onto→ran + → + :(ran + × ran + )⟶ran + )
93, 7, 8mp2b 10 . . . . . 6 + :(ran + × ran + )⟶ran +
104shssii 31302 . . . . . . . 8 𝐻 ⊆ ℋ
11 df-hba 31058 . . . . . . . . 9 ℋ = (BaseSet‘⟨⟨ + , · ⟩, norm⟩)
12 eqid 2739 . . . . . . . . . 10 ⟨⟨ + , · ⟩, norm⟩ = ⟨⟨ + , · ⟩, norm
1312hhva 31255 . . . . . . . . 9 + = ( +𝑣 ‘⟨⟨ + , · ⟩, norm⟩)
1411, 13bafval 30693 . . . . . . . 8 ℋ = ran +
1510, 14sseqtri 3963 . . . . . . 7 𝐻 ⊆ ran +
16 xpss12 5633 . . . . . . 7 ((𝐻 ⊆ ran +𝐻 ⊆ ran + ) → (𝐻 × 𝐻) ⊆ (ran + × ran + ))
1715, 15, 16mp2an 698 . . . . . 6 (𝐻 × 𝐻) ⊆ (ran + × ran + )
18 fssres 6693 . . . . . 6 (( + :(ran + × ran + )⟶ran + ∧ (𝐻 × 𝐻) ⊆ (ran + × ran + )) → ( + ↾ (𝐻 × 𝐻)):(𝐻 × 𝐻)⟶ran + )
199, 17, 18mp2an 698 . . . . 5 ( + ↾ (𝐻 × 𝐻)):(𝐻 × 𝐻)⟶ran +
20 ffn 6655 . . . . 5 (( + ↾ (𝐻 × 𝐻)):(𝐻 × 𝐻)⟶ran + → ( + ↾ (𝐻 × 𝐻)) Fn (𝐻 × 𝐻))
2119, 20ax-mp 5 . . . 4 ( + ↾ (𝐻 × 𝐻)) Fn (𝐻 × 𝐻)
22 ovres 7522 . . . . . 6 ((𝑥𝐻𝑦𝐻) → (𝑥( + ↾ (𝐻 × 𝐻))𝑦) = (𝑥 + 𝑦))
23 shaddcl 31306 . . . . . . 7 ((𝐻S𝑥𝐻𝑦𝐻) → (𝑥 + 𝑦) ∈ 𝐻)
244, 23mp3an1 1456 . . . . . 6 ((𝑥𝐻𝑦𝐻) → (𝑥 + 𝑦) ∈ 𝐻)
2522, 24eqeltrd 2839 . . . . 5 ((𝑥𝐻𝑦𝐻) → (𝑥( + ↾ (𝐻 × 𝐻))𝑦) ∈ 𝐻)
2625rgen2 3179 . . . 4 𝑥𝐻𝑦𝐻 (𝑥( + ↾ (𝐻 × 𝐻))𝑦) ∈ 𝐻
27 ffnov 7482 . . . 4 (( + ↾ (𝐻 × 𝐻)):(𝐻 × 𝐻)⟶𝐻 ↔ (( + ↾ (𝐻 × 𝐻)) Fn (𝐻 × 𝐻) ∧ ∀𝑥𝐻𝑦𝐻 (𝑥( + ↾ (𝐻 × 𝐻))𝑦) ∈ 𝐻))
2821, 26, 27mpbir2an 717 . . 3 ( + ↾ (𝐻 × 𝐻)):(𝐻 × 𝐻)⟶𝐻
2922oveq1d 7371 . . . . 5 ((𝑥𝐻𝑦𝐻) → ((𝑥( + ↾ (𝐻 × 𝐻))𝑦) + 𝑧) = ((𝑥 + 𝑦) + 𝑧))
30293adant3 1138 . . . 4 ((𝑥𝐻𝑦𝐻𝑧𝐻) → ((𝑥( + ↾ (𝐻 × 𝐻))𝑦) + 𝑧) = ((𝑥 + 𝑦) + 𝑧))
31 ovres 7522 . . . . 5 (((𝑥( + ↾ (𝐻 × 𝐻))𝑦) ∈ 𝐻𝑧𝐻) → ((𝑥( + ↾ (𝐻 × 𝐻))𝑦)( + ↾ (𝐻 × 𝐻))𝑧) = ((𝑥( + ↾ (𝐻 × 𝐻))𝑦) + 𝑧))
3225, 31stoic3 1783 . . . 4 ((𝑥𝐻𝑦𝐻𝑧𝐻) → ((𝑥( + ↾ (𝐻 × 𝐻))𝑦)( + ↾ (𝐻 × 𝐻))𝑧) = ((𝑥( + ↾ (𝐻 × 𝐻))𝑦) + 𝑧))
33 ovres 7522 . . . . . . 7 ((𝑦𝐻𝑧𝐻) → (𝑦( + ↾ (𝐻 × 𝐻))𝑧) = (𝑦 + 𝑧))
3433oveq2d 7372 . . . . . 6 ((𝑦𝐻𝑧𝐻) → (𝑥 + (𝑦( + ↾ (𝐻 × 𝐻))𝑧)) = (𝑥 + (𝑦 + 𝑧)))
35343adant1 1136 . . . . 5 ((𝑥𝐻𝑦𝐻𝑧𝐻) → (𝑥 + (𝑦( + ↾ (𝐻 × 𝐻))𝑧)) = (𝑥 + (𝑦 + 𝑧)))
3628fovcl 7484 . . . . . . 7 ((𝑦𝐻𝑧𝐻) → (𝑦( + ↾ (𝐻 × 𝐻))𝑧) ∈ 𝐻)
37 ovres 7522 . . . . . . 7 ((𝑥𝐻 ∧ (𝑦( + ↾ (𝐻 × 𝐻))𝑧) ∈ 𝐻) → (𝑥( + ↾ (𝐻 × 𝐻))(𝑦( + ↾ (𝐻 × 𝐻))𝑧)) = (𝑥 + (𝑦( + ↾ (𝐻 × 𝐻))𝑧)))
3836, 37sylan2 599 . . . . . 6 ((𝑥𝐻 ∧ (𝑦𝐻𝑧𝐻)) → (𝑥( + ↾ (𝐻 × 𝐻))(𝑦( + ↾ (𝐻 × 𝐻))𝑧)) = (𝑥 + (𝑦( + ↾ (𝐻 × 𝐻))𝑧)))
39383impb 1120 . . . . 5 ((𝑥𝐻𝑦𝐻𝑧𝐻) → (𝑥( + ↾ (𝐻 × 𝐻))(𝑦( + ↾ (𝐻 × 𝐻))𝑧)) = (𝑥 + (𝑦( + ↾ (𝐻 × 𝐻))𝑧)))
4015sseli 3911 . . . . . 6 (𝑥𝐻𝑥 ∈ ran + )
4115sseli 3911 . . . . . 6 (𝑦𝐻𝑦 ∈ ran + )
4215sseli 3911 . . . . . 6 (𝑧𝐻𝑧 ∈ ran + )
436grpoass 30592 . . . . . . 7 (( + ∈ GrpOp ∧ (𝑥 ∈ ran +𝑦 ∈ ran +𝑧 ∈ ran + )) → ((𝑥 + 𝑦) + 𝑧) = (𝑥 + (𝑦 + 𝑧)))
443, 43mpan 696 . . . . . 6 ((𝑥 ∈ ran +𝑦 ∈ ran +𝑧 ∈ ran + ) → ((𝑥 + 𝑦) + 𝑧) = (𝑥 + (𝑦 + 𝑧)))
4540, 41, 42, 44syl3an 1166 . . . . 5 ((𝑥𝐻𝑦𝐻𝑧𝐻) → ((𝑥 + 𝑦) + 𝑧) = (𝑥 + (𝑦 + 𝑧)))
4635, 39, 453eqtr4d 2784 . . . 4 ((𝑥𝐻𝑦𝐻𝑧𝐻) → (𝑥( + ↾ (𝐻 × 𝐻))(𝑦( + ↾ (𝐻 × 𝐻))𝑧)) = ((𝑥 + 𝑦) + 𝑧))
4730, 32, 463eqtr4d 2784 . . 3 ((𝑥𝐻𝑦𝐻𝑧𝐻) → ((𝑥( + ↾ (𝐻 × 𝐻))𝑦)( + ↾ (𝐻 × 𝐻))𝑧) = (𝑥( + ↾ (𝐻 × 𝐻))(𝑦( + ↾ (𝐻 × 𝐻))𝑧)))
48 hilid 31250 . . . 4 (GId‘ + ) = 0
49 sh0 31305 . . . . 5 (𝐻S → 0𝐻)
504, 49ax-mp 5 . . . 4 0𝐻
5148, 50eqeltri 2835 . . 3 (GId‘ + ) ∈ 𝐻
52 ovres 7522 . . . . 5 (((GId‘ + ) ∈ 𝐻𝑥𝐻) → ((GId‘ + )( + ↾ (𝐻 × 𝐻))𝑥) = ((GId‘ + ) + 𝑥))
5351, 52mpan 696 . . . 4 (𝑥𝐻 → ((GId‘ + )( + ↾ (𝐻 × 𝐻))𝑥) = ((GId‘ + ) + 𝑥))
54 eqid 2739 . . . . . 6 (GId‘ + ) = (GId‘ + )
556, 54grpolid 30605 . . . . 5 (( + ∈ GrpOp ∧ 𝑥 ∈ ran + ) → ((GId‘ + ) + 𝑥) = 𝑥)
563, 40, 55sylancr 593 . . . 4 (𝑥𝐻 → ((GId‘ + ) + 𝑥) = 𝑥)
5753, 56eqtrd 2774 . . 3 (𝑥𝐻 → ((GId‘ + )( + ↾ (𝐻 × 𝐻))𝑥) = 𝑥)
5812hhnv 31254 . . . . . . 7 ⟨⟨ + , · ⟩, norm⟩ ∈ NrmCVec
5912hhsm 31258 . . . . . . . 8 · = ( ·𝑠OLD ‘⟨⟨ + , · ⟩, norm⟩)
60 eqid 2739 . . . . . . . 8 ( ·(2nd ↾ ({-1} × V))) = ( ·(2nd ↾ ({-1} × V)))
6113, 59, 60nvinvfval 30729 . . . . . . 7 (⟨⟨ + , · ⟩, norm⟩ ∈ NrmCVec → ( ·(2nd ↾ ({-1} × V))) = (inv‘ + ))
6258, 61ax-mp 5 . . . . . 6 ( ·(2nd ↾ ({-1} × V))) = (inv‘ + )
6362eqcomi 2748 . . . . 5 (inv‘ + ) = ( ·(2nd ↾ ({-1} × V)))
6463fveq1i 6828 . . . 4 ((inv‘ + )‘𝑥) = (( ·(2nd ↾ ({-1} × V)))‘𝑥)
65 ax-hfvmul 31094 . . . . . . 7 · :(ℂ × ℋ)⟶ ℋ
66 ffn 6655 . . . . . . 7 ( · :(ℂ × ℋ)⟶ ℋ → · Fn (ℂ × ℋ))
6765, 66ax-mp 5 . . . . . 6 · Fn (ℂ × ℋ)
68 neg1cn 12135 . . . . . 6 -1 ∈ ℂ
6960curry1val 8044 . . . . . 6 (( · Fn (ℂ × ℋ) ∧ -1 ∈ ℂ) → (( ·(2nd ↾ ({-1} × V)))‘𝑥) = (-1 · 𝑥))
7067, 68, 69mp2an 698 . . . . 5 (( ·(2nd ↾ ({-1} × V)))‘𝑥) = (-1 · 𝑥)
71 shmulcl 31307 . . . . . 6 ((𝐻S ∧ -1 ∈ ℂ ∧ 𝑥𝐻) → (-1 · 𝑥) ∈ 𝐻)
724, 68, 71mp3an12 1459 . . . . 5 (𝑥𝐻 → (-1 · 𝑥) ∈ 𝐻)
7370, 72eqeltrid 2843 . . . 4 (𝑥𝐻 → (( ·(2nd ↾ ({-1} × V)))‘𝑥) ∈ 𝐻)
7464, 73eqeltrid 2843 . . 3 (𝑥𝐻 → ((inv‘ + )‘𝑥) ∈ 𝐻)
75 ovres 7522 . . . . 5 ((((inv‘ + )‘𝑥) ∈ 𝐻𝑥𝐻) → (((inv‘ + )‘𝑥)( + ↾ (𝐻 × 𝐻))𝑥) = (((inv‘ + )‘𝑥) + 𝑥))
7674, 75mpancom 694 . . . 4 (𝑥𝐻 → (((inv‘ + )‘𝑥)( + ↾ (𝐻 × 𝐻))𝑥) = (((inv‘ + )‘𝑥) + 𝑥))
77 eqid 2739 . . . . . 6 (inv‘ + ) = (inv‘ + )
786, 54, 77grpolinv 30615 . . . . 5 (( + ∈ GrpOp ∧ 𝑥 ∈ ran + ) → (((inv‘ + )‘𝑥) + 𝑥) = (GId‘ + ))
793, 40, 78sylancr 593 . . . 4 (𝑥𝐻 → (((inv‘ + )‘𝑥) + 𝑥) = (GId‘ + ))
8076, 79eqtrd 2774 . . 3 (𝑥𝐻 → (((inv‘ + )‘𝑥)( + ↾ (𝐻 × 𝐻))𝑥) = (GId‘ + ))
815, 28, 47, 51, 57, 74, 80isgrpoi 30587 . 2 ( + ↾ (𝐻 × 𝐻)) ∈ GrpOp
82 resss 5953 . 2 ( + ↾ (𝐻 × 𝐻)) ⊆ +
833, 81, 823pm3.2i 1346 1 ( + ∈ GrpOp ∧ ( + ↾ (𝐻 × 𝐻)) ∈ GrpOp ∧ ( + ↾ (𝐻 × 𝐻)) ⊆ + )
Colors of variables: wff setvar class
Syntax hints:  wa 396  w3a 1092   = wceq 1547  wcel 2119  wral 3053  Vcvv 3431  wss 3883  {csn 4555  cop 4561   × cxp 5616  ccnv 5617  ran crn 5619  cres 5620  ccom 5622   Fn wfn 6480  wf 6481  ontowfo 6483  cfv 6485  (class class class)co 7356  2nd c2nd 7930  cc 11027  1c1 11030  -cneg 11369  GrpOpcgr 30578  GIdcgi 30579  invcgn 30580  AbelOpcablo 30633  NrmCVeccnv 30673  chba 31008   + cva 31009   · csm 31010  normcno 31012  0c0v 31013   S csh 31017
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-10 2152  ax-11 2168  ax-12 2189  ax-ext 2711  ax-rep 5199  ax-sep 5218  ax-nul 5228  ax-pow 5294  ax-pr 5362  ax-un 7678  ax-cnex 11085  ax-resscn 11086  ax-1cn 11087  ax-icn 11088  ax-addcl 11089  ax-addrcl 11090  ax-mulcl 11091  ax-mulrcl 11092  ax-mulcom 11093  ax-addass 11094  ax-mulass 11095  ax-distr 11096  ax-i2m1 11097  ax-1ne0 11098  ax-1rid 11099  ax-rnegex 11100  ax-rrecex 11101  ax-cnre 11102  ax-pre-lttri 11103  ax-pre-lttrn 11104  ax-pre-ltadd 11105  ax-pre-mulgt0 11106  ax-pre-sup 11107  ax-hilex 31088  ax-hfvadd 31089  ax-hvcom 31090  ax-hvass 31091  ax-hv0cl 31092  ax-hvaddid 31093  ax-hfvmul 31094  ax-hvmulid 31095  ax-hvmulass 31096  ax-hvdistr1 31097  ax-hvdistr2 31098  ax-hvmul0 31099  ax-hfi 31168  ax-his1 31171  ax-his2 31172  ax-his3 31173  ax-his4 31174
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 854  df-3or 1093  df-3an 1094  df-tru 1550  df-fal 1560  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2543  df-eu 2573  df-clab 2718  df-cleq 2731  df-clel 2814  df-nfc 2888  df-ne 2935  df-nel 3039  df-ral 3054  df-rex 3064  df-rmo 3344  df-reu 3345  df-rab 3392  df-v 3433  df-sbc 3724  df-csb 3832  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3903  df-nul 4262  df-if 4455  df-pw 4531  df-sn 4556  df-pr 4558  df-op 4562  df-uni 4839  df-iun 4923  df-br 5073  df-opab 5135  df-mpt 5154  df-tr 5180  df-id 5513  df-eprel 5518  df-po 5526  df-so 5527  df-fr 5571  df-we 5573  df-xp 5624  df-rel 5625  df-cnv 5626  df-co 5627  df-dm 5628  df-rn 5629  df-res 5630  df-ima 5631  df-pred 6252  df-ord 6313  df-on 6314  df-lim 6315  df-suc 6316  df-iota 6441  df-fun 6487  df-fn 6488  df-f 6489  df-f1 6490  df-fo 6491  df-f1o 6492  df-fv 6493  df-riota 7313  df-ov 7359  df-oprab 7360  df-mpo 7361  df-om 7807  df-1st 7931  df-2nd 7932  df-frecs 8221  df-wrecs 8252  df-recs 8301  df-rdg 8339  df-er 8633  df-en 8884  df-dom 8885  df-sdom 8886  df-sup 9345  df-pnf 11172  df-mnf 11173  df-xr 11174  df-ltxr 11175  df-le 11176  df-sub 11370  df-neg 11371  df-div 11799  df-nn 12166  df-2 12235  df-3 12236  df-4 12237  df-n0 12429  df-z 12516  df-uz 12780  df-rp 12934  df-seq 13955  df-exp 14015  df-cj 15052  df-re 15053  df-im 15054  df-sqrt 15188  df-abs 15189  df-grpo 30582  df-gid 30583  df-ginv 30584  df-ablo 30634  df-vc 30648  df-nv 30681  df-va 30684  df-ba 30685  df-sm 30686  df-0v 30687  df-nmcv 30689  df-hnorm 31057  df-hba 31058  df-hvsub 31060  df-sh 31296
This theorem is referenced by:  hhssabloi  31351
  Copyright terms: Public domain W3C validator