Mercurial > hg > camir-ismir2012
comparison toolboxes/FullBNT-1.0.7/bnt/potentials/@upot/divide_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 |
comparison
equal
deleted
inserted
replaced
-1:000000000000 | 0:cc4b1211e677 |
---|---|
1 function Tbig = divide_by_pot(Tbig, Tsmall) | |
2 % DIVIDE_BY_POT Tbig /= Tsmall | |
3 % Tbig = divide_by_pot(Tbig, Tsmall) | |
4 % | |
5 % Tsmall's domain must be a subset of Tbig's domain. | |
6 | |
7 smallp = extend_domain_table(Tsmall.p, Tsmall.domain, Tsmall.sizes, Tbig.domain, Tbig.sizes); | |
8 smallp = smallp + (smallp==0); | |
9 Tbig.p = Tbig.p ./ smallp; | |
10 | |
11 smallu = extend_domain_table(Tsmall.u, Tsmall.domain, Tsmall.sizes, Tbig.domain, Tbig.sizes); | |
12 Tbig.u = Tbig.u - smallu; | |
13 |