wolffd@0: function marginal = marginal_family(engine, i, t, add_ev)
wolffd@0: % MARGINAL_FAMILY Compute the marginal on the specified family (jtree_unrolled_dbn)
wolffd@0: % marginal = marginal_family(engine, i, t)
wolffd@0: 
wolffd@0: if nargin < 3, t = 1; end
wolffd@0: if nargin < 4, add_ev = 0; end
wolffd@0: assert(~add_ev);
wolffd@0: 
wolffd@0: %marginal = marginal_family(engine.unrolled_engine, i + (t-1)*engine.ss, add_ev);
wolffd@0: marginal = marginal_family(engine.unrolled_engine, i + (t-1)*engine.ss);
wolffd@0: