wolffd@0: function pi = CPD_to_pi(CPD, msg_type, n, ps, msg, evidence)
wolffd@0: % CPD_TO_PI Compute the pi vector (root)
wolffd@0: % function pi = CPD_to_pi(CPD, msg_type, n, ps, msg, evidence)
wolffd@0: 
wolffd@0: self_ev = evidence{n};
wolffd@0: switch msg_type
wolffd@0:  case 'd',
wolffd@0:   error('root_CPD can''t create discrete msgs')
wolffd@0:  case 'g',
wolffd@0:   pi.mu = self_ev;
wolffd@0:   pi.Sigma = zeros(size(self_ev));
wolffd@0: end