annotate toolboxes/FullBNT-1.0.7/bnt/potentials/@dpot/multiply_by_pot.m @ 0:cc4b1211e677
tip
initial commit to HG from
Changeset:
646 (e263d8a21543) added further path and more save "camirversion.m"
| author |
Daniel Wolff |
| date |
Fri, 19 Aug 2016 13:07:06 +0200 |
| parents |
|
| children |
|
| rev |
line source |
|
Daniel@0
|
1 function Tbig = multiply_by_pot(Tbig, Tsmall)
|
|
Daniel@0
|
2 % MULTIPLY_BY_POT Tbig *= Tsmall
|
|
Daniel@0
|
3 % Tbig = multiply_by_pot(Tbig, Tsmall)
|
|
Daniel@0
|
4 %
|
|
Daniel@0
|
5 % Tsmall's domain must be a subset of Tbig's domain.
|
|
Daniel@0
|
6
|
|
Daniel@0
|
7 %process sparse dpot, we do not consider only one of the two pots is sparse
|
|
Daniel@0
|
8 if issparse(Tbig.T) & issparse(Tsmall.T)
|
|
Daniel@0
|
9 Tbig.T = mult_by_sparse_table(Tbig.T, Tbig.domain, Tbig.sizes, Tsmall.T, Tsmall.domain, Tsmall.sizes);
|
|
Daniel@0
|
10 else
|
|
Daniel@0
|
11 Tbig.T = mult_by_table(Tbig.T, Tbig.domain, Tbig.sizes, Tsmall.T, Tsmall.domain, Tsmall.sizes);
|
|
Daniel@0
|
12 end
|
|
Daniel@0
|
13
|
