Metamath Proof Explorer


Theorem hoadddir

Description: Scalar product reverse distributive law for Hilbert space operators. (Contributed by NM, 25-Aug-2006) (New usage is discouraged.)

Ref Expression
Assertion hoadddir A B T : A + B · op T = A · op T + op B · op T

Proof

Step Hyp Ref Expression
1 addcl A B A + B
2 1 anim1i A B T : A + B T :
3 2 3impa A B T : A + B T :
4 homval A + B T : x A + B · op T x = A + B T x
5 4 3expa A + B T : x A + B · op T x = A + B T x
6 3 5 sylan A B T : x A + B · op T x = A + B T x
7 homval A T : x A · op T x = A T x
8 7 3expa A T : x A · op T x = A T x
9 8 3adantl2 A B T : x A · op T x = A T x
10 homval B T : x B · op T x = B T x
11 10 3expa B T : x B · op T x = B T x
12 11 3adantl1 A B T : x B · op T x = B T x
13 9 12 oveq12d A B T : x A · op T x + B · op T x = A T x + B T x
14 ffvelrn T : x T x
15 ax-hvdistr2 A B T x A + B T x = A T x + B T x
16 14 15 syl3an3 A B T : x A + B T x = A T x + B T x
17 16 3exp A B T : x A + B T x = A T x + B T x
18 17 exp4a A B T : x A + B T x = A T x + B T x
19 18 3imp1 A B T : x A + B T x = A T x + B T x
20 13 19 eqtr4d A B T : x A · op T x + B · op T x = A + B T x
21 6 20 eqtr4d A B T : x A + B · op T x = A · op T x + B · op T x
22 homulcl A T : A · op T :
23 homulcl B T : B · op T :
24 22 23 anim12i A T : B T : A · op T : B · op T :
25 24 3impdir A B T : A · op T : B · op T :
26 hosval A · op T : B · op T : x A · op T + op B · op T x = A · op T x + B · op T x
27 26 3expa A · op T : B · op T : x A · op T + op B · op T x = A · op T x + B · op T x
28 25 27 sylan A B T : x A · op T + op B · op T x = A · op T x + B · op T x
29 21 28 eqtr4d A B T : x A + B · op T x = A · op T + op B · op T x
30 29 ralrimiva A B T : x A + B · op T x = A · op T + op B · op T x
31 homulcl A + B T : A + B · op T :
32 1 31 stoic3 A B T : A + B · op T :
33 hoaddcl A · op T : B · op T : A · op T + op B · op T :
34 22 23 33 syl2an A T : B T : A · op T + op B · op T :
35 34 3impdir A B T : A · op T + op B · op T :
36 hoeq A + B · op T : A · op T + op B · op T : x A + B · op T x = A · op T + op B · op T x A + B · op T = A · op T + op B · op T
37 32 35 36 syl2anc A B T : x A + B · op T x = A · op T + op B · op T x A + B · op T = A · op T + op B · op T
38 30 37 mpbid A B T : A + B · op T = A · op T + op B · op T