sourcecodes/bnt-master/BNT/potentials/Old/comp_eff_node_sizes.m


1
2
3
4
5
6
7
8
9
10
11

function ens = comp_eff_node_sizes(ns, cnodes, ev, domain)

dnodes = mysetdiff(1:length(ns), cnodes);
odom = domain(~isemptycell(evidence(domain)));
cdom = myintersect(cnodes, domain);
ddom = myintersect(dnodes, domain);
cobs = myintersect(cdom, odom);
dobs = myintersect(ddom, odom);
ens = ns; 
ens(cobs) = 0;
ens(dobs) = 1;