view toolboxes/FullBNT-1.0.7/bnt/potentials/Old/comp_eff_node_sizes.m @ 0:e9a9cd732c1e tip

first hg version after svn

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;