Metamath Proof Explorer |
< Previous
Next >
Nearby theorems |
||
Mirrors > Home > MPE Home > Th. List > sraip | Structured version Visualization version GIF version |
Description: The inner product operation of a subring algebra. (Contributed by Thierry Arnoux, 16-Jun-2019.) |
Ref | Expression |
---|---|
srapart.a | ⊢ (𝜑 → 𝐴 = ((subringAlg ‘𝑊)‘𝑆)) |
srapart.s | ⊢ (𝜑 → 𝑆 ⊆ (Base‘𝑊)) |
Ref | Expression |
---|---|
sraip | ⊢ (𝜑 → (.r‘𝑊) = (·𝑖‘𝐴)) |
Step | Hyp | Ref | Expression |
---|---|---|---|
1 | srapart.a | . . . . . 6 ⊢ (𝜑 → 𝐴 = ((subringAlg ‘𝑊)‘𝑆)) | |
2 | 1 | adantl 482 | . . . . 5 ⊢ ((𝑊 ∈ V ∧ 𝜑) → 𝐴 = ((subringAlg ‘𝑊)‘𝑆)) |
3 | srapart.s | . . . . . 6 ⊢ (𝜑 → 𝑆 ⊆ (Base‘𝑊)) | |
4 | sraval 19877 | . . . . . 6 ⊢ ((𝑊 ∈ V ∧ 𝑆 ⊆ (Base‘𝑊)) → ((subringAlg ‘𝑊)‘𝑆) = (((𝑊 sSet 〈(Scalar‘ndx), (𝑊 ↾s 𝑆)〉) sSet 〈( ·𝑠 ‘ndx), (.r‘𝑊)〉) sSet 〈(·𝑖‘ndx), (.r‘𝑊)〉)) | |
5 | 3, 4 | sylan2 592 | . . . . 5 ⊢ ((𝑊 ∈ V ∧ 𝜑) → ((subringAlg ‘𝑊)‘𝑆) = (((𝑊 sSet 〈(Scalar‘ndx), (𝑊 ↾s 𝑆)〉) sSet 〈( ·𝑠 ‘ndx), (.r‘𝑊)〉) sSet 〈(·𝑖‘ndx), (.r‘𝑊)〉)) |
6 | 2, 5 | eqtrd 2853 | . . . 4 ⊢ ((𝑊 ∈ V ∧ 𝜑) → 𝐴 = (((𝑊 sSet 〈(Scalar‘ndx), (𝑊 ↾s 𝑆)〉) sSet 〈( ·𝑠 ‘ndx), (.r‘𝑊)〉) sSet 〈(·𝑖‘ndx), (.r‘𝑊)〉)) |
7 | 6 | fveq2d 6667 | . . 3 ⊢ ((𝑊 ∈ V ∧ 𝜑) → (·𝑖‘𝐴) = (·𝑖‘(((𝑊 sSet 〈(Scalar‘ndx), (𝑊 ↾s 𝑆)〉) sSet 〈( ·𝑠 ‘ndx), (.r‘𝑊)〉) sSet 〈(·𝑖‘ndx), (.r‘𝑊)〉))) |
8 | ovex 7178 | . . . 4 ⊢ ((𝑊 sSet 〈(Scalar‘ndx), (𝑊 ↾s 𝑆)〉) sSet 〈( ·𝑠 ‘ndx), (.r‘𝑊)〉) ∈ V | |
9 | fvex 6676 | . . . 4 ⊢ (.r‘𝑊) ∈ V | |
10 | ipid 16630 | . . . . 5 ⊢ ·𝑖 = Slot (·𝑖‘ndx) | |
11 | 10 | setsid 16526 | . . . 4 ⊢ ((((𝑊 sSet 〈(Scalar‘ndx), (𝑊 ↾s 𝑆)〉) sSet 〈( ·𝑠 ‘ndx), (.r‘𝑊)〉) ∈ V ∧ (.r‘𝑊) ∈ V) → (.r‘𝑊) = (·𝑖‘(((𝑊 sSet 〈(Scalar‘ndx), (𝑊 ↾s 𝑆)〉) sSet 〈( ·𝑠 ‘ndx), (.r‘𝑊)〉) sSet 〈(·𝑖‘ndx), (.r‘𝑊)〉))) |
12 | 8, 9, 11 | mp2an 688 | . . 3 ⊢ (.r‘𝑊) = (·𝑖‘(((𝑊 sSet 〈(Scalar‘ndx), (𝑊 ↾s 𝑆)〉) sSet 〈( ·𝑠 ‘ndx), (.r‘𝑊)〉) sSet 〈(·𝑖‘ndx), (.r‘𝑊)〉)) |
13 | 7, 12 | syl6reqr 2872 | . 2 ⊢ ((𝑊 ∈ V ∧ 𝜑) → (.r‘𝑊) = (·𝑖‘𝐴)) |
14 | 10 | str0 16523 | . . 3 ⊢ ∅ = (·𝑖‘∅) |
15 | fvprc 6656 | . . . 4 ⊢ (¬ 𝑊 ∈ V → (.r‘𝑊) = ∅) | |
16 | 15 | adantr 481 | . . 3 ⊢ ((¬ 𝑊 ∈ V ∧ 𝜑) → (.r‘𝑊) = ∅) |
17 | fv2prc 6703 | . . . . 5 ⊢ (¬ 𝑊 ∈ V → ((subringAlg ‘𝑊)‘𝑆) = ∅) | |
18 | 1, 17 | sylan9eqr 2875 | . . . 4 ⊢ ((¬ 𝑊 ∈ V ∧ 𝜑) → 𝐴 = ∅) |
19 | 18 | fveq2d 6667 | . . 3 ⊢ ((¬ 𝑊 ∈ V ∧ 𝜑) → (·𝑖‘𝐴) = (·𝑖‘∅)) |
20 | 14, 16, 19 | 3eqtr4a 2879 | . 2 ⊢ ((¬ 𝑊 ∈ V ∧ 𝜑) → (.r‘𝑊) = (·𝑖‘𝐴)) |
21 | 13, 20 | pm2.61ian 808 | 1 ⊢ (𝜑 → (.r‘𝑊) = (·𝑖‘𝐴)) |
Colors of variables: wff setvar class |
Syntax hints: ¬ wn 3 → wi 4 ∧ wa 396 = wceq 1528 ∈ wcel 2105 Vcvv 3492 ⊆ wss 3933 ∅c0 4288 〈cop 4563 ‘cfv 6348 (class class class)co 7145 ndxcnx 16468 sSet csts 16469 Basecbs 16471 ↾s cress 16472 .rcmulr 16554 Scalarcsca 16556 ·𝑠 cvsca 16557 ·𝑖cip 16558 subringAlg csra 19869 |
This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1787 ax-4 1801 ax-5 1902 ax-6 1961 ax-7 2006 ax-8 2107 ax-9 2115 ax-10 2136 ax-11 2151 ax-12 2167 ax-ext 2790 ax-rep 5181 ax-sep 5194 ax-nul 5201 ax-pow 5257 ax-pr 5320 ax-un 7450 ax-cnex 10581 ax-1cn 10583 ax-addcl 10585 |
This theorem depends on definitions: df-bi 208 df-an 397 df-or 842 df-3or 1080 df-3an 1081 df-tru 1531 df-ex 1772 df-nf 1776 df-sb 2061 df-mo 2615 df-eu 2647 df-clab 2797 df-cleq 2811 df-clel 2890 df-nfc 2960 df-ne 3014 df-ral 3140 df-rex 3141 df-reu 3142 df-rab 3144 df-v 3494 df-sbc 3770 df-csb 3881 df-dif 3936 df-un 3938 df-in 3940 df-ss 3949 df-pss 3951 df-nul 4289 df-if 4464 df-pw 4537 df-sn 4558 df-pr 4560 df-tp 4562 df-op 4564 df-uni 4831 df-iun 4912 df-br 5058 df-opab 5120 df-mpt 5138 df-tr 5164 df-id 5453 df-eprel 5458 df-po 5467 df-so 5468 df-fr 5507 df-we 5509 df-xp 5554 df-rel 5555 df-cnv 5556 df-co 5557 df-dm 5558 df-rn 5559 df-res 5560 df-ima 5561 df-pred 6141 df-ord 6187 df-on 6188 df-lim 6189 df-suc 6190 df-iota 6307 df-fun 6350 df-fn 6351 df-f 6352 df-f1 6353 df-fo 6354 df-f1o 6355 df-fv 6356 df-ov 7148 df-oprab 7149 df-mpo 7150 df-om 7570 df-wrecs 7936 df-recs 7997 df-rdg 8035 df-nn 11627 df-2 11688 df-3 11689 df-4 11690 df-5 11691 df-6 11692 df-7 11693 df-8 11694 df-ndx 16474 df-slot 16475 df-sets 16478 df-ip 16571 df-sra 19873 |
This theorem is referenced by: frlmip 20850 rrxip 23920 |
Copyright terms: Public domain | W3C validator |