expertDec.focal=elemDecC; expertDec.bba=zeros(1,size(elemDecC,2)); for foc=1:size(expert.focal,2)
ind=findeqcell(elemDecC,expert.focal{foc}); if ~isempty(ind)
expertDec.bba(ind)=expert.bba(foc);
else expertDec.bba(ind)=0; end end case '2T'
type=0; natoms=size(Theta,2); expertDec.focal(1)={[]}; indFoc=findeqcell(expert.focal,{[]}); if isempty(indFoc)
expertDec.bba(1)=0; else expertDec.bba(1)=expert.bba(indFoc);
end step =2; for i=1:natoms expertDec.focal(step)=codingFocal({[i]},Theta); indFoc=findeqcell(expert.focal,expertDec.focal{step}); if isempty(indFoc)
expertDec.bba(step)=0; else expertDec.bba(step)=expert.bba(indFoc);
end step=step+1; indatom=step; for step2=2:indatom-2 expertDec.focal(step)={[union(expertDec.focal{step2},...

expertDec.focal{indatom-1})]};
indFoc=findeqcell(expert.focal,expertDec.focal{step}); if isempty(indFoc)
expertDec.bba(step)=0; else expertDec.bba(step)=expert.bba(indFoc);
end step=step+1; end end elemDecC=expertDec.focal;